PROCEDURE AND FUNCTION STMIK AMIKOM PURWOKERTO Outline Pendahuluan

  • Slides: 22
Download presentation
PROCEDURE AND FUNCTION STMIK AMIKOM PURWOKERTO

PROCEDURE AND FUNCTION STMIK AMIKOM PURWOKERTO

Outline: • • • Pendahuluan Keuntungan Procedure Sub Procedure Function Procedure Module

Outline: • • • Pendahuluan Keuntungan Procedure Sub Procedure Function Procedure Module

PENDAHULUAN • Adakalanya ketika kita membuat program, ada beberapa kode program yang ditulis berulang.

PENDAHULUAN • Adakalanya ketika kita membuat program, ada beberapa kode program yang ditulis berulang. Hal tersebut tentu saja tidak efisien. Kode program menjadi terlalu banyak dan kompleks. Untuk lebih menyederhanakan kode program, sebaiknya program dibagi menjadi beberapa sub program. Ada 2 jenis sub program dalam VB. Net antara lain: 1. Sub Procedure 2. Function Procedure

KEUNTUNGAN PROCEDURE • Secara garis besar ada dua keuntungan yang bisa diperoleh dari pemakaian

KEUNTUNGAN PROCEDURE • Secara garis besar ada dua keuntungan yang bisa diperoleh dari pemakaian prosedur yaitu : 1. Program terbagi menjadi 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 berulang-ulang sesuai dengan kebutuhan

SUB PROCEDURE • Sub Procedure adalah suatu blok perintah yang dijalankan sebagai tanggapan atas

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 procedure adalah: ü Procedure dengan parameter [Public] [Private] Sub <Nama. Procedure> (Parameter) Blok Pernyataan End sub ü Procedure tanpa parameter [Public] [Private] Sub <Nama. Procedure> Blok Pernyataan End sub

SIFAT SUB • Public sub Sub yang dapat dipanggil atau digunakan oleh seluruh bagian

SIFAT SUB • Public sub Sub yang dapat dipanggil atau digunakan oleh seluruh bagian kode program aplikasi. • Private sub Sub yang hanya dapat dipanggil atau digunakan oleh kode program dalam form dimana sub tersebut dideklarasikan. Sehingga kode program di dalam form lain tidak dapat memanggil dan menggunakannya.

PEMANGGILAN SUB • Pemanggilan Sub procedure harus dilakukan melalui pernyataan tersendiri (baris terpisah), dengan

PEMANGGILAN SUB • Pemanggilan Sub procedure harus dilakukan melalui pernyataan tersendiri (baris terpisah), dengan cara sebagai berikut : Call <Nama. Sub. Procedure> (Parameter 1, Parameter 2) Atau <Nama. Sub. Procedure> (Parameter 1, Parameter 2) • Meskipun pernyataan Call boleh tidak digunakan, ada baiknya anda tetap menuliskannya untuk membedakan mana prosedur dan mana

PARAMETER SUB • Parameter merupakan daftar nama data (variabel) yang dipergunakan pada prosedur tersebut

PARAMETER SUB • Parameter merupakan daftar nama data (variabel) yang dipergunakan pada prosedur tersebut dan mirip dengan pendeklarasian variabel. • Sub memiliki dua buah parameter: 1. Parameter Formal Argumen yang dimiliki oleh suatu sub Parameter Formal Public Sub Tampilkan (By. Val Angka As Integer) txtcetak. text = cstr(Angka) End sub

PARAMETER SUB 2. Parameter Aktual Input bagi suatu sub. Parameter aktual dapat berupa nilai

PARAMETER SUB 2. Parameter Aktual Input bagi suatu sub. Parameter aktual dapat berupa nilai atau variabel. Parameter aktual harus memiliki tipe data yang sama dengan parameter formal (argumen) yang bersesuaian dengannya. Private sub olah() dim hasil, nilai as integer nilai = val(txtnilai. text) hasil = nilai * 10 Call Tampilkan (hasil) End Sub Parameter Aktual bagi sub Tampilkan

JENIS PARAMETER FORMAL 1. Parameter Masukan (Input): Parameter yang menerima nilai dari parameter aktual

JENIS PARAMETER FORMAL 1. Parameter Masukan (Input): Parameter yang menerima nilai dari parameter aktual 2. Parameter Keluaran (Output) : Parameter yang menyerahkan nilai ke parameter aktual 3. Parameter masukan dan keluaran (Input-Output) : Parameter yang menerima nilai dari parameter aktual untuk diproses dalam prosedur kemudian diserahkan kembali ke parameter aktual setelah selesai.

TIPE PENGIRIMAN PARAMETER (1) 1. Berdasarkan Nilai (By Value) Paramenter formal (argumen) hanya menerima

TIPE PENGIRIMAN PARAMETER (1) 1. Berdasarkan Nilai (By Value) Paramenter formal (argumen) hanya menerima salinan nilai dari parameter aktual yang bersesuaian dengannya. Sehingga ketika nilai yang dimiliki oleh parameter formal berubah, maka tidak akan mengubah nilai parameter aktualnya. Private sub Tambahkan(By. Val Angka As Integer) Angka = Angka + 5 End Sub Dim Jumlah as Integer Jumlah = 10 Call Tambahkan(Jumlah)

TIPE PENGIRIMAN PARAMETER (2) 2. Berdasarkan Alamat (By Reference) Paramenter formal (argumen) mengirim salinan

TIPE PENGIRIMAN PARAMETER (2) 2. Berdasarkan Alamat (By Reference) Paramenter formal (argumen) mengirim salinan nilai ke parameter aktual yang bersesuaian dengannya. Sehingga ketika nilai yang dimiliki oleh parameter formal berubah, maka nilai parameter aktualnya juga akan berubah. Private sub Tambahkan(By. Ref Angka As Integer) Angka = Angka + 5 End Sub Dim Jumlah as Integer Jumlah = 10 Call Tambahkan(Jumlah)

TIPE PENGIRIMAN PARAMETER (3) 3. Pengiriman parameter yang bersifat Optional Parameter Optional dibuat dengan

TIPE PENGIRIMAN PARAMETER (3) 3. Pengiriman parameter yang bersifat Optional Parameter Optional dibuat dengan menambahkan kata optional di depan nama argumennya. Selain itu parameter optional harus diberi nilai default (nilai yang dikandung parameter tsb) Public sub Cetak(By. Val Depan As String, optional By. Val Belakang As String = “AB”) txt 1. text = Depan + Belakang End Sub Dim Nama. Dpn As String Nama. Dpn = “Rian” Call Cetak(Nama. Dpn) Dim Nama. Dpn , Nama. Blkg As String Nama. Dpn = “Rian” Nama. Blkg =“Nugraha” Call Cetak(Nama. Dpn, Nama. Blkg)

TIPE PENGIRIMAN PARAMETER (4) 4. Pengiriman parameter Param. Array • Dengan Parameter Param. Array,

TIPE PENGIRIMAN PARAMETER (4) 4. Pengiriman parameter Param. Array • Dengan Parameter Param. Array, satu buah parameter formal dapat menampung lebih dari satu nilai parameter aktual, asalkan tipe datanya sama) • Parameter Param. Array dibuat dengan menambahkan kata Param. Array di depan nama argumennya. • Parameter Param. Array secara otomatis akan bersifat Optional. • Hanya bolah ada satu parameter Param. Array dalam sebuah sub dan diletakkan terakhir. • Tidak boleh ada parameter lain yang bersifat optional. • Parameter Param. Array hanya bisa bersifat By. Val

TIPE PENGIRIMAN PARAMETER (5) Public sub Hitung(By. Val Nama As String, By. Val Param.

TIPE PENGIRIMAN PARAMETER (5) Public sub Hitung(By. Val Nama As String, By. Val Param. Array Nilai () As Integer ) Dim i As Integer Dim Total , Banyak As Integer Total = 0 Banyak = Nilai. Length For i = 0 (To Banyak - 1) Total = Total + Nilai(i) Next i Txt 1. text = Nama Txt 2. text = Cstr(Total) End Sub Call Hitung (“Rian” , 1, 2, 3, 4, 5) Length adalah properti yang menunjukkan panjang suatu array. Dalam hal ini, variabel Nilai adalah sebuah Array.

FUNCTION • Prosedur Function adalah prosedur yang menghasilkan nilai balik (Return Value). Nilai Balik

FUNCTION • Prosedur Function adalah prosedur yang menghasilkan nilai balik (Return Value). Nilai Balik ini akan dikembalikan pada blok perintah yang memanggil prosedur function. ü Fungsi dengan parameter [Public] [Private] Function <Nama. Function> (Parameter) As Type data Blok Pernyataan End sub ü Fungsi tanpa parameter [Public] [Private] Function < Nama. Function > Blok Pernyataan End sub

PEMANGGILAN FUNCTION • Pada saat memanggil sebuah fungsi, dibutuhkan suatu ekspresi untuk menampung nilai

PEMANGGILAN FUNCTION • Pada saat memanggil sebuah fungsi, dibutuhkan suatu ekspresi untuk menampung nilai yang dikembalikan oleh fungsi tersebut. Ekspresi dapat berupa variabel, objek, atau persamaan matematika. <Ekspresi> = <Nama. Function> (Parameter) Hasil = kuadrat (5) • Pada contoh pemanggilan fungsi di atas, akan dikembalikan nilai 25, kemudian akan ditampung oleh variabel Hasil. Sehingga isi variabel Hasil adalah 25.

PERBEDAAN SUB DENGAN FUNCTION Mengembalikan suatu nilai SUB Tidak Mengembalikan suatu nilai Memiliki tipe

PERBEDAAN SUB DENGAN FUNCTION Mengembalikan suatu nilai SUB Tidak Mengembalikan suatu nilai Memiliki tipe data. Tipe data Tidak memiliki tipe data tersebut merupakan tipe data bagi nilai yang akan dikembalikan oleh Fungsi Nilai yang diberikan pada procedure akan diolah dan procedure akan digunakan dihasilkan nilai baru untuk prosedur itu sendiri dipakai oleh ekspresi diluar Fungsi Suatu Fungsi dipanggil dengan Karena pada sub procedure menuliskan pada sisi kanan tidak membawa nilai, tidak ada operator penugasan (tanda =). parameter yang perlu dituliskan.

MODULE • Module adalah tempat yang dikhususkan untuk meletakkan kode program saja. Pada module

MODULE • Module adalah tempat yang dikhususkan untuk meletakkan kode program saja. Pada module tidak dapat ditanamkan sebuah objek seperti pada Form. • Module biasanya digunakan untuk meletakkan sub procedure atau function procedure yang sering digunakan dalam program aplikasi yang dibuat. Sehingga umumnya sub dan function didalam module bersifat public.

LATIHAN 1 • Buat sub procedure untuk menghitung luas persegi panjang dimana data-data panjang,

LATIHAN 1 • Buat sub procedure untuk menghitung luas persegi panjang dimana data-data panjang, lebar diinput dari kotak isian (textbox) pada form beserta cara pemanggilannya.

LATIHAN 2 • Buat Function procedure untuk menghitung luas segitiga dimana data-data alas, tinggi

LATIHAN 2 • Buat Function procedure untuk menghitung luas segitiga dimana data-data alas, tinggi diinput dari kotak isian (textbox) pada form beserta cara pemanggilannya.

IF YOU CAN’T FLY, THEN RUN IF YOU CAN’T RUN, THEN WALK IF YOU

IF YOU CAN’T FLY, THEN RUN IF YOU CAN’T RUN, THEN WALK IF YOU CAN’T WALK, THEN CRAWL BUT WHATEVER YOU DO YOU HAVE TO KEEP MOVING FORWARD (Martin Luther King Jr. )