PROSEDUR DAN FUNCTION

A. Prosedur

Untuk mempermudah mengembangkan program, aplikasi yang besar dapat dipecah menjadi segmen kode yang lebih kecil atau disebut prosedur.

Contohnya adalah penanganan event mouse seperti, mouse over, klik, klik ganda dan klik mouse kanan. Masing-masing tugas ditampilkan pada prosedur yang terpisah yang ditulis dan diuji secara terpisah satu dengan lainnya. Prosedur juga digunakan untuk penerapan tugas yang diulang-ulang seperti perhitungan yang sering digunakan.

Ada dua tipe prosedur yang akan dibahas dalam bagian ini yaitu subrutin dan fungsi. Subrutin dan fungsi merupakan bagian dari kode yang akan mengerjakan tugas tertentu dan dapat dipanggil dari berbagai bagian aplikasi untuk melakukan operasi yang sama, biasanya pada data yang berbeda. Perbedaan keduanya kalau fungsi return value/mengembalikan nilai sedangkan subrutin tidak.

Subrutin

Subrutin adalah blok pernyataan untuk mengerjakan suatu tugas yang didefinisikan dengan baik. Blok pernyataan diletakkan di antara pernyataan Sub...End Sub. Subrutin dapat dipanggil melalui namanya. Contoh subrutin berikut akan menampilkan suatu pesan pada kotak pesan.

Sub Pesan()

MsgBox(“Belajar VB, siapa takut!”)

End Sub

Kebanyakan prosedur disertai dengan argumen. Subrutin TampilkanTgl() berikut akan menampilkan tanggal sekarang pada kotak pesan. Jika anda ingin menampilkan tanggal lainnnya Anda dapat mem-passing-kan (meneruskan) argumen dengan nilai yang berbeda:

Sub TampilkanTgl(ByVal TglLahir As Date)

MsgBox(TglLahir)

End Sub

TglLahir adalah variabel yang menangani tanggal yang akan ditampilkan dengan tipe Date. Kata kunci ByVal artinya subrutin tidak dapat mengubah nilai dari variabel TglLahir.

Untuk memanggil subrutin TglLahir ketik kode berikut di dalam program anda:

Call TampilkanTgl(Date) ‘Ditampilkan tanggal sistem dalam kotak pesan

Untuk menampilkan tanggal lain, Anda dapat memasukkan nilainya:

Call TampilkanTgl(#12/23/1963#)

Fungsi

Fungsi mirip dengan subrutin, bedanya fungsi menghasilkan return value/mengembalikan nilai. Suatu fungsi adalah blok kode yang dapat dipanggil untuk mengerjakan suatu tugas tertentu dan menghasilkan nilai kembalian.

Fungsi berikut akan mengubah derajat menjadi Fahrenheit

Private Function Cfahrenheit(ByVal deg as integer) as integer

‘Konversi derajat ke fahrenheit

Cfahrenheit = deg + 32

End Function

Untuk memanggil fungsi gunakan nama fungsi seperti contoh berikut:

lblHasil.Text = Cfahrenheit(50)

Passing Parameter

Pada VB 6 parameter dipassing- kan (diteruskan) ke fungsi. Default-nya adalah passing parameter melalui referensi (ByRef). Ada dua metode passing parameter yaitu melalui nilai/value (ByVal) artinya semua perubahan yang dibuat ke nilai parameter hanya efektif dalam fungsi yang memanggil. Nilai asli sekarang dalam fungsi yang dipanggil tidak terpengaruh. Sedangkan pada passing parameter melalui referensi (ByRef), jika parameter di dalam fungsi berubah, perubahan juga dicerminkan di luar fungsi.

Fungsi Built-in VB 6

Berikut adalah beberapa daftar fungsi built-in bawaan VB 6

Fungsi Konversi Type Data

Fungsi untuk konversi antara type data ke type data lainnya

Nama Fungsi	Penjelasan
Cbool	Konversi argument ke tipe data Boolean
Cbyte	Konversi argument ke tipe data Byte
Ccur	Konversi argument ke tipe data Currency
Cdate	Konversi argument ke tipe data Tanggal
Cdbl	Konversi argument ke tipe data Double
Cdec	Konversi argument ke tipe data Decimal
Cint	Konversi argument ke tipe data Integer
CLng	Konversi argument ke tipe data Long
Csng	Konversi argument ke tipe data Single
Cstr	Konversi argument ke tipe data String

Fungsi Konversi String

Fungsi untuk konversi dari dan ke tipe string

Nama Fungsi	Penjelasan
Cstr	Merubah argument ke tipe string
Str	Merubah argument numerik ke tipe string
Val	Merubah argument string ke tipe numerik

Fungsi ASCII

Fungsi untuk konversi string dari dan ke nilai ASCII nya

Nama Fungsi	Penjelasan
Chr	Merubah dari ASCII ke String
Asc	Merubah argument string ke bentuk ASCII

Fungsi SubString String

Fungsi untuk mengambil bagian dari string

Nama Fungsi	Penjelasan
Mid	Mengambil bagian string dari posisi ke i sebanyak n charakter
Left	Mengambil bagian string dari kiri sebanyak n karakter
Right	Mengambil bagian string dari kanan sebanyak n karakter

Fungsi Konversi Ke Huruf Besar dan Kecil

Fungsi untuk konversi string ke huruf besar dan huruf kecil

Nama Fungsi	Penjelasan
Ucase	Merubah argument string menjadi huruf besar semua
Lcase	Merubah argument string menjadi huruf kecil semua

Fungsi Trimming dan pengaturan String

Fungsi untuk menghilangkan spasi kosong di sekitar argument string

Nama Fungsi	Penjelasan
Ltrim	Menghilangkan spasi di depan argument string
Rtrim	Menghilangkan spasi di belakang argument string
Trim	Menghilangkan spasi di depan dan belakang argument string

Fungsi Aritmatika Waktu untuk perbandingan Waktu

Fungsi untuk mengoperasikan waktu

Nama Fungsi	Penjelasan
DateAdd	Menghasilkan waktu baru setelah ditambahkan dengan nilai tertentu
DateDiff	Menghasilakan perbedaan antara dua waktu
DatePart	Mengambil bagian dari waktu