重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
从你的例子来看你要实现的功能是
创新互联为客户提供专业的成都网站设计、成都网站制作、程序、域名、空间一条龙服务,提供基于WEB的系统开发. 服务项目涵盖了网页设计、网站程序开发、WEB系统开发、微信二次开发、成都手机网站制作等网站方面业务。
在
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
Public Class Form2
Dim test As String
Public Sub New(ByVal _test As String)
test = _test
End Sub
End Class
Form1 中 New Form2("abc") 即可传参给 Form2 中的 test。
但在 VB.NET 中,没必要这么麻烦,只需要声明为 Public,即可直接方法,如:
Public Class Form2
Public test As String
End Class
Form1 中直接 Form2.test = "abc" 即可。
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
Try
IO.File.ReadAllLines("c:/123.txt")
Catch ex As Exception
MsgBox("文件不存在!")
End Try