Modul Pemrograman Visual

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 1 I. JUDUL PENGENALAN VISUAL BASIC II. TUJUAN - Memahami platform Microsoft .NET; - Mengenal Integrated Development Environment (IDE) Visual Basic .NET; - Memahami struktur project Visual Basic .NET; - Memahami jenis-jenis aplikasi .NET; - Mampu membangun Graphical User Interface (GUI) menggunakan Visual Basic .NET; III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK a. Platform .NET Framework Microsoft .NET yang awalnya disebut Next Generation Windows Services (NGWS) adalah suatu platform untuk membangun dan menjalankan generasi penerus aplikasi-aplikasi terdistribusi. Microsoft.NET merupakan framework (kerangka) pengembangan yang menyediakan antarmuka pemrograman baru untuk layanan Windows dan API (Application Programming Interface).Microsoft .NET merupakan strategi Microsoft untuk menghubungkan sistem, informasi, dan alat (device), sehingga orang dapat berkomunikasi serta berkolaborasi dengan lebih efektif. Teknologi .NET terintegrasi penuh melalui produk- produk Microsoft, dan menyediakan kemampuan untuk mengembangkan solusi dengan menggunakan Web service. Platform Microsoft .NET terdiri dari lima komponen utama yang tersusun dalam tiga lapisan (layer). Lapisan paling bawah adalah sistem operasi;lapisan kedua terdiri dari tiga komponen; lapisan teratas adalah Visual Studio .NET. b. Visual Studio .NET Microsoft Visual Studio .NET merupakan kumpulan lengkap tools pengembangan untuk membangun aplikasi Web ASP.NET, XML Web Services, aplikasi dekstop, dan aplikasi mobile. Di dalam Visual Studio inilah bahasa-bahasa pemrograman .NET seperti Visual SMK MUSDA PERBAUNGAN 1

MODUL : PEMROGRAMAN VISUAL 2019 Basic, Visual C++, Visual C# (CSharp), dan Visual J# (JSharp). Semuanya menggunakan lingkungan pengembangan terintegrasi atau IDE yang sama sehingga memungkinkan untuk saling berbagi tools dan fasilitas. c. Visual Basic .NET Visual Basic .NET (atau VB.NET) merupakan salah satu bahasa pemrograman yang bisa digunakan untuk membangun aplikasi-aplikasi.NET di platform Microsoft .NET. Tidak seperti generasi sebelumnya Visual Basic versi 6.0 ke bawah yang lebih difokuskan untuk pengembangan aplikasi desktop, Visual Basic .NET memungkinkan para pengembang membangun bermacam aplikasi, baik desktop maupun aplikasi web. Seiring dengan perkembangan aplikasi perangkat lunak yang semakin kompleks, saat ini Visual Basic .NET terbaru (Visual Basic 2008). d. IDE Visual Basic IDE (Integrated Development Environment), atau juga disebut sebagai Integrated Design/Debugging Environment, adalah perangkat lunak komputer yang berfungsi untuk membantu pemrogram dalam mengembangkan perangkat lunak. Singkatnya, IDE merupakan suatu lingkungan pengembangan aplikasi yang terintegrasi; lengkap dengan beragam tools atau utilitas pendukung. e. Mengenal IDE Visual Basic 2008 Dalam upaya memudahkan penggunaan IDE, maka diperlukan pemahaman yang baik mengenai IDE Visual Basic 2008. SMK MUSDA PERBAUNGAN 2

MODUL : PEMROGRAMAN VISUAL 2019 Interface Keterangan Menu Bar Menu standar pada visual Basic Toolbar Daftar tool yang digunakan untuk menjalankan perintah yang sering digunakan Toolbox Daftar control yang tambahkan ke dalam program sebagai interface Form Design Digunakan untuk mengedit tampilan form serta mengatur posisi control pada form Solution Digunakan untuk mengolah file dan project Explorer Properties Digunakan untuk mengedit property dari form dan control yang sedang diedit Error List Digunakan untuk menampilkan pesan error jika terjadi kesalahan V. LANGKAH KERJA a. Membuat Project Baru Project merupakan kerangka dasar aplikasi yang sangat menentukan jenis aplikasi yang akan dibuat. Untuk memulai pembuatan project, ikuti langkah-langkah berikut: 1. Jalankan Microsoft Visual Basic 2008. 2. Klik menu File > New > Project, atau melalui ikon New Project, atau melalui kombinasi tombol Ctrl+N. 3. Pada kotak dialog New Project, pilih template Windows Application, kemudian klik OK. SMK MUSDA PERBAUNGAN 3

MODUL : PEMROGRAMAN VISUAL 2019 b. Membuat Aplikasi Windows 1. Buat project baru, atau lanjutkan project pertama Anda sebelumnya. 2. Tambahkan sebuah kontrol Label ke form, dengan cara mengklik ganda Label di Toolbox, atau men-drag Label ke form. Atur propertinya seperti tabel berikut: Object Properties Nilai Form1 Name Frmlatihan Text Latihan Visual Basic Label Name lblText 3. Tambahkan Event Load pada form dengan salah satu cara berikut: a. Klik ganda area form kosong. b. Klik area form kosong, kemudian tekan F7. 4. Lengkapi kode event handler-nya seperti berikut: Public Class Form1 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load ' Men-set teks kontrol label Me.lblText.Text = \"Belajar Pemrograman Visual Basic\" End Sub End Class 5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 6. Simpan aplikasi Anda. c. Membuat Aplikasi Console 4 1. Buat project baru, pilih template Console Application, kemudian klik OK. 2. Lengkapi kode programnya seperti berikut: Module Module1 Sub Main() ' Mencetak teks ke console Console.WriteLine(\"Apa Kabar Teman-Teman ?\") Console.WriteLine(\"Selamat Datang di SMK Musda Perbaungan\") Console.Read() End Sub SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 End Module 3. Tekan F5 untuk menjalankan aplikasi. 4. Simpan aplikasi Anda. SMK MUSDA PERBAUNGAN 5

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 2 I. JUDUL FORM DAN OBJEK KONTROL II. TUJUAN - Memahami dan mengenal Form dan Objek Kontrol; - Dapat membuat aplikasi sederhana dengan menggunakan form dan objek control. III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK a. Form Form merupakan media interaksi antara pengguna dengan aplikasi yang dibuat. Form dapat dikatakan sebagai wadah atau penampung objek control yang akan digunakan. Form juga dapat dikatakan objek karena dapat memberikan reaksi saat menemui suatu kejadian. Form dapat dikategorikan menjadi 2 yaitu : 1. Form Dinamis Yaitu form yang dapat dimanipulasi atau diubah bentuk serta disisipi objek control yang berisi perintah-perintah yang diperlukan oleh aplikasi yang akan dibuat, contoh : - Window (Windows Form, Console, Class Library, WPF dsb.) - Web (ASP.Net Web Application, ASP.NET Web Servis dsb) - Smart Device (Smart Device Project) - Database(Access dan SQL Server) - Report (Report Aplication dan Crystal Report) - WCF (Windows Communication Foundation) - dll 2. Form Statis Yaitu form yang tidak dapat dimanipulasi atau diubah bentuk serta disisipi objek control. Form ini hanya dapat dipanggil melalui kode perintah, Contoh : SMK MUSDA PERBAUNGAN 6

MODUL : PEMROGRAMAN VISUAL 2019 a. Form Pesan (Messagebox) Form yang bertugas untuk menampilkan pesan keterangan terhadap suatu kejadian yang diterima oleh aplikasi. b. InputBox (Kotak Input Pesan) Form ini digunakan untuk interaksi antara pengguna dengan aplikasi yang dibuat, dimana pengguna tersebut memasukkan suatu nilai lalu mengklik suatu tombol dan menunggu efek yang ditimbulkan oleh aplikasi yang dibuat. b. Objek Kontrol No. Control/Objek Fungsi Properties Fungsi 1 Membuat keterangan Text Untuk mengedit text/tulisan 2 Menginput/memasukkan Nilai Text Untuk mengedit text/tulisan dan menginput nilai 3 Menjalankan proses Text Untuk mengedit text/tulisan 4 Memilih satu atau beberapa Text Untuk mengedit text/tulisan pilihan dengan cara memberi Checked Untuk menandai atau tidak Check atau contreng Ada 2 nilai: True (1) = menandai dan False (0) = tidak menandai 5 Memilih satu pilihan dari Text Untuk mengedit text/tulisan Checked Untuk menandai atau tidak Ada 2 nilai: True (1) = menandai dan False (0) = tidak menandai 6 Membuat Pilihan dengan cara Items Untuk membuat list/daftar dropdown 7 Membuat Gambar Image Untuk memasukkan Gambar SizeMode Untuk Mengatur Ukuran Gambar 8 Membuat Group Objek Text Untuk mengedit text/tulisan SMK MUSDA PERBAUNGAN 7

MODUL : PEMROGRAMAN VISUAL 2019 V. LANGKAH KERJA 1. Desain awal program 2. Atur Properties Masing-masing Objek sebagai berikut: NO. OBJEK PROPERTIES PENGATURAN 1 Form1 Text Project Modul-2 2 Label1 CONTOH PENGGUNAAN OBJEK Text PROGRAM 3 CheckBox1 Red 4 CheckBox2 ForeColor 9 5 RadioButton1 Font Size True 6 RadioButton2 Bold OOP 7 TextBox1 Text Chkoop Name VB Text Chkvb Name Benar Text Rdobenar Name Salah Text Rdosalah Name Txtoop Name SMK MUSDA PERBAUNGAN 8

8 TextBox2 Name MODUL : PEMROGRAMAN VISUAL 2019 9 TextBox3 Name 10 Button1 Text Txtvb Name Txtbs 11 Button2 Text Bersih Name Btnbersih Tutup Btntutup Tampilan program setelah pengaturan properties sebagai berikut: 3. Pemberian Perintah/Instruksi pada Program Alur Program: a. Jika diklik CheckBox1 (OOP), maka pada objek TextBox1 (Txtoop) akan tampil teks: “Object Oriented Programming” b. Jika diklik CheckBox2 (VB), maka pada objek TextBox2 (Txtvb) akan tampil teks: “Visual Basic” c. Jika diklik RadioButton1 (Benar), maka pada objek TextBox3 (Txtbs) akan tampil teks: “Anda memilih Benar” d. Jika diklik RadioButton2 (Salah), maka pada objek TextBox3 (Txtbs) akan tampil teks: “Anda memilih Salah” e. Jika diklik tombol Button1 (Bersih), maka: - tanda checklist pada OOP akan hilang. SMK MUSDA PERBAUNGAN 9

MODUL : PEMROGRAMAN VISUAL 2019 - tanda checklist pada VB akan hilang. - teks pada objek Txtoop, Txtvb dan Txtbs akan dihapus (kosong). f. Jika diklik tombol Button2 (Tutup), maka program akan ditutup (keluar dari program) Perintah Program: a. Perintah pada Objek CheckBox1 Private Sub chkoop_CheckedChanged(ByVal sender As System.Object,… txtoop.Text = \"Object Oriented Programming\" End Sub b. Perintah pada objek CheckBox2 Private Sub chkvb_CheckedChanged(ByVal sender As System.Object,… txtvb.Text = \"Visual Basic\" End Sub c. Perintah pada objek RadioButton1 Private Sub rdobenar_CheckedChanged(ByVal sender As System.Object,… txtbs.Text = \"Anda Memilih Benar\" End Sub d. Perintah pada objek RadioButton2 Private Sub RdoSalah_CheckedChanged(ByVal sender As System.Object,… txtbs.Text = \"Anda Memilih Salah\" End Sub e. Perintah pada objek Button1 Private Sub btnbersih_Click(ByVal sender As System.Object, … chkoop.Checked = 0 chkvb.Checked = 0 txtoop.Text = \"\" txtvb.Text = \"\" txtbs.Text = \"\" End Sub SMK MUSDA PERBAUNGAN 10

MODUL : PEMROGRAMAN VISUAL 2019 f. Perintah pada objek Button2 Private Sub btntutup_Click(ByVal sender As System.Object, … End End Sub Tampilan program setelah dijalankan sebagai berikut: Untuk menjalankan program, klik tombol Start Debugging atau tekan tombol F5 pada keyboard. Untuk menutup program, klik tombol Stop Debugging VI. TUGAS Tambah Perintah/Instruksi Program sebagai berikut: a. Jika diklik CheckBox1 (OOP), maka: - objek TextBox1 (Txtoop) akan menampilkan teks: “Object Oriented Programming” - warna teks biru. b. Jika diklik CheckBox2 (VB), maka: - objek TextBox2 (Txtvb) akan menampilkan teks: “Visual Basic” - warna background textbox kuning. c. Jika diklik tombol Button1 (Bersih), maka: - tanda checklist pada OOP akan hilang. SMK MUSDA PERBAUNGAN 11

MODUL : PEMROGRAMAN VISUAL 2019 - tanda checklist pada VB akan hilang. - teks pada objek Txtoop, Txtvb dan Txtbs akan dihapus (kosong). - warna background Textbox2 (Txtvb) kembali menjadi putih. SMK MUSDA PERBAUNGAN 12

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 3 I. JUDUL TIPE DATA, VARIABEL, KONSTANTA DAN OPERATOR II. TUJUAN - Memahami dan mengenal Tipe Data, Variabel, Konstanta dan Operator - Dapat membuat aplikasi sederhana dengan menggunakan Tipe Data, Variabel, Konstanta dan Operator. III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK a. Tipe Data Tipe data merupakan suatu bentuk penggolongan jenis data berdasarkan kategori data, ukuran dan kegunaan data yang dapat ditampung oleh sebuah variabel. Tipe data pada visual basic 2008 dapat dilihat pada table berikut ini : Tipe Data .Net Tipe Ukuran Jangkauan Decimal System.Decimal 12 Bytes 0 – 28 bilangan decimal Byte System.Byte 1 Bytes 0 – 255 Double System.Double 8 Bytes Bilangan negative antara : -1.79769313486232e+308 Long System.Int64 4 Bytes sampai -4.94065645841247E-324 Bilangan posotif antara : 4.94065645841247E-324 sampai 1.79769313486232e+308 -9.223.372.036.854.775.808 sampai 9.223.372.036.854.775.808 SMK MUSDA PERBAUNGAN 13

MODUL : PEMROGRAMAN VISUAL 2019 Single System.Single 4 Bytes Bilangan negative antara : -3.402823E sampai -1.401298E Integer System.Int32 4 Bytes Bilangan posotif antara : Boolean 1.401289E-45 sampai 3.402823e Date System.Boolean 2 Bytes -2.147.483.648 sampai - Short System.DateTime 2 Bytes 2.147.483.647 Char True or False String System.Int16 2 Bytes 1 Januari 0001 sampai 31 Object System.Char 2 Bytes Desember 9999 System.String 10 Bytes + (2 x -32.768 – 32.767 jumlah karakter 0 to 65535 System.Object 4 Bytes 0 sampai kira-kira 2 milyar karakter Unicode Semua Tipe, jenis Konversi Tipe Data Konversi Tipe data adalah sebuah fungsi yang digunakan untuk mengkonversi ( mengubah tipe dari satu tipe ke tipe data yang lain). Konversi tipe data dapat dilihat pada table berikut ini : Konversi Tipe Data Keterangan CInt Integer Integer cBool Boolean Nilai 0 false, selain 0 true cByte Byte Pembulatan nilai decimal cLng Long Pembulatan nilai decimal cCur Currency Money cShort Short Pembulatan nilai decimal cSng Single Pembulatan nilai decimal cDate Date DateTime CStr String Karakter Unicode cDbl Double cDec Decimal Bilangan decimal cObj Object Object SMK MUSDA PERBAUNGAN 14

MODUL : PEMROGRAMAN VISUAL 2019 b. Variabel Variabel adalah merupakan tempat penyimpanan data dalam memori computer yang mengandung data atau nilai sementara dari sebuah proses pada suatu pemrograman. Deklarasi Variabel Deklarasi Variabel adalah merupakan fungsi untuk mengenal suatu variabel berikut dengan tipe data yang pakai pada variabel tersebut. Pendeklarasian variabel di bagi menjadi dua kategori antara lain : 1. Deklarasi Ekplisit Suatu pendeklarasian umum yang sangat sering dilakukan dengan memberikan kata kunci as. Bentuk umum : {Private | Public | Dim | …} Nama_Var [{As Tipe data}] Contoh : Dim Nim as Integer Dim Nama as String 2. Deklarasi Emplisit Deklarasi Emplisit adalah suatu pendeklarasian yang tidak memberikan kata kunci As pada semua variabel tersebut. Melainkan memberikan satu karakter atau symbol di akhir variabel. Tabel symbol deklarasi emplisit. Karakter / Simbol Tipe Data % Integer $ String & Long @ Currency ! Single # Double Contoh : Dim NIM% ‘mewakili tipe data integer Dim Nama$ ‘ mewakili tipe data string SMK MUSDA PERBAUNGAN 15

MODUL : PEMROGRAMAN VISUAL 2019 Ruang Lingkup Variabel Ruang lingkup variabel sangat mempengaruhi sampai dimana nama variabel tersebut dapat dikenali oleh aplikasi. Ruang Lingkup Variabel dapat digolongkan menjadi : 1. Local Variabel Local variabel merupakan suatu pendeklarasian variabel di dalam ruang lingkup objek saja. Tidak dapat digunakan di dalam objek lain. 2. Global Variabel Global variabel adalah merupakan suatu pendeklarasian variabel tidak hanya di dalam ruang lingkup objek saja. Tetapi mencakup semua presedure dan objek. c. Konstanta Konstanta merupakan suatu variabel yang mempunyai nilai tetap dan tidak dapat diubah nilainya. Deklarasi Konstanta Deklarasi konstanta : {Const} Nama_Var [{AS tipedata}]=<nilai> Contoh : Const nama_bidang as string=”persegi_panjang” Public const Panjang As Integer=8 Private const Lebar As Integer=5 Private const luas As Integer=Panjang*Lebar Private const Keliling As Integer=2*(Panjang+Lebar) Deklarasi Konstanta Enumerasi Deklarasi Konstanta Enumerasi merupakan pendeklarasian daftar konstanta yang bersipat global . Dengan deklarasi konstanta enumerasi dapat membuat daftar konstanta sendiri dapam bentuk seperti modul kelas dan dapat diakses oleh projek lain. Format penulisannya : {Private | Public | …. }[enum] Nama_Variabel_konstanta SMK MUSDA PERBAUNGAN 16

MODUL : PEMROGRAMAN VISUAL 2019 Contoh : Const nama_bidang as string=”persegi_panjang” Private const Panjang As Integer=8 Private const Lebar As Integer=5 Private const luas As Integer=Panjang*Lebar Private const Keliling As Integer=2*(Panjang+Lebar) Public enum Hitung Luas = Luas Keliling=Keliling end Enum A=Hitung.Luas ‘menggunakan variabel enum luas B=Hitung.Kelilin ‘ menggunakan variabel enum keliling d. Operator Operator Aritmatika Operator Aritmatika adalah merupakan suatu operator perhitungan matematika yang digunakan untuk proses perhitungan matematika. Operator aritmatika dapat dilihat pada table berikut ini : Operator Fungsi + Penjumlahan - Pengurangan * Perkalian / Pembagian Mod Sisa hasil pembagian ^ Perpangkatan Operator Perbandingan Operator perbandingan adalah merupakan suatu operator yang menyatakan suatu kondisi itu benar atau salah. Operator perbandingan dapat dilihat pada table berikut ini : SMK MUSDA PERBAUNGAN 17

Operator MODUL : PEMROGRAMAN VISUAL 2019 <> < Fungsi > Tidak sama dengan >= Lebih kecil <= Lebih besar Like Lebih besar sama dengan Is Lebih kecil sama dengan Ciri yang sama Keterangan Operator Logika Operator Logika adalah merupakan suatu operator yang dapat membandingkan dua ekspresi atau lebih data logika (Boolean) dan menghasilkan data logika (Boolean) baru. Operator logika dapat dilihat pada table berikut ini: Operator Fungsi NOT Tidak AND Dan OR Atau XOR Ekslusif atau Operator Penugasan Operator penugasan adalah merupakan operator yang bertugas untuk menentukan nilai yang dikeluarkan oleh suatu variabel terhadap kondisi tertentu. Operator Fungsi = Sama dengan Operator Penggabungan (Concatenation) Operator Penggabungan adalah merupakan suatu operator yang dapat digunakan untuk menggabungkan dua buah string atau lebih. Operator Penggabungan dapat dilihat pada table berikut ini : SMK MUSDA PERBAUNGAN 18

MODUL : PEMROGRAMAN VISUAL 2019 Operator Fungsi + Plus & Dan V. LANGKAH KERJA Contoh Program: 1. Desain program 2. Pengaturan Properties PROPERTIES PENGATURAN NO. OBJEK Text OPERASI MATEMATIKA 1 Label1 Font Size 9 Bold True 2 Label2 Text Bilangan 1 : 3 Label3 Text Bilangan 2 : 4 Label4 Text Hasil : 5 Label5 Text OPERATOR Bold True 6 TextBox1 Name txtbil1 SMK MUSDA PERBAUNGAN 19

7 TextBox2 Name MODUL : PEMROGRAMAN VISUAL 2019 8 TextBox3 Name 9 Button1 Text txtbil2 Size Txthasil 10 Button2 Name ^ Text 10 11 Button3 Size Btnpangkat 12 Button4 Name * Text 10 13 Button5 Name Btnkali Text / 14 Button6 Size Btnbagi 15 Button7 Name + Text 9 Size Btntambah Name - Text 10 Name Btnkurang Text Bersih Name Btnbersih Tutup Btntutup 3. Pemberian Perintah/Instruksi pada Program Alur Program:  Input Bilangan1 dan Bilangan2  Klik salah satu tombol Operator, maka akan tampil hasil perhitungan sesuai operator. - Tombol ^ : untuk memangkatkan - Tombol * : untuk mengalikan - Tombol / : untuk membagi - Tombol + : untuk menambahkan - Tombol - : untuk mengurangkan  Klik tombol Bersih, maka isi Bilangan1, Bilangan2 dan Hasil akan bersih (kosong). SMK MUSDA PERBAUNGAN 20

MODUL : PEMROGRAMAN VISUAL 2019  Klik tombol Tutup, maka program akan ditutup. Perintah Program: Private Sub btnpangkat_Click(ByVal sender As System.Object, txthasil.Text = txtbil1.Text ^ txtbil2.Text End Sub Private Sub btnkali_Click(ByVal sender As System.Object, txthasil.Text = txtbil1.Text * txtbil2.Text End Sub Private Sub btnbagi_Click(ByVal sender As System.Object, txthasil.Text = txtbil1.Text / txtbil2.Text End Sub Private Sub btntambah_Click(ByVal sender As System.Object, txthasil.Text = Val(txtbil1.Text) + txtbil2.Text End Sub Private Sub btnkurang_Click(ByVal sender As System.Object, txthasil.Text = txtbil1.Text - txtbil2.Text End Sub Catatan: Val : berfungsi untuk mengubah tipe data string menjadi Numeric. SMK MUSDA PERBAUNGAN 21

MODUL : PEMROGRAMAN VISUAL 2019 VI. TUGAS Buat program untuk menghitung Luas dan Keliling Persegi Panjang dengan tampilan sbb: SMK MUSDA PERBAUNGAN 22

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 4 I. JUDUL PERCABANGAN II. TUJUAN - Memahami dan mengenal Pencabangan (if … then dan Select Case ….) - Dapat membuat aplikasi sederhana dengan menggunakan Pencabangan (if … then dan Select Case …) III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 r IV. MATERI POKOK a. Percabangan Percabangan adalah merupakan perintah yang dapat memberikan pilihan suatu kondisi, program akan menjalankan perintah apabila suatu kondisi memenuhi syarat tertentu. Percabangan dapat dibedakan menjadi :  IF … THEN If … then merupakan percabangan yang mempunyai satu percabangan atau satu blok perintah. Format penulisannya : If kondisi then [perintah] End if  IF … THEN … ELSE Suatu perintah percabangan bersarang (Nested If) yang merupakan perkembangan dari perintah percabangan IF.. THEN, yang dapat menjalankan satu blok perintah, yang memiliki dua nilai atau syarat bahkan lebih yang akan diuji untuk menjalankan sautu kondisi tertentu. SMK MUSDA PERBAUNGAN 23

MODUL : PEMROGRAMAN VISUAL 2019 Bila kondisi pertama benar maka jalankan perintah blok pertama, jika kondisi pertama salah maka jalankan perintah blok kedua dan selanjutnya. Format Penulisannya : IF (kondisi) then [perintah] ELSE [perintah] End if Dan If (kondisi2) then [perintah] ELSEIF (kondisi2) Then [perintah] … ELSE [perintah] End If  Select … Case … Select Case adalah control percabangan yang mempunyai fungsi hampir sama dengan percabangan if … then… else. Select mempunyai penulisan dan pembacaan yang lebih mudah, efektif dan efesien. Namun mempunyai kelemahan yaitu tida dapat menguji lebih dari satu ekspresi atau unkapan. Format penulisannya adalah sebagai berikut : Select Case kondisi 24 Case | Case is = ekspresi1 [perintah1] Case | Case is = ekspresi2 [perintah2] Case | Case is = ekspresi3 [perintah3] SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 … Case Else [perintah] End Select V. LANGKAH KERJA Program-1 1. Desain Program Objek Name TextBox1 TxtNilai TextBox2 TxtHasil Button1 BtnProses 2. Alur Program 25 - Input Nilai - Klik Proses, maka akan tampil keterangan “LULUS” atau “GAGAL” pada Hasil. Pengujiannya sebagai berikut: Jika Nilai 75 keatas maka “LULUS” Jika Nilai dibawah 75 maka “GAGAL” 3. Kode Program Kode program diketik pada Objek Button1 (Proses) sbb: Private Sub BtnProses_Click(ByVal sender As System.Object,… If TxtNilai.Text >= 75 Then TxtHasil.Text = \"LULUS\" Else TxtHasil.Text = \"GAGAL\" End If End Sub SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 Program-2 1. Menggunakan Program-1, tetapi Alur Program diubah sebagai berikut: - Input Nilai - Klik Proses, maka akan tampil keterangan “LULUS” / “DAFTAR PENGGANTI” / “GAGAL” pada hasil. Pengujiannya sebagai berikut: Jika Nilai 85 keatas maka “LULUS” Jika Nilai 75 - 84 maka “DAFTAR PENGGANTI” Jika Nilai dibawah 75 maka “GAGAL” 2. Kode Program Kode program diketik pada Objek Button1 (Proses) sbb: Private Sub BtnProses_Click(ByVal sender As System.Object,… If TxtNilai.Text >= 85 Then TxtHasil.Text = \"LULUS\" ElseIf TxtNilai.Text >= 75 Then TxtHasil.Text = \"DAFTAR PENGGANTI\" Else TxtHasil.Text = \"GAGAL\" End If End Sub Program-3 26 Penggunaan Objek ComboBox Objek ComboBox digunakan untuk membuat daftar pilihan. Untuk memasukkan daftar pilihan ada 2 cara: (1) menggunakan properties yaitu items Klik properties items, kemudian ketik daftar pilihan. (2) menggunakan kode program BP. : NamaObjekComboBox.Items.Add(“Daftar Pilihan“) SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 1. Desain Program sbb: No Objek Name Items 1 1 ComboBox1 Cbokb PL01 2 3 4 PL02 BK01 BK02 2 TextBox1 TxtNb 3 TextBox2 TxtHb 4 Button1 BtnTutup 2. Alur Program - Pilih (klik) salah satu Kode Barang pada objek ComboBox, maka akan tampil Nama Barang dan Harga Barang. Tabel Pengujiannya sebagai berikut: Kode Barang Nama Barang Harga Barang PL01 Pulpen Pilot 2500 PL02 Pulpen Standar 2000 BK01 Buku AA 50 Lbr 3500 BK02 Buku Sinar Dunia 50 Lbr 3000 3. Kode Program Perintah diketik pada Objek ComboBox. Private Sub CboKb_SelectedIndexChanged(ByVal sender As… If Cbokb.Text = \"PL01\" Then TxtNB.Text = \"PULPEN PILOT\" TxtHB.Text = 2500 ElseIf Cbokb.Text = \"PL02\" Then TxtNB.Text = \"PULPEN STANDAR\" TxtHB.Text = 2000 ElseIf Cbokb.Text = \"BK01\" Then TxtNB.Text = \"BUKU AA 50 LBR\" TxtHB.Text = 3500 Else SMK MUSDA PERBAUNGAN 27

MODUL : PEMROGRAMAN VISUAL 2019 TxtNB.Text = \"BUKU SINAR DUNIA 50 LBR\" TxtHB.Text = 3000 End If End Sub Program-4 1. Desain Program Objek Name TextBox1 TxtJPR TextBox2 TxtHadiah Button1 BtnProses Button2 BtnBersih Button3 BtnTutup 2. Alur Program - Input Jumlah Point Reward. - Klik Proses, maka akan tampil keterangan Hadiah sesuai point reward. Tabel Hadiah sebagai berikut: Point Reward Hadiah 500 – 1000 Mug Cantik 1001 – 1500 Boneka Cantik 1501 – 2000 Kipas Angin 2001 – 2500 Dispenser 3. Kode Program Kode program diketik pada Objek Button1 (Proses) sbb: Private Sub BtnProses_Click(ByVal sender As System.Object, ... 28 Select Case Val(TxtJPR.Text) Case Is <= 1000 TxtHadiah.Text = \"Mug Cantik\" SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 Case Is <= 1500 TxtHadiah.Text = \"Boneka Cantik\" Case Is <= 2000 TxtHadiah.Text = \"Kipas Angin\" Case Is <= 2500 TxtHadiah.Text = \"Dispenser\" Case Else TxtHadiah.Text = \"Tidak Ada\" End Select End Sub VI. TUGAS Ubah tampilan program menjadi sbb: Buat kode program pada tombol Proses yang jika diklik akam menampilkan Nilai Total Harga dengan menginput Jumlah terlebih dahulu. SMK MUSDA PERBAUNGAN 29

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 5 I. JUDUL PERULANGAN II. TUJUAN - Memahami dan mengenal Perulangan (For … Next, While, Do While) - Dapat membuat aplikasi sederhana dengan menggunakan Perulangan (For … Next, While, Do While) III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK PERULANGAN Perintah perulangan adalah merupakan control perulangan yang berfungsi untuk melakukan perulangan (iterasi) dari suatu blok program secara berulang-ulang. For … Next For … Next merupakan suatu control perulangan yang mempunayi nilai tetap, jumlah perulangan telah diketahui sebelumnya. Format penulisannya adalah sebagai berikut : For Counter=niali_awal to nilai_akhir [ Perintah ] Next (Counter) For Each … In … Next Merupakan suatu control yang digunakan untuk perulangan yang jumlah pengulangannya sesuai dengan jumlah elemen dari suatu koleksi objek dan biasanya tidak diketahui dengan pasti berapa jumlahnya. Koleksi merupakan kumpulan data atau objek yang didefinisikan dengan kode program. SMK MUSDA PERBAUNGAN 30

MODUL : PEMROGRAMAN VISUAL 2019 Format Penulisannya : For Each elemen In Group [ Perintah ] [ Perintah ] Next [elemen] While … While merupakan suatu control perulangan yang berfungsi untuk melakukan perulangan yang memiliki satu syarat tertentu. Dan akan terus dijalankan selama syarat tersebut terpenuhi dan begitupun sebaliknya jika syarat tidak terpenuhi maka pernyataan tidak akan dijalankan. Format Penulisannya : While (kondisi) [perintah1] [perintah2] … End While DO While … LOOP Merupakan suatu control perulangan yang melakukan perulangan terlebih dahulu dan bentuk pengujian dilakukan belakangan atau sebaliknya. Format penulisannya : DO While (kondisi) [perintah1] [Exit Do] [perintah2] SMK MUSDA PERBAUNGAN 31

MODUL : PEMROGRAMAN VISUAL 2019 LOOP Bentuk 2 DO [perintah1] [Exit Do] [perintah2] LOOP While (kondisi) DO UNTIL Jika Do While melakukan perulangan selama kondisi memenuhi until akan melakukan perulangan hingga kondisi memenuhi. Selama kondisi tidak memenuhi, loop akan dijalankan terus. Format penulisannya : DO [perintah1] LOOP UNTIL V. LANGKAH KERJA Perulangan FOR 1. Desain Tampilan : SMK MUSDA PERBAUNGAN 32

MODUL : PEMROGRAMAN VISUAL 2019 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: Object Properties Nilai Form1 Name Form1 Text Perulangan FOR Label1 Text Tgl/Bln/Thn ComboBox1 Name CmbTgl ComboBox2 Name CmbBln ComboBox3 Name CmbThn 3. Klik ganda pada Form1, kemudian ketikkan kode program berikut ini : Dim tgl, bln, thn As Integer For tgl = 1 To 31 cmbTgl.Items.Add(tgl) Next tgl For bln = 1 To 12 cmbBln.Items.Add(bln) Next bln For thn = 1900 To 9999 CmbThn.Items.Add(thn) Next thn 4. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 5. Simpan aplikasi Anda. SMK MUSDA PERBAUNGAN 33

MODUL : PEMROGRAMAN VISUAL 2019 Perulangan WHILE 1. Desain Tampilan : 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: Object Properties Nilai Form1 Name Form1 Text Perulangan WHILE Label1 Text Batas Label2 Text Tampilkan TextBox1 Name TxtBatas ListBox1 Name ListBox1 Button1 Name Button1 Text Proses 3. Klik ganda pada Proses, kemudian ketikkan kode program berikut ini : Dim angka As Integer 34 ListBox1.Items.Clear() angka = 1 SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 While angka <= Val(TxtBatas.Text) ListBox1.Items.Add(angka) angka = angka + 1 End While 4. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 5. Simpan aplikasi Anda. Perulangan DO WHILE…LOOP 1. Desain Tampilan: 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: 3. Object Properties Nilai Form1 Name Form1 Text Perulangan DO WHILE … LOOP Label1 Text Angka TextBox1 Name TxtAngka Button1 Name Button1 Text Proses SMK MUSDA PERBAUNGAN 35

MODUL : PEMROGRAMAN VISUAL 2019 4. Klik ganda pada Proses, kemudian ketikkan kode program berikut ini : Dim X% X = TxtAngka.Text Do X = X Mod 2 If X = 0 Then MsgBox(\"Bilangan Genap\") Exit Do ElseIf X = 1 Then MsgBox(\"Bilangan Ganjil\") Exit Do End If Loop While Not X 5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 6. Simpan aplikasi Anda. Perulangan FOR EACH … IN…NEXT 1. Desain Tampilan : 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: SMK MUSDA PERBAUNGAN 36

Object Properties MODUL : PEMROGRAMAN VISUAL 2019 Form5 Name Text Nilai Button1 Name Form5 Text Perulangan FOR EACH … IN…NEXT Button2 Name Button1 Text Button1 Button3 Name Button2 Text Button2 Proses Button3 3. Klik ganda pada Proses, kemudian ketikkan kode program berikut ini : For Each ctrl In Controls ctrl.Text = \"Tombol\" Next 4. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 5. Simpan aplikasi Anda. SMK MUSDA PERBAUNGAN 37

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 6 I. JUDUL ARRAY II. TUJUAN - Memahami dan mengenal Array (array satu dimensi dan array multi dimensi) - Dapat membuat aplikasi sederhana dengan menggunakan array satu dimensi dan array multi dimensi III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK Array adalah sekumpulan data yang memiliki tipe yang sama, sejumlah tetap, serta disusun secara terstruktur dan disimpan dalam satu variabel yang sama, dan diurutkan dengan index. Array Satu Dimensi Suatu array yang nilai dan ukurannya yang sudah ditentukan terlebih dahulu, dan memiliki satu dimensi. Bentuk Umum : Dim Array[indeks] As Tipe_Data Contoh : Dim Arr(2) As String Arr(0) = TxtNis.Text Arr(1) = TxtNama.Text Arr(2) = TxtKelas.Text Array Multi Dimensi SMK MUSDA PERBAUNGAN 38

MODUL : PEMROGRAMAN VISUAL 2019 Suatu array yang fungsinya hampir sama dengan array satu dimensi hanya saja pada array multi dimensi ini mewakili nilai table yang terdiri dari informasi yang diatur dalam baris dan kolom. Untuk mendefenisikan elemen table tertentu, kita harus menentukan dua indeks, pertama mengidentifikasi elemen baris dan yang mengidentifikasi elemen kolom. Array multidimensi memiliki lebih dari dua dimensi. Bentuk Umum : Dim Array[indeks,Indeks] As Tipe_Data Dim Array[indeks,indeks,indeks] As Tipe_Data Contoh : Dim Arr(3, 1) As String Arr(0, 0) = \"NIS\" Arr(0, 1) = \"NAMA\" Arr(1, 0) = \"PAKET KEAHLIAN\" Arr(1, 1) = \"PRODI\" Arr(2, 0) = \"Laki-laki\" Arr(2, 1) = \"Perempuan\" Arr(3, 0) = \"Rekayasa Perangkat Lunak\" Arr(3, 1) = \"Teknik Komputer dan Jaringan\" V. LANGKAH KERJA Array Satu Dimensi 1. Desain Tampilan form seperti gambar berikut ini : SMK MUSDA PERBAUNGAN 39

MODUL : PEMROGRAMAN VISUAL 2019 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: Object Properties Nilai Form1 Name Form1 Text Array Satu Dimensi Label1 Text NIS Label2 Text Nama Label3 Text P TexBox1 Name TxtNIS TexBox2 Name TxtNama TexBox3 Name TxtPaket ListView1 Name ListView1 Button1 Name BtnTambah Text Tambah 3. Klik ganda pada Form Load, kemudian ketikkan kode program berikut ini : ListView1.GridLines = True ListView1.View = View.Details ListView1.Columns.Add(\"NIS\") ListView1.Columns.Add(\"NAMA\", 115) ListView1.Columns.Add(\"PAKET\", 110) TxtNim.Text = 1 TxtNama.Focus() 4. Klik ganda pada BtnTambah, kemudian ketikkan kode program berikut ini : Dim Arr(2) As String Arr(0) = TxtNis.Text Arr(1) = TxtNama.Text Arr(2) = TxtPaket.Text Dim listitem As ListViewItem 40 listitem = New ListViewItem listitem = ListView1.Items.Add(Arr(0)) SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 listitem.SubItems.Add(Arr(1)) listitem.SubItems.Add(Arr(2)) TxtNis.Text = TxtNim.Text + 1 TxtNama.Text = \"\" TxtPaket.Text = \"\" TxtNama.Focus() 5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 6. Simpan aplikasi Anda. Array Multi Dimensi 1. Desain Tampilan form seperti gambar berikut ini : 2. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: Object Properties Nilai Form1 Name Form1 Text Array Multi Dimensi Label1 Text NIS Label2 Text Nama Label3 Text Jenis Kelamin SMK MUSDA PERBAUNGAN 41

Label4 Text MODUL : PEMROGRAMAN VISUAL 2019 TexBox1 Name TexBox2 Name Paket Keahlian Combo1 Name TxtNIS Combo2 Name TxtNama ListView1 Name CmbKelamin Button1 Name CmbPaket Text ListView1 BtnProses Proses 3. Klik ganda pada Form Load, kemudian ketikkan kode program berikut ini : Dim Arr(3, 1) As String Arr(0, 0) = \"NIS\" Arr(0, 1) = \"NAMA\" Arr(1, 0) = \"JENIS KELAMIN\" Arr(1, 1) = \"PAKET KEAHLIAN\" Arr(2, 0) = \"Laki-laki\" Arr(2, 1) = \"Perempuan\" Arr(3, 0) = \"Rekayasa Perangkat Lunak\" Arr(3, 1) = \"Teknik Komputer dan Jaringan\" ListView1.GridLines = True ListView1.View = View.Details For Baris = 0 To 1 For Kolom = 0 To 1 ListView1.Columns.Add(Arr(Baris, Kolom), 100) Next Kolom Next Baris For Baris = 2 To 2 42 For Kolom = 0 To 1 CmbKelamin.Items.Add(Arr(Baris, Kolom)) Next Kolom SMK MUSDA PERBAUNGAN

MODUL : PEMROGRAMAN VISUAL 2019 Next Baris For Baris = 3 To 3 For Kolom = 0 To 1 CmbProdi.Items.Add(Arr(Baris, Kolom)) Next Kolom Next Baris 4. Klik ganda pada BtnProses, kemudian ketikkan kode program berikut ini : Dim Arr(3) As String Arr(0) = TxtNIS.Text Arr(1) = TxtNAMA.Text Arr(2) = CmbKelamin.Text Arr(3) = CmbPaket.Text Dim listitem As ListViewItem listitem = New ListViewItem listitem = ListView1.Items.Add(Arr(0)) listitem.SubItems.Add(Arr(1)) listitem.SubItems.Add(Arr(2)) listitem.SubItems.Add(Arr(3)) TxtNIS.Text = TxtNIS.Text + 1 TxtNAMA.Text = \"\" CmbKelamin.Text = \"\" CmbPaket.Text = \"\" TxtNAMA.Focus() 5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. 6. Simpan aplikasi Anda. SMK MUSDA PERBAUNGAN 43

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 7 I. JUDUL MESSAGEBOX II. TUJUAN - Memberikan pemahaman tentang penggunaan MessageBox - Dapat membuat aplikasi sederhana dengan menggunakan MessageBox III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK Messagebox Berfungsi untuk menampilkan pesan atau komentar dalam bentuk form. Bentuk Perintah MsgBox(“Isi Pesan“, MsgBoxStyle, “Judul Pesan“)     Keterangan gambar:  Judul Pesan  MsgBoxStyle  Isi Pesan Ada beberapa MsgBoxStyle, yaitu: : tombol OK dan gambar icon Critical 1. MsgBoxStyle.Critical (16) SMK MUSDA PERBAUNGAN 44

MODUL : PEMROGRAMAN VISUAL 2019 2. MsgBoxStyle.Question (32) : tombol OK dan gambar icon Question 3. MsgBoxStyle.Exclamation (48) : tombol OK dan gambar icon Exclamation 4. MsgBoxStyle.Information (64) : tombol OK dan gambar icon Information 5. MsgBoxStyle.AbortRetryIgnore (2) : tombol Abort, Retry dan Ignore. 6. MsgBoxStyle.OkCancel (1) : tombol OK dan Cancel. 7. MsgBoxStyle.OkOnly (0) : tombol OK. 8. MsgBoxStyle. RetryCancel (5) : tombol Retry dan Cancel. 9. MsgBoxStyle.YesNo (4) : tombol Yes dan No. 10. MsgBoxStyle. YesNoCancel (3) : tombol Yes, No dan Cancel. V. LANGKAH KERJA Program-1 Membuat Form Login dengan tampilan sbb: Objek Name TextBox1 TxtPas Button1 BtnProses Alur Program: - Input Password. - Klik Proses - Jika Password benar maka akan tampil kotak pesan (MessageBox) dengan tampilan sbb:  Isi pesan : Password yang Anda Masukkan Benar  Judul Pesan : Info  MsgBoxStyle : Tombol OK dengan gambar icon Information. - Jika Password salah maka akan tampil kotak pesan (MessageBox) dengan tampilan sbb:  Isi pesan : Password yang Anda Masukkan Salah”  Judul Pesan : Info  MsgBoxStyle : Tombol OK dengan gambar icon Critical. SMK MUSDA PERBAUNGAN 45

MODUL : PEMROGRAMAN VISUAL 2019 Kode Program: Kode program diketik pada Objek BtnProses (Tombol Proses) sbb: Private Sub BtnProses_Click(ByVal sender As System.Object, ... If TxtPas.Text = \"rahasia\" Then MsgBox(\"Password yang Anda Masukkan Benar\", MsgBoxStyle.Information, \"Info\") Else MsgBox(\"Password yang Anda Masukkan Salah\", 16, \"Info\") End If End Sub Program-2: Tambah tombol Tutup pada form Login, sehingga tampilan form menjadi seperti berikut: Buat Perintah untuk Tombol Tutup menggunakan MessageBox dengan tampilan sbb: - Isi Pesan : “Apakah Anda ingin menutup Program ini?“ - MsgBoxStyle : Yes dan No dengan icon Question. - Judul : “Tutup Program“ Alur Program: Jika diklik tombol Yes, maka Program akan ditutup. Jika diklik tombol No, maka Program tidak akan ditutup. SMK MUSDA PERBAUNGAN 46

MODUL : PEMROGRAMAN VISUAL 2019 Perintah Program: Private Sub BtnTutup_Click(ByVal sender As System.Object, ... Dim pesan As String pesan = MsgBox(\"Apakah Anda ingin menutup Program ini?\", MsgBoxStyle.YesNo + 32, \"Tutup Program\") If pesan = vbYes Then End Else Exit Sub End If End Sub SMK MUSDA PERBAUNGAN 47

MODUL : PEMROGRAMAN VISUAL 2019 VI. TUGAS Buat Program Untuk Menampilkan Informasi Hadiah sesuai Point Reward dengan Menggunakan MessageBox. 1. Desain Program Sebagai Berikut: Objek Name TextBox1 TxtJPR Button1 BtnProses Button2 BtnTutup 2. Alur Program - Input Jumlah Point Reward. - Klik Proses, maka akan tampil keterangan Hadiah sesuai point reward pada MessageBox. Tabel Hadiah sebagai berikut: Point Reward Hadiah 500 – 1000 Mug Cantik 1001 – 1500 Boneka Cantik 1501 – 2000 Kipas Angin 2001 – 2500 Dispenser - Klik Tutup, maka akan tampil MessageBox dengan dengan tampilan sbb:  Isi Pesan : Anda ingin menutup Program ini?  MsgBoxStyle : OK dan Cancel dengan icon Question.  Judul : Tutup Program Jika diklik tombol OK, maka Program akan ditutup. Jika diklik tombol Cancel, maka Program tidak akan ditutup. SMK MUSDA PERBAUNGAN 48

MODUL : PEMROGRAMAN VISUAL 2019 MODUL 8 I. JUDUL PROCEDURE, FUNCTION DAN MODULE II. TUJUAN - Memahami dan mengenal Procedure, function dan modul - Dapat membuat aplikasi sederhana dengan menggunakan Procedure, function dan modul III. ALAT DAN BAHAN - Laptop / PC - Microsoft Visual Basic 2008 IV. MATERI POKOK Sejauh ini, anda telah menuliskan sub procedure yang dibuat secara otomatis pada saat menggunakan event . Sub procedure merupakan blok kode yang mempunyai nama dan berisi perintah yang dapat dipanggil suatu waktu. Artinya, hanya sekali dibuat yang kemudian di panggil berkali-kali sesuai dengan kebutuhan. Bentuk Umum : [Private|Public] Sub subname[(argumentlist)] Statements End sub Sub Procedure dapat dipanggil dengan perintah : [call] subname[(argumentlist)] Keterangan : Sub procedure (Procedure) sebaiknya menggunakan kata kerja (verb) Pemanggilan procedure yang masih dalam satu kelas (class) atau modul (module) dapat dilakukan dengan kata kunci Me. SMK MUSDA PERBAUNGAN 49