Minggu, 29 Januari 2012

jawaban no.3 program ke1


Public Class Form1

    Private Sub btnlogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlogin.Click
        If password.Text = "1980" Then
            mu.Show()
            Me.Hide()
        Else
            MsgBox("Maaf Password anda masih salah !!!")
        End If
    End Sub
    Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click

   
        End
    End Sub

End Class

Tidak ada komentar:

Posting Komentar