LOGIN FORM Thiết kế form sau: Khi click vào nút LOGIN lên hộp thoại sau: Sau nhập liệu vào textbox click nút LOGIN hộp thoại sau: Và xuất hình ảnh: CODE Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim username As String If TextBox1.Text = "" Then Beep() MsgBox("Bạn phải nhập UserName") PictureBox1.Visible = False End If If TextBox1.Text "" Then username = TextBox1.Text Beep() MsgBox("Chào bạn " & TextBox1.Text) PictureBox1.Visible = True End If End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub End Class