Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
If UsernameTextBox.Text = "sep" And PasswordTextBox.Text = "123" Then
MDIParent1.Show()
Hide()

Else
MsgBox(" Kode yang anda masukkan Salah")

End If

End Sub

Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
End
Me.Close()
End Sub

End Class