Modul 3 Pengenalan Macam-Macam Operator
Modul 3
1. Procedure adalah sekelompok statement di
tempat yang berbeda dengan tempat program utama yang memudahkan dalam
pemrograman karena apabila program utama membutuhkan kelompok tersebut secara
berulang, maka cukup dengan memanggil nama prosedur tersebut.
Keuntungan:
mengurangi kesalahan programmer karena program lebih terstruktur, bertindak
sebagai blok pembangunan program lain (sedikit/ tidak sama sekali modifikasi)
Contoh:
sub tengah yang digunakan untuk menampilkan form ke tengah layar
X=
parameter form yang akan digunakan untuk ke tengah layar
Sub
tengah (X as form)
x. top= (Screen
Height-X.Height)/2
x. left=
(Screen.Width-x.width)/2
End
Sub
Private
Sub Form_Load ()
Call Tengah (Me)
End
Sub
Jenis
Procedure:
a.
Sub procedure (tidak dapat mengembalikan
nilai)
b.
Function Procedure ( mengembalikan
nilai)
c.
Property procedure (dapat mengembalikan
nilai dan diisi nilai yang mengacu pada suatu objek.
2. Function pada dasarnya sama dengan
procedure. Akan tetapi, dalam function dapat mengembalikan nilai.
Contoh:
fungsi mengembalikan nama bulan dari suatu tanggal dalam bahasa Indonesia
Function
Bulan (x as Date)
Dim
sRet as String
Select
Case Month (x)
Case 1 : sRet = “Januari”
Case 2 : sRet =
“Februari”
Case 3 : sRet = “Maret”
Case 4 : sRet = “April”
Case 5 : sRet = “Mei”
Case 6 : sRet = “Juni”
Case 7 : sRet = “Juli”
Case 8 : sRet =
“Agustus”
Case 9 : sRet =
“September”
Case 10 : sRet =
“Oktober”
Case 11 : sRet =
“November”
Case 12 : sRet =
“Desember”
Case Else
Sret = “tidak sah”
End Selet
Bulan = sRet
3.
Perbedaan Function dengan Procedure
Function
dapat mengembalikan sebuah nilai dan harus ditampung dalam sebuah variabel,
menggunakan keyword “function” untuk mengembalikan nilai hasil dan menggunakan
keyword “return” atau menggunakan nama dari function tersebut sedangkan
procedure tidak dapat mengembalikan nilai dan menggunakan keyword “sub”.
4. ByVal adalah pemanggilan parameter
dengan cara melewatkan nilai dari sebuah argumen ke sebuah prosedur dengan
melewatkan alamatnya.
ByRef
adalah pemanggilan parameter dengan cara melewatkan alamat dari sebuah argumen
ke sebuah prosedur dengan melewatkan nilainya.
Perbedaan
ByVal
·
Bersifat satu arah
· Tidak akan mempengaruhi program utama, jika terjadi perubahan sub program
ByRet
·
Bersifat dua arah
·
Program utama akan berubah, jika terjadi
perubahan pada sub program.
5. Operator yang digunakan dalam proses
perbandingan adalah untuk membandingkan suatu nilai pada suatu variabel dengan
variabel lain. Operator ini digunakan untuk menentukan suatu kondisi
bersesuaian ataukan tidak. Hasilnya adalah true dan false. Operato aritmatika =
(sama dengan), > (lebih dari) ,>= (lebih besar sama dengan),< (kurang
dari),<= (kurang dari sama dengan),<> (tidak sama dengan).
6. Operator percabangan adalah operator untuk menentukan pilihan atas beberapa kondisi yang
merupakan syarat terhadap pilihan yang sudah ditentukan.
Contoh
if...then: memberikan syarat pada suatu kondisi tertentu agar bisa masuk ke
kondisi setelahnya/
If...then...else...:
diberikan beberapa pernyataan sehingga visual basic akan terus mencari
pernyataan yang dapat memenuhi syarat sehingga menemukan kondisi true.
If
bercabang : if yang terletak dalam if.
7.
Operator perulangan adalah operator untuk
melakukan suatu perintah yang sama untuk
beberapa kali. Contohnya adalah
·
For...next... : bentuk perulangan,
kumpulan statement telah ditentukan sebelumnya, mengabaikan kondisi perulangan.
·
Do...loop : mengeksesuksi blok
statement, perulangannya tak terhingga, tapi masih dilakukan evaluasi untuk
melanjutkan eksekusi.
·
While...wend : mengeksekusi blok
statement, perulangannya tidak terhingga.
·
Do while...loop : Kata while dalam pernyataan Do While merintahkan
program untuk melakukan perulangan apabila kondisi persyaratan masih bernilai
True. Apabila kondisi persyaratan bernilai False maka program akan keluar dari
perulangan dan berpindah ke kode program berikutnya.
8. Do until N = 100
“I love U”
Loop
9.
Listing Program Gaji Karyawan
Procedure
Form Tform3.cJabatanClick(sender : Tobject)
Begin
If
cjabatan text = ‘Direktur’ then
Epokok.text
: = ‘5000000’
Else
If
cjabatan.text = ‘manager’ then
Epokok.text
:= ‘2000000’
Else
If
cjabatan.text = ‘karyawan’ then
Epokok.text
:= ‘1000000’
Else
Epokok.text
:= ‘0’
End
Flowchart Program Gaji
dan Karyawan
Interface Program Gaji
Karyawan
10. Jika
suatu angka diinput pada sumbu x nilainya positif, sumbu y nilainya positif
maka angka tersebut masuk dalam kuadran 1.
Jika
suatu angka diinput dan pada sumbu x nilainya negatif, sumbu y nilainya posotif
maka angka tersebut masuk dalam kuadran 2.
Jika
suatu angka diinput dan pada sumbu x nilainya negatif, sumbu y nilainya negatif
maka angka tersebut masuk dalam kuadran 3.
Jika
suatu angka diinput dan pada sumbu x nilainya positif, sumbu y nilainya negatif
maka angka tersebut masuk dalam kuadran 4.
Jika
tidak di semua (syarat) pernyataan memenuhi, maka angka tersebut tidak terletak
di kuadran manapun.
Sumber: Modul Praktikum Teknologi Informatika 2012 Teknik Industri Undip
http://kevinkarundeng.wordpress.com/2011/03/30/perulangan-dan-percabangan-dalam-visual-basic/
http://msdn.microsoft.com/en-us/library/a1w3te48(v=vs.80).aspx
http://zetcode.com/lang/visualbasic/operators/
0 komentar:
Posting Komentar