Private Sub Button1_Click(ByVal sen

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim warning As String = "warning!" & vbNewLine & vbNewLine + _
"If attemp var=3" + vbNewLine + _
"System will shutdown."
End Sub
End Class

ผลลัพธ์ (ไทย) 1:

ส่วนย่อย Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) จัดการ Button1.Click มิติเตือนเป็นสตริง = "คำ เตือน" และ vbNewLine และ vbNewLine + _ "ถ้า attemp var = 3" + vbNewLine + _ "ระบบจะปิด" ย่อยสิ้นสุดชั้นสุดท้าย

ผลลัพธ์ (ไทย) 2:

ส่วนตัว Button1_Click ย่อย (ผู้ส่ง ByVal ฐานะ System.Object, ByVal อีในฐานะที่เป็น System.EventArgs) จับ Button1.Click
เตือนมซำ As String = "คำเตือน!" และ vbNewLine & vbNewLine + _
"ถ้าการพยายามที่ var = 3" + vbNewLine + _
"ระบบจะปิด."
Sub End
คลาสของการสิ้นสุด

ผลลัพธ์ (ไทย) 3:

button1_click เรือดำน้ำส่วนตัว ( byval ผู้ส่งเป็นวัตถุของระบบ byval เป็นระบบ eventargs ) จับคําสั่ง คลิก
มัวเตือนเป็นสตริง = " คำเตือน " & vbnewline & vbnewline _
" ถ้าเป็นบอล = 3 " vbnewline _
" ระบบจะปิด "

จบชั้นเรียนจบซับ