บทความเรื่อง การทำ Screen Saver อย่างง่าย ๆ ดัวยตนเอง กับ VB.NET2005

 คำสั่งในการทดสอบเครือข่าย  PING มีรูปแบบดังนี้
Dim value As Boolean = My.Computer.Network.Ping(hostNameOrAddress)
Dim value As Boolean = My.Computer.Network.Ping(address)
Dim value As Boolean = My.Computer.Network.Ping(hostNameOrAddress ,timeout)
Dim value As Boolean = My.Computer.Network.Ping(address ,timeout)

Example 1.
If My.Computer.Network.Ping("198.01.01.01") Then
       MsgBox("Server pinged successfully.")
Else
      MsgBox("Ping request timed out.")
End If

Example 2.
If My.Computer.Network.Ping("www.siam2dev.com",1000) Then
        MsgBox("Server pinged successfully.")
Else
         MsgBox("Ping request timed out.")
End If .

การใช้งานเครื่องหมาย _ (under score)
    ภาษา visual basic นั้น ได้กำหนดให้ การเขียนคำสั่ง 1 คำสั่ง นั้น ต้องจบภายในบรรทัดเดีียวกัน หรือ หนึ่งคำสั่ง หนึ่งบรรทัดนั้นเอง แต่บางครั้ง หรือ บางคำสั่งของ visual basic ก็อาจจะต้องเขียนคำสั่งยาวมากทำให้ ยากต่อการอ่านคำสั่ง {ต้องเลื่อน scroll bar นั่นเอง }

ต.ย.
    if TextBox1.Text = "" Then
        Msgbox("กรุณาป้อนข้อมูลใน TextBox ก่อนครับ",MsgboxStyle.yesnocancel + MsgboxStyle.Critical , "MyProject")
    else
    end if

    สังเกตุตรงบรรทัดคำสั่ง Msgbox จะเห็นว่าค่อนข้างยาว เราสามารถตัดขึ้นบรรทัดใหม่ได้ โดยใช้ _ ดังนี้

      If TextBox1.Text = "" Then
        MsgBox("กรุณาป้อนข้อมูลใน TextBox ก่อนครับ", _
        MsgBoxStyle.YesNoCancel + MsgBoxStyle.Critical, _
        "MyProject")
    Else
    End If

หมายเหตุ :: ก่อน _ ต้องเว้นช่องว่าง 1 ช่องก่อน

การพิมพ์หลายคำสั่งในบรรทัดเดียวกัน
    ใน vb.net2005 เราสามารถเขียนคำสั่งหลาย ๆ คำสั่งในบรรทัดเดียวกันได้ {โดยปกติ คอมไพล์เลอร์ของ visual basic นั้นจะมองหนึ่งคำสั่ง หนึ่งบรรทัด } เพื่อเป็นการประหยัดบรรทัดคำสั่งใน source code โดยใช้เครื่องหมาย โคลอน : ดังตย.

    dim a ,b , c, d as integer

    a= 5 : b = 10 : c=20 : d=30

หรือ
    button1.enabled= false : button1.enabled= false : button1.enabled= false

[ อ่านเนื้อหาเกี่ยวกับ vb.net ทั้งหมด ]