Pengenalan Visual Basic Net–1

1. Buatlah proyek baru dengan nama Inventori.
2. Gantilah Properti Form1 sesuai dengan tabel berikut :

3. Jalankan program dengan mengakses menu Debug > Start Debugging atau menekan tombol atau dengan menekan F5. Lihatlah bahwa sekarang Form1 bertuliskan Jendela Login dan ukurannya 336 x 250 pixel. Hasilnya :
   
4. Simpanlah form dengan menekan menu File > Save Form1.vb as …
5. Isi dengan nama frLogin.vb lalu tekan Save

6. Buka kembali proyek Inventori Tempatkanlah sebuah label pada frLogin dengan posisi seperti gambar dibawah ini.

7. Caranya, klik ganda icon Label pada Toolbox atau Drag and drop icon Label pada Toolbox ke dalam frLogin.
8. Gantilah propertinya sesuai dengan tabel berikut :

9. Jalankan program dengan menekan tombol atau dengan menekan F5.

10. Isikan pada TextBox1 dengan Alfi dan TextBox2 dengan Naufal.
11. Apa yang terjadi pada TextBox2? Ternyata yang muncul adalah karakter “*” sebanyak 6 kali. Hal ini bertujuan supaya password kita tidak diketahui orang lain.
12. Simpanlah semua file dalam proyek dengan menekan menu File > Save All atau dengan menekan tombol
13. Groupbox memiliki fungsi untuk mengelompokan kontrol-kontrol yang ada pada sebuah form. Selain itu, group box dapat membantu mengatur tampilan form dan kontrol-kontrol pada form. Ketika group box dipindahkan, maka kontrol yang berada di dalam group box tersebut akan ikut pindah. Sekarang tempatkanlah sebuah group box pada frLogin.

14. Klik kanan pada GroupBox1 kemudian pilih Send to Back agar objek-objek yang tertutup GroupBox1 bisa terlihat.
15. Tambahkan sebuah form dengan cara klik kanan pada proyek Inventori pada Solution Explorer kemudian pilih Add > Windows Form… kemudian beri nama frUtama.vb.

16. Gantilah Propertinya sesuai dengan tabel berikut :

17. Kembali ke form login kemudian klik ganda tombol Login dan isikan kode sehingga menjadi seperti berikut ini :

Public Class frLogin
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim frAnak As New frUtama
        If (TextBox1.Text = "Alfi") And (TextBox2.Text = "Naufal") Then
            frAnak.Show()
        End If
    End Sub
End Class

14. Jalankan program dengan menekan F5.
15. Isikan Alfi pada baris nama dan Alfi Naufal pada baris password. Kemudian tekan tombol Login. Apa yang terjadi? Tidak akan terjadi apa-apa.
16. Isikan Alfi pada baris nama dan Naufal pada baris password. Kemudian tekan tombol Login. Apa yang terjadi?  Akan muncul jendela utama.

18. Tutup semua aplikasi Inventori yang sedang berjalan kemudian simpanlah semua file dalam proyek dengan menekan menu File > Save All atau dengan menekan tanda