Mata Kuliah : Pemrograman Bisnis I (VB.NET) Minggu : VIII Pokok Bahasan :
Writting Procedure and Function
Sub Pokok Bahasan :
Subroutin/Procedure Function Scope
Subroutin/Procedure Penulisan program pada VB.NET dilakukan dengan blok-blok komponen, yaitu sekelompok kode yang membentuk satuan tertentu. Kelompok-kelompok program seperti ini dibuat dengan Prosedur. Setiap kali suatu prosedur dipanggil, maka rutin program yang berada diantara judul prosedur dan akhir prosedur akan dieksekusi. Secara garis besar ada dua keuntungan yang bisa diperoleh dari pemakaian prosedur yaitu : 1. Program terbagi menjadi komponen-komponen yang mandiri. Dengan demikian program menjadi lebih terstruktur sehingga pencarian kesalahan dapat lebih mudah dilakukan. 2. Prosedur yang terletak dalam suatu program dapat dipakai berulangulang sesuai dengan kebutuhan. Pada VBNET terdapat 3 macam prosedur yaitu sub procedure, Function procedure dan property procedure. Ketiga macam prosedur ini mempunyai ciri tersendiri sesuai dengan fungsinya.
1. Sub Procedure Sub Procedure adalah suatu blok perintah yang dijalankan sebagai tanggapan atas terbentuknya kejadian (Event) dan tidak akan mengembalikan nilai. Bentuk penulisan dari sub prosedure adalah : [Private] [Public] [Static] Sub nama procedure (Parameter) .
.
. Blok perintah .
.
.
End Sub Parameter merupakan daftar nama data (variabel) yang dipergunakan pada prosedur tersebut dan mirip dengan pendeklarasian variabel. Pembuatan sub procedure adalah public, kecuali bila dideklarasikan yang lain. Pemanggilan Sub procedure harus dilakukan melalui pernyataan tersendiri (baris terpisah), dengan cara sebagai berikut :
Call Nama Prosedur (parameter1,parameter2) atau Nama Prosedur parameter1, parameter2 Mungkin anda bertanya-tanya, jika suatu prosedur dapat langsung dipanggil dengan namanya, mengapa harus digunakan pernyataan Call, Anda akan sedikit rancu dalam membedakan mana prosedur dan mana yang variabel. Jadi meskipun pernyataan call boleh tidak digunakan, ada baiknya anda tetap menuliskannya untuk mempermudah pembacaan alur pemrograman.
Desain Form seperti ini Buat prosedur Bersih untuk mengosongkan kotak isian alas,tinggi dan luas. Contoh :
Nama Prosedur
Sub bersih() TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" End Sub Panggil prosedur Bersih pada tombol mulai event click. Contoh : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Pemanggilan prosedur Call bersih() End Sub
Blok Perintah
2. Function Prosedur Function adalah prosedur yang menghasilkan nilai balik (return Value). Nilai Balik ini akan akan dikembalikan pada blok perintah yang memanggil prosedur function. Pendeklarasian Prosedur Function Sintaks pendeklarasian prosedur function adalah sebagai berikut : [Private] [Public] [Static] Function Nama (Parameter) [As Tipe] .
. . Blok Perintah . . .
End Function Sebuah Function Procedure dapat dipanggil dengan menggabungkan pernyataan lain, seperti contoh berikut ini Variabel = nama Function Procedure
Cara lain untuk memanggil sebuah fungsi dapat dilakukan seperti kalau memanggil sub prosedur yaitu : Call NamaFunctionProcedure [Parameter] Atau NamaFunctionProcedure (Parameter) Contoh : Buat Function procedure untuk menghitung luas segitiga dimana data-data alas,tinggi diinput dari kotak isian (textbox) pada form diatas. Nama Function Parameter Function luas(ByVal tinggi, ByVal alas) luas = (alas * tinggi) / 2 End Function Blok Perintah
Panggil function tersebut pada tombol event Click
Kode Pemanggilannya adalah sebagai berikut Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox3.Text = luas(TextBox2.Text, TextBox1.Text) End Sub
Variabel
Function
Terdapat tiga perbedaan antara Sub Procedure dengan Function Procedure yaitu :
FUNCTION PROCEDURE
SUB PROCEDURE
Memiliki data dengan Tipe tertentu seperti variabel
Tidak memiliki tipe data
Nilai yang diberikan pada Nilai yang diberikan pada prosedure akan diolah dan prosedur akan digunakan dihasilkan nilai baru untuk untuk prosedur itu sendiri. dipakai oleh ekspresi diluar fungsi. Suatu Fungsi dipanggil dengan menuliskan pada sisi kanan operator penugasan (tanda =). Sedang pada sisi kiri bisa dituliskan ekspresi yang sesuai dengan kode yang digunakan
Karena pada sub procedure tidak membawa nilai, tidak ada parameter yang perlu dituliskan.
Keluar dari Procedure Function Untuk keluar dari Prosedur Function, cara yang digunakan adalah sama dengan keluar dari prosedure Sub, yaitu dengan Exit. Contoh : Function Luas(alas,tinggi) if alas < 0 and tinggi < 0 then exit Sub else luas = (alas * tinggi) / 2 End if
Property Procedure Pada VBNET terdapat tiga macam PropertyProcedure Yaitu : • Property Let Property ini digunakan untuk mengatur nilai pada properti • Property Get Property ini digunakan untuk mengembalikan nilai pada properti • Property Set Property ini digunakan untuk mengatur referensi pada Objek. Bentuk penulisan dari masing-masing property Procedure seperti berikut : [Private] [Public] [Static] Property {Get|Let|Set} Nama Property (Parameter) [ as type) . . . Blok Perintah . . . End Property
Built In Procedure Pada VB NET terdapat prosedur yang sudah tersedia (Built In) contoh Msgbox, Input Box. Kedua prosedur ini digunakan untuk berinteraksi dengan pengguna. Untuk prosedur Msgbox sudah dibahas pada sessi sebelumnya. InputBox InputBox digunakan untuk menampilkan kotak dialog yang meminta masukan dari pengguna. Sintaks penggunaan inputBox adalah : Variabel = InputBox(pesan,[judul],[default],[xpos],[Ypos],[FileHelp],[konteks] • Variabel adalah Variabel yang akan menyimpan masukan dari pengguna. Pesan adalah teks yang akan ditampilkan pada kotak dialog penulisannya harus menggunakan tanda kutip (“”) • Judul adalah teks yang akan ditampilkan pada balok judul kotak dialog penulisannya harus menggunakan tanda kutip (“”) • Default adalah nilai yang dihasilkan jika tidak ada masukan dari pengguna. Nilai tersebut akan tertulis pada kotak dialog. Penulisannya harus menggunakan tanda kutip (“”)
• XPos dan Ypos adalah koordinat pada posisi kotak dialog pada layar monitor. • Filehelp adalah File help yang yang memberi petunjuk pengguna kotak dialog. •Konteks adalah bilangan yang merujuk pada topik help tertentu. Contoh : Nama=InputBox(“Masukan Nama Anda”, “Hallo”,Paijo”) Hasilnya
