扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
Try
创新互联是一家专业提供嵊泗企业网站建设,专注与成都做网站、成都网站制作、H5网站设计、小程序制作等业务。10年已为嵊泗众多企业、政府机构等服务。创新互联专业网站建设公司优惠进行中。
IO.File.ReadAllLines("c:/悉液握尺123.txt")
Catch ex As Exception
MsgBox("文件不存在睁皮物!")
End Try
从你的例子来看你要实蠢樱现的功能是
在
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
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
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网