Quiz Hari Senin No 2

-    Listing Program : Quiz Hari Senin No 2

 Private Sub process_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles process.Click

        If user.Text = "lundu" And pasword.Text = "0911590" Then
            FormKaryawan.Show()
            Me.Hide()
        Else
            MsgBox("Your Pasword Invalid !!!")
            user.Text = ""
            pasword.Text = ""
        End If

    End Sub
End Class

-    Hasil Program