01.Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
02. If Asc(e.KeyReturn) = 13 Then
03. e.Handleds = True
04. If TextBox1.Text = "" Then
05. MessageBox.Show("กรุณาป้อนข้อมูลในช่อง txt1 ก่อนค่ะ !!!", "ผลการตรวจสอบ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
06. Else
07. TextBox2.Focus()
08. End If
09.
10. End If
11.
12. End Sub
