CODINGAN LOGIN PENGHUBUNG ANTAR FORM UNTUK VISUAL BASIC

1. buat form1

2.buat form 2

3. isi button Login pada form1 dengan codingan berikut
   

Private Sub Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim franak As New form2

        If (TextBox1.Text = "YULIANUS") And (TextBox2.Text = "12345") Then

            franak.Show()

          End Sub

4. isi button close pada form1 dengan codingan berikut:
   

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

        Close()

5.Run