扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
Sub Main()
郸城网站制作公司哪家好，找创新互联公司！从网页设计、网站建设、微信开发、APP开发、响应式网站开发等网站项目制作，到程序开发，运营维护。创新互联公司成立于2013年到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联公司。
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
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" 即可。
如果你所谓的界面是一个容器控件，可以利用设置visible的方法或者调整z顺序的方法。
Private Sub Text1_Change()
For x = 0 To List1.ListCount - 1
If Text1.Text = List1.List(x) Then
List1.Selected(x) = True
End If
Next x
End Sub
Label1: '建立标签，名为Label1。
GoTo Label1 '跳转到标签Label1所在位置。
注意不要陷入死循环！
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网