Cara Membuat Form Login Menggunakan VB Net 2008

Assalamualaikum,,,

salam blogger,,

kali ini saya akan posting kan apa yang baru saja saya tau yaitu mengenai Cara Membuat Form Login Sederhana menggunakan VB Net 2008   dan ini cocok untuk pemula atau dasar,

Ok langsung aja pertama kali yang di lakukan ya,,, kita buka VB.Net 2008, lalu desain formnya seperti berikut ;

setelah kita desai formnya, lalu ini lah listing program Cara Membuat Form Login menggunakan VB Net 2008 :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Value = ProgressBar1.Value + 1
        If ProgressBar1.Value = 100 Then
            Timer1.Stop()
            Form1.Show()
        End If
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Username.Text = "Igaph" And Password.Text = "1234" Then
            Timer1.Start()
        Else
            MsgBox("Username dan password Anda Salah")
            Username.Text = ""
            Password.Text = ""
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim q As Integer
        q = MsgBox("Apakah Anda ingin Keluar ?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Data Penjualan")
        If q = vbYes Then
            Close()
        End If
    End Sub

    Private Sub Password_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Password.KeyPress
        Dim t As Integer = Asc(e.KeyChar)
        If t = 13 Then
            If Username.Text = "Igaph" And Password.Text = "1234" Then
                Timer1.Start()
            Else
                MsgBox("Username dan password Anda Salah")
                Username.Text = ""
                Password.Text = ""
            End If
        End If
    End Sub


Demikianlah postingan mengenai Cara Membuat Form Login Menggunakan VB Net 2008,,
jika terdapat kesulitan, anda bisa koment di bawah,, :D
saya akhiri Assalamualaikum,,, :D