要给出具体的问题,比如在哪里时要跳跃,在按什么键时要跳跃,跳多高等。你可以在窗体的KeyPress中让对象的top减,在KeyUp时让对象的top加试试。
成都创新互联始终坚持【策划先行,效果至上】的经营理念,通过多达十多年累计超上千家客户的网站建设总结了一套系统有效的全网推广解决方案,现已广泛运用于各行各业的客户,其中包括:成都服务器托管等企业,备受客户赞扬。
Sub Main()
Dim Ispath As String
Console.Write("请输入目录:")
Ispath = Console.ReadLine()
Do While (Not Directory.Exists(Trim(Ispath)))
Console.WriteLine("你输入的目录不存在,请检查重新输入.")
Console.Write("请输入目录:")
Ispath = Console.ReadLine()
Loop
Console.WriteLine("目录为:{0}", Ispath)
Console.ReadLine()
End Sub
从你的例子来看你要实现的功能是
在
i=0
到
10
中
如果
i=3
就跳过
msgbox
("ok")
指令,否则执行该指令。
你可从另一方面来考虑。程序可以这样写:
dim
i
as
integer
for
i=0
to
10
if
i3
then
msgbox
("ok")
end
if
next
i
售后响应及时
7×24小时客服热线数据备份
更安全、更高效、更稳定价格公道精准
项目经理精准报价不弄虚作假合作无风险
重合同讲信誉,无效全额退款