By: D.Octovhiana
mail4krisna@yahoo.com
lisensi dokumen :
Copyright©2013ilmukomputer.com
seluruh dokument di ilmu komputet.com dapat digunakan ,dimodifikasi dan diserbarkan secara bebas untuk tujuan bukan komersial (nonprofit),dengan syarat tidak menhapus atau merubah atribut penulis dan peryataan copyrigt yang disertakan dalam setiap dokument .Tidak diperbolehkan melakukan penulisan ulang atau mengcopy lagi isi dari blogger ini .kecuali mendapat izin terlebih dahulu Dari pemilik blogger.
Penggunaan operator
langsung aja masuk ke symbol
Simbol
|
Operasi matematis
|
Contoh
|
^
|
pemangkatan
|
5^2hasilnya
25
|
*
|
perkalian
|
5*2hasilnya
10
|
/
|
Pembagian
|
5/2hasilnya
2,5
|
\
|
Pembagian
(hasil bulat)
|
5\2hasilnya
2
|
MOD
|
Sisa
pembagian
|
5Mod2
hasilnya 1
|
+
|
Penjumlahan
|
5+2
hasilnya 7
|
-
|
Pengurangan
|
5-2
hasilnya 3
|
1.2 Contoh Program :Operator Test
Aktifkan VB 6 melalui tombol start
Buka Kembali project Latihan .vbp
Pada jendela Form Buatlah UI seperti Ini :
Code Form : (Ingat Bukan Form Diatas Yang Kita Ingin Bahas Ya jadi Jangan Gunakan Code Ini gunakan Code yang Lain)
Dim var1 As Single,var2 As Single
Dim Hasil As Single
Private sub Option1_Click()
var1=Text1.Text
var2=Text2.Text
hasil=var1+var2
Label3.Caption=hasil
End Sub
Private Sub Option2_Click()
var1=Text1.Text
var1=Text1.Text
hasil=var1-var2
Label3.Caption=Hasil
End Sub
Private Sub Option3_Click()
var1=Text1.Text
var1=Text1.Text
hasil=var1*var2
Label3.Caption=Hasil
End Sub
Private Sub Option4_Click()
var1=Text1.Text
var1=Text1.Text
hasil=var1/ var2
Label3.Caption=Hasil
End Sub
Private Sub Option5_Click()
var1=Text1.Text
var1=Text1.Text
hasil=var1& var2
Label3.Caption=Hasil
End Sub
Private Sub Option6_Click()
var1=Text1.Text
var1=Text1.Text
Var2=Text2.Text
hasil=var1-var2
Hasil=(Var1>Var2)
Label3.Caption=Hasil
End Sub
Private Sub Option2_Click()
var1=Text1.Text
var1=Text1.Text
hasil=var1-var2
Label3.Caption=Hasil
End Sub
End Sub

Tidak ada komentar:
Posting Komentar