Cara Menggunakan Operator Visual Basic 6.0

Cara Menggunakan Operator Visual Basic 6.0

Ketik Visual Basic! - Operator adalah sebuah simbol yang digunakan untuk mengolah/operasi sebuah data, dan simbol ini berupa karakter atau ... 16.01

Ketik Visual Basic! - Operator adalah sebuah simbol yang digunakan untuk mengolah/operasi sebuah data, dan simbol ini berupa karakter atau kata khusus. Di dalam visual basic 6 terdapat tiga (3) jenis operator yaitu

Operator visual basic 6

1. Operator Logika, digunakan untuk operasi membandingkan sebuah perbandingan data yang akan menghasilkan nilai TRUE atau FALSE. Simbol-simbol yang digunakan adalah

Simbol	Operasi Logika	Contoh
OR	Atau	(3 > 2) OR ( 3 < 2), hasilnya FALSE
AND	Dan	(3 > 2) AND (3 < 2), hasilnya TRUE
NOT	Tidak	NOT (3 > 2), hasilnya FALSE

2. Operator Perbandingan, digunakan untuk membandingkan nila data yang akan menghasilkan nilai TRUE atau FALSE. Simbol-simbol yang digunakan adalah

Simbol	Operasi Logika	Contoh
>	Lebih besar	3 > 2, hasilnya TRUE
<	Lebih kecil	3 < 2, hasilnya FALSE
=	Sama dengan	3 = 2, hasilnya FALSE
>=	Lebih besar sama dengan	3 >= 2, hasilnya TRUE
<=	Lebih kecil sama dengan	3 <= 2, hasilnya FALSE
<>	Tidak sama dengan	3 <> 2, hasilnya TRUE

3. Operator Aritmatika, digunakan untuk mengolah matematis nilai data. Simbol-simbol yang digunakan adalah

Simbol	Operasi Logika	Contoh
*	Perkalian	3 * 2 = 6
/	Pembagian pecahan	3/2 = 1.5
\	Pembagian bulat	3\2 = 1
+	Penambahan	3+2 = 5
-	Pengurangan	3-2 = 1
^	Perpangkatan	3^2 = 9
Mod	Sisa pembagian	3 mod 2 = 1
&	Penggabungan string	3 & 2 = 32

Contoh cara penggunaan operator visual basic 6.0

1. Buatlah user interface seperti berikut ini:

User Interface Aplikasi Operator

2. Atur property masing-masing object seperti berikut

Object	Property	Value
Form1	Caption	Aplikasi Operator
Label1	Caption Font Font Style Size	VarX Ms Sans Serif Bold 8
Label2	Caption Font Font Style Size	VarY Ms Sans Serif Bold 8
Label3	Caption Font Font Style Size BackColor	- Ms Sans Serif Bold 8 &H8000000E& (Highlight Text)
Label4	Caption Font Font Style Size	Hasil Ms Sans Serif Bold 8
Frame1	Caption	Operasi Perbandingan
Frame2	Caption	Operasi Matematika
Option1	Caption	>
Option2	Caption	<
Option3	Caption	>=
Option4	Caption	<=
Option5	Caption	=
Option6	Caption	<>
Option7	Caption	^
Option8	Caption	&
Option9	Caption	Mod
Option10	Caption	\
Option11	Caption	-
Option12	Caption	+
Option13	Caption	/
Option14	Caption	*
Text1	-	-
Text2	-	-
Command1	Caption	Hasil

3. Buka jendela kode (code editor) dengan cara klik 2x sembarang object

Code Editor Aplikasi Operator

4. Copy dan Paste kode program dibawah ini kedalam code editor yang sudah dibuka. Cara yang paling aman adalah Copy kode di bawah --> Buka code editor --> Ctrl + A kemudian Ctrl + V

Private Sub Command1_Click()
    var1 = Text1.Text
    var2 = Text2.Text
   
If Option1.Value = True Then
    hasil = var1 > var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option2.Value = True Then
    hasil = var1 < var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option3.Value = True Then
    hasil = var1 >= var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option4.Value = True Then
    hasil = var1 <= var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option5.Value = True Then
    hasil = var1 = var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option6.Value = True Then
    hasil = var1 <> var2
    Label3.Caption = Format(hasil, "TRUE/FALSE")
End If
If Option7.Value = True Then
    hasil = var1 ^ var2
    Label3.Caption = hasil
End If
If Option8.Value = True Then
    hasil = var1 & var2
    Label3.Caption = hasil
End If
If Option9.Value = True Then
    hasil = var1 Mod var2
    Label3.Caption = hasil
End If
If Option10.Value = True Then
    hasil = var1 \ var2
    Label3.Caption = hasil
End If
If Option11.Value = True Then
    hasil = var1 - var2
    Label3.Caption = hasil
End If
If Option12.Value = True Then
    hasil = var1 + var2
    Label3.Caption = hasil
End If
If Option13.Value = True Then
    hasil = var1 / var2
    Label3.Caption = hasil
End If
If Option14.Value = True Then
    hasil = var1 * var2
    Label3.Caption = hasil
End If
End Sub

Penjelasan Aplikasi Operator Pada Visual Basic 6.0

1. Jalankan program aplikasi operator dengan menekan tombol F5. Muncul form aplikasi seperti berikut

Aplikasi Operator

2. Masukkan data berupa angka pada VarX dan VarY, misalnya 3 dan 4
3. Piliha operasi, misalnya operasi perbandingan lebih besar ( > )
4. Klik tombol "Hasil"
5. Maka hasil dari operasi perbandingan adalah False (salah) karena 3 lebih kecil dari 4 dan bukan 3 lebih besar 4.
6. Anda bisa mencoba operasi yang lainnya

Penjelasan Kode Program Aplikasi Operator Visual Basic 6.0

Private Sub Command1_Click()
var1 = Text1.Text
var2 = Text2.Text

If Option1.Value = True Then
hasil = var1 > var2
Label3.Caption = Format(hasil, "TRUE/FALSE")
End If

dst...

End Sub

1. Ketika tombol Hasil ditekan (terjadi event klik) maka
2. Variabel var1 dan var2 akan terisi oleh nila data dari text1.text dan text2.text
3. Program akan melakukan scanning, pilihan mana yang dipilih atau object Option mana (Option1 s/d Option14) yang bernilai TRUE
4. Misalkan, Jika Option1.Value = TRUE (operasi perbandingan lebih besar atau Option1 bernilai TRUE)
5. Maka akan dilakukan operasi perbandingan antara var1 dan var2 dan hasilnya akan disimpan kedalam variabel hasil. Rumus yang digunakan adalah "hasil = var1 > var2"
6. Kemudian nilai variabel hasil akan dimasukkan dan ditampilkan melalui Label3 dengan menggunakan perintah Label3.Caption = Format(hasil, "TRUE/FALSE")

Sekian tulisan mengenai cara menggunakan operator visual basic 6.0. Jika ada bugs atau salah maka silahkan sampaikan melalui form komentar atau media lainnya.