Cara menggunakan IF untuk Registrasi SNMPTN menggunakan Visual Studio 2008

Assalamualaikum Wr.Wb

Saya akan memberitahukan bagaimana cara menggunakan IF untuk registrasi SNMPTN menggunakan Visual Studio 2008. kita membuat dulu 2 Label, 2 TextBox dan 2 Button. Label 1 diganti dengan nama Username, Label 2 diganti dengan Password, Button 1 diganti dengan nama Login dan Button 2 diganti dengan nama Registrasi. Seperti ini :

Setelah membuat form diatas kita isi UserName dan Password klik Login akan muncul seperti ini...

Tapi jika untuk Registrasi kita akan muncul seperti ini :

kemudian kita isi kolom registrasi yang telah tersedia:

Apabila sudah terisi semua, kita dapat meng-klik konfirm dan akan muncul form seperti ini...

Berikut Koding untuk membuat form-form di atas tersebut..
Pada form 1 kita klik di "Form" dan kodingnya seperti ini.....

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TxtUser.Text = "AsriShinta" And TxtPass.Text = "Larasati" Then
            MsgBox("Ini adalah Akun SNMPTN Anda")
            Form3.Show()
            Me.Hide()

        Else
            MsgBox("Username atau Password yang anda masukkan salah!")
            TxtUser.Text = ""
            TxtPass.Text = ""
            TxtUser.Focus()
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Form2.Show()

Dan kita klik pada Form 2 untuk Registrasi...

Kodingnya akan seperti ini :

Public Class Form2

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim a, s, l As Integer
        For a = 1 To 31
            CmbTanggal.Items.Add(a)
        Next
        For s = 1999 To 1950 Step -1
            CmbTahun.Items.Add(s)
        Next
        For l = 1 To 12
            CmbBulan.Items.Add(MonthName(l))
        Next
    End Sub

    Private Sub BtnConfirm_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnConfirm.Click
        Form3.Show()
    End Sub

    Private Sub BtnReset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnReset.Click
        TxtNama.Text = ""
        TxtNomer.Text = ""
        TxtSekolah.Text = ""
        TxtAlamat.Text = ""
        CmbTanggal.Text = ""
        CmbBulan.Text = ""
        CmbTahun.Text = ""
        CmbJurusan.Text = ""
        CmbUniversitas.Text = ""
        TxtNama.Focus()
    End Sub
End Class

Dan seperti itu lah cara membuat fungsi IF untuk registrasi SNMPTN menggunakan Visual Studio 2008. semoga ini bermanfaat.

Terimakasih

Wassalamualaikum Wr. Wb

ASRI SHINTA LARASATI

1106096034