重慶分公司,新征程啟航
為企業提供網站建設、域名注冊、服務器等服務
為企業提供網站建設、域名注冊、服務器等服務
從你的例子來看你要實現的功能是
創新互聯為客戶提供專業的成都網站設計、成都網站制作、程序、域名、空間一條龍服務,提供基于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