Kali ini kita akan membahas cara membuat form login diexcel menggunakan visual basic yang ada di excel, pembuatan yang saya contohka...
berikut codingnya
Private Sub cktampil_Click()
If cktampil.Value = True Then
txtpass.PasswordChar = ""
Else
txtpass.PasswordChar = "**"
End If
End Sub
Private Sub CommandButton1_Click()
If txtuser.Text = "" Then
MsgBox "UserName Tidak Boleh Kosong", vbExclamation + vbApplicationModal + vbDefaultButton1, "UserName Kosong"
txtuser.SetFocus
Else
If txtuser.Text = "wpsexcel" And txtpass.Text = "12345" Then
MsgBox "Login Sukses", vbInformation + vbApplicationModal + vbDefaultButton1, "Login Sukses"
Unload Me
Else
MsgBox "Login Gagal, Cek kembali Username dan Password", vbCritical + vbApplicationModal + vbDefaultButton1, "Login Gagal"
End If
End If
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub
Private Sub UserForm_Activate()
txtpass.PasswordChar = "**"
End Sub
[lock] [Download File ##download##] [/lock]