Pemrograman VB.NET

1. Pemrograman VB.NET Pertemuan 3

2. Mengenal Kondisi Percabangan dan Kondisi Perulangan

3. Kondisi Percabangan Kondisi percabangan yakni suatu kondisi yang hanya dapat dikerjakan karena memenuhi kriteria Bentuk kondisi percabangan yang dapat ditemui antara lain: If……..End If If……..Else……..End If If……..ElseIf……End If If……..ElseIF…...Else……..EndIF

4. Kondisi Percabangan IF (Kondisi) Then Statement Benar IF (Kondisi) Then Statement Benar Statement Benar Else Statement Salah Statement Salah End IF IF (Kondisi) Then Statement Benar Statemen Benar End IF

5. Kondisi Percabangan IF (Kondisi) Then Statement Benar Statemen Benar Elseif(Kondisi) Then Statement Benar Statement Benar End IF IF (Kondisi) Then Statement Benar Statemen Benar Elseif(Kondisi) Then Statement Benar Elseif Statement Benar Elseif Else Statement Salah Statement Salah End IF

6. Contoh Program Percabangan: If…EndIf Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = “pemrograman" Then TextBox2.Text = “vb.net" End If End Sub

7. Contoh Program Percabangan: If…EndIf Bila program tersebut dijalankan, maka hasilnya adalah :

8. Contoh Program Percabangan : If..Else..EndIf Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = “pemrograman" Then TextBox2.Text = “vb.net" Else TextBox2.Text = "siapa ya?" End If End Sub

9. Contoh Program Percabangan : If..Else..EndIf Bila program tersebut dijalankan, maka hasilnya adalah :

10. Contoh Program Percabangan : If..Else..EndIf Bila program tersebut dijalankan, maka hasilnya adalah :

11. Kondisi Perulangan Kondisi dimana Listing Program akan diulang-ulang Jika Kondisinya terpenuhi

12. Macam Perulangan For index = start To end [Step step] [statements] [Exit For] [statements] Next [index] Do [{While | Until} condition ] [statements] [Exit Do] [statements] Loop Do [statements] [Exit Do] [statements] Loop [{While | Until} condition] While condition [statements] End While

13. Contoh Program Kondisi Perulangan : While……End While Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer i = Val(TextBox1.Text) While i < 5 MsgBox("a") End While End Sub

14. Contoh Program Kondisi Perulangan : While……End While Bila program tersebut dijalankan, maka hasilnya adalah : ?

15. Contoh Program Kondisi Perulangan : While……End While Bila program tersebut dijalankan, maka hasilnya adalah : …

16. Contoh Program Kondisi Perulangan : While……End While Program ini akan terus menghasilkan Message box, karena code program yang terkait Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer i = Val(TextBox1.Text) While i < 5 MsgBox("a") End While End Sub Membuat variabel i untuk menampung isi textbox1 dan diubah ke format angka Selama i lebih kecil dari 5 Maka terus akan muncul messagebox

17. Membuat Menu Kontrol

18. Menu Kontrol Menu kontrol adalah Object yang memungkinkan pengguna/User untuk membuat pilihan dalam sebuah form melalui pilihan Menu Contoh Menu:

19. Cara Membuat Menu Menambah Menu Strip Drag dan drop kontrol MenuStrip yang terletak pada jendela toolbox disebelah kiri kedalam form. Kontrol menu strip terdapat pada kelompok kontrol Menu & Toolbars.

20. Membuat Menu • Untuk membuat menu, pilih didalam toolbox lalu ketikkan nama menu sesuai dengan yang diinginkan • Atau bisa juga dengan mengetikkan menu pada properties text • Penggunaan tanda ”&” diantara nama menu, berfungsi agar menu dapat diakses menggunakan keyboard dengan menekan tombol alt disertai dengan huruf yang bergaris bawah. • jika program sudah dijalankan, menu ini dapat diakses dengan menekan tombol ”alt dan m” secara bersamaan.

21. Cara Membuat Menu Tampilan layar desain form Setelah diletakkan Object MenuStrip Pada Bagian Type Here Dapat dituliskan Apapun

22. Contoh Hasil Pembuatan Menu

23. Membuat MenuSistem Informasi Pembelian Tunai 1 2 4 3

24. Membuat koneksi database

25. Membuat koneksi database pada Module Dalam sistem pembelian ini, koneksi database nya terdapat pada Module. Sehingga dibuat bersifat global.

26. Membuat koneksi database pada Module • Untuk membuat Module, perlu menambahkan atribut baru berupa module pada project. • Dengan cara: Klik kanan pada Project di Solution Explorer, kemudian pilih Add, Add Module • Nama default : Module1.vb

27. Membuat koneksi database pada Module Provider database dengan Ms.Access • Ketikan code untuk module : Nama database yang telah dibuat

28. Membuat koneksi database pada Module • Agar database langsung terbaca ketika program berjalan, maka database harus diletakkan didalam folder debug. • Pindahkan database ke dalam folder projectbindebug • Hal ini pengaruh dari code program dalam Module : “Application.StartupPath”

29. Membuat koneksi database pada Form Utama • Code program pada form utama (double klik pada Form Utama) End Class

30. Membuat koneksi database pada Form Utama • Jalankan program, maka bila benar akan muncul message box

31. Membuat rancangan layar untuk form master(design form master)

32. Design form master • Untuk membuat design form master, perlu ditambahkan dulu sebuah form kedalam project • Caranya : klik kanan pada projectAddWindows Form Beri nama : (ubah properties name) FrmMasterBarang

33. Design form master • Designlah form master barang sbb:

34. Design form master • Buatlah code program untuk: • tombol Batal dan • tombol keluar