PROCEDURE, FUNCTION DAN MODULE PADA VB. NET

Halo gan,, Selamat Datang di blog saya ini. Untuk postingan kali ini saya akan membahas tentang PROCEDURE, FUNCTION dan MODULE pada VB. NET. Yukk langgsung aja,,,

1. Procedure

Sejauh ini, kita telah menuliskan sub procedure yang dibuat secara otomatis pada saat menggunakan event . Sub procedure merupakan blokkode 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:

[public|private]Sub(||)

       …..

   Statment    

       …..

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. Procedure dapat menerima argument melalui nilai (by value) atau juga reference (by reference). Jika menggunakan by value, nilai pada argument tidak berubah.Sedangkan jika menggunakan by reference, nilai argument yang digunakan dapat berubah sesuai dengan perintah dalam procedure. Secara default, argument dimasukkan melalui nilai (by value) dapat menggunakan kata kunci ByVal dan ByRef untuk By Reference.

Syntaks argument :

[ByVal|ByRef] variabelname as type

Contoh :

1. Procedure dengan argument di passing sebagai value
   Sub HitungVal(byVal as Decimal)
   A+=1
   textAkhir.text=a
   end sub
2. Procedure dengan argument di passing sebagai value
   Sub HitungRef(byRef as Decimal)
   A+=1
   textAkhir.text=a
   end sub
3. pemanggilan procedure
   HitungVal(textAwal.Text)

Mari kita langsung saja pada latihan di bawah ini agar lebih memahami procedure.

1. Buatlah desain form seperti gambar dibawah ini

2. Aturlah pengaturan Properties seperti pada tabel berikut:

NO	OBJEK	PROPERTIES	PENGATURAN
1	Label1	Text	Kode Barang
2	Label2	Text	Nama Barang
3	Label3	Text	Satuan
4	Label4	Text	Harga
5	Label5	Text	Jumlah
6	Label6	Text	Total Harga
7	TextBox1	Name	TextboxKB
8	TextBox2	Name	TextboxNB
9	TextBox3	Name	TextboxS
10	TextBox4	Name	TextboxH
11	TextBox5	Name	TextboxJ
12	TextBox6	Name	TextboxTH
13	Button1	Name	ButtonHITUNG
		Text	Hitung
14	Button2	Name	ButtonCLEAR
		Text	Clear
15	Button3	Name	ButtonEXIT
		Text	Exit

3. Kode program:

- Doble klik pada Form, kemudian buatlah sub procedure Bersih berikut ini :

-Panggil procedure yang anda buat diatas dengan cara, klik ganda pada form load ketikkan kode program berikut ini :

-Panggil procedure yang anda buat diatas pada ButtonCLEAR dengan cara, klikganda pada Button CLEAR kemudian ketikkan kode program berikut ini :

-Klik ganda pada Button Exit, kemudian ketik kode program berikut ini :

4. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging. Jika berhasil maka tampilan program akan seperti pada gambar dibawah ini :

 

 

2. Function

Function yaitu Sebuah kumpulan Statement yang akan mengembalikan sebuah nilai balik pada pemanggilnya. Nilai yang dihasilkan Function harus ditampung kedalam sebuah variabel.

Bentuk Umum :

[public|private]Function(||) As 

      …..

      

      …..

End Function

Keterangan :

• Perbedaan antara fungsi dengan procedure hanyalah pada pengembalian nilai saja (return value). Sebagai contoh : Menggunakan argument berupa nilai (by value) dan reference (by reference)
• Pengembalian nilai dapat dilakukan dengan menggunakan operator assignment “=” pada fungsi atau biasanya dengan perintah return.

Contoh :

Private  Function cekData() as Boolean

if Is Numeric(TextAwal.text) then

return true

else

return false

end if

end function

Pemanggilan fungsi:

if cek Data()=true then

Hitung Ref(textAwal.text)

else

messageBox.Show(“Data yang di masukkan bukan angka”,”Kesalahan data”, MessageBoxButtons.OK,MessageBoxIcons.Error)

end if.

Berikut ini merupakan beberapa perbedaan function dengan procedure :

	Procedure	Function
Definisi	Sebuah kumpulan perintah (Statement) yang tidak mengembalikan nilai balik terhadap pemanggilnya	Sebuah kumpulan Statement yang akan mengembalikan sebuah nilai balik pada pemanggilnya. Nilai yang dihasilkan Function harus ditampung kedalam sebuah variabel.
Parameter	Bisa menggunakan parameter dan bisa juga tidak menggunakan parameter (Optional).	Bisa menggunakan parameter dan bisa juga tidak menggunakan parameter (Optional).
Deklarasi	Menggunakan keyword “Sub”.	Menggunakan keyword “Function”: untuk mengembalikan nilai hasil dari Statement menggunakan keyword “return” atau menggunakan nama dari function tersebut.

Keuntungan menggunakan procedure dan function adalah:

1. Mengurangi duplikasi kode program.
2. Mengatasi masalah yang kompleks menjadi potongan-potongan yang lebih sederhana.
3. Meningkatkan kejelasan kode.
4. Kode yang mudah dibaca.
5. Informasi kode bersembunyi.
6. Dapat dipakai berulang kali.

Agar lebih paham, mari kita lihat contoh kasus Function di bawah ini
1. Buatlah desain form seperti gambar dibawah ini

2. Aturlah pengaturan Properties seperti pada tabel berikut:

Object	Properties	Nilai
Form1	Name	Form1
	Text	Function
TexBox1	Name	TxtVar1
TexBox2	Name	TxtVar2
TexBox3	Name	TxtHasil
GroupBox1	Text	Operasi
RadioButton1	Name	RdbAkar
	Text	Akar Kuadrat
RadioButton2	Name	RdbPangkat
	Text	Pangkat
RadioButton3	Name	RdbPembagian
	Text	Pembagian
RadioButton4	Name	RdbPerkalian
	Text	Perkalian
RadioButton5	Name	RdbPenjumlahan
	Text	Penjumlahan
RadioButton6	Name	RdbPengurangan
	Text	Pengurangan
Button1	Name	BtnHitung
	Text	Hitung
Button2	Name	BtnExit
	Text	Exit

3. Kode program:
-Klik kanan pada Form, kemudian pilih view code, kemudian ketik deklarasi masing-masing fungsi sebagai berikut ini :

-Klik ganda pada Button Hitung, kemudian ketik kode program berikut ini :

-Klik ganda pada Button Exit, kemudian ketik kode program berikut ini :

4. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.

3. Module.

Modul merupakan bagian yang sengaja dipisahkan untuk memudahkan pemrograman.Dalam module dapat dimasukkan procedure dan fungsi dan kemudian digunakan oleh beberapa form.

• Umumnya modul dideklarasikan secara public (public) agar dapat digunakan di dalam kode dimanapun
• Modul dapat diisi dengan main procedure yang akan dijalankan pertama kali saat program dimulai.
• Modul merupakan salah satu argumentasi code  reuse yang bertujuan agar program lebih efesien.

Sintaks pembuatan modul sebagai berikut :

Module moduleName

Statement

End module

Contoh :

Module Module

    Public intResponce, RoleId, Msg As Integer

    Public Username, Password, Nama As String

End Module

Agar lebih paham, mari kita lihat contoh kasus Function di bawah ini:

1. Pertama-tama kita harus menambahkan module kedalam project dengan cara seperti gambar berikut:

2.  Kemudian isi module dengan variable atau fungsi seperti berikut:

3. Kemudian buatlah desain form seperti gambar dibawah ini

4. Aturlah pengaturan Properties seperti pada tabel berikut:

NO	OBJEK	PROPERTIES	PENGATURAN
1	Label1	Text	Alas
2	Label2	Text	Tinggi
3	Label3	Text	Hasil
4	TexBox1	Name	TextboxAlas
5	TexBox2	Name	TextboxTinggi
6	TexBox3	Name	TextboxHasil
7	Button1	Name	ButtonHitung
		Text	Hitung
8	Button2	Name	ButtonExit
		Text	Exit

5. Klik ganda pada Button Hitung, kemudian ketik kode program berikut ini :

6. alankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.

Demikian penjelasan penggunaan Procedure, Function, dan Module  pada vb.net, Semoga dapat membantu memudahkan dalam belajar bahasa pemrograman, terutama vb.net. Terimakasih sudah berkunjung dan semoga bermanfaat. Jika ada hal-hal yang perlu disampaikan, silahkan bisa mengisi komentar pada bagian bawah blog ini.

Trimakasih.