nah kebetulan aku milih nganggo VB 6.0 amargi menurutku paling gampang di banding program liane.
bismillahirohmaanirrohim,..
1) buka program VB 6.0
2) pilih standard EXE, trus klik open
3) jendelo kerjone iso di gedekno ben ben luwih ombo, klik max (+)
4) Dadine koyo ngeneki kiro2,..gampang to, enak to,mantep to,..
5) gawenen format koyokgambar nag ngisor iki, nganggo toolbox sing sebelah samping iku.
6) Tahap selanjute yoiku ngatur propertine,..nang window properti
komponen | properti | nilai |
form1 | name | frmoperator |
| caption | operator dan fungsi matematika |
label1 | caption | masukkan bilangan 1 |
label2 | caption | masukkan bilangan 2 |
label3 | caption | hasil |
textbox1 | name | txtbil1 |
textbox2 | name | textbil2 |
textbox3 | name | txthasil |
command1 | name | cmdjumlah |
| caption | + |
command2 | name | cmdkurang |
| caption | - |
command3 | name | cmdkali |
| caption | * |
command4 | name | cmdbagi |
| caption | / |
command5 | name | cmdbagilnt |
| caption | \ |
command6 | name | cmdmodulus |
| caption | Mod |
command7 | name | cmdpangkat |
| caption | ^ |
command8 | name | cmdlbhkecil |
| caption | < |
command9 | name | cmdlbhbesar |
| caption | > |
command10 | name | cmdlbhkecilsamadgn |
| caption | <= |
command11 | name | cmdlebihbesarsamadgn |
| caption | >= |
command12 | name | cmdconcatenation |
| caption | CON |
command13 | name | cmdsin |
| caption | sinus |
command14 | name | cmdcos |
| caption | cosinus |
command15 | name | cmdtangen |
| caption | tangen |
command16 | name | cmdlogbasen |
| caption | LogBN |
command17 | name | cmdlog |
| caption | Log |
command18 | name | cmdexponen |
| caption | Exp |
command19 | name | cmdakar |
| caption | Sqr |
command20 | name | cmdtutup |
| caption | Exit |
7) Nak wis bar hasile koyo ngene
8) nambah kode program, carane :
a) klik tombol (+) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
b) klik tombol (-) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
c) klik tombol (*) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
d) klik tombol (/) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
e) klik tombol (\) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
f) klik tombol (Mod) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) + CSng(txtbil2.Text)
g) klik tombol (^) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) ^ CSng(txtbil2.Text)
h) kliik tombol (CON) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) &CSng(txtbil2.Text)
i) klik tombol (<) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) <>
j) klik tombol (>) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) > CSng(txtbil2.Text)
k) klik tombol (<=) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) <= CSng(txtbil2.Text)
l) klik tombol (>=) trus tambah karo kode nang ngisor iki.
txthasil.Text = CSng(txtbil1.Text) >= CSng(txtbil2.Text)
m) klik tombol (sinus) trus tambah karo kode nang ngisor iki.
txthasil.Text = sin(CSng(txtbil1.Text)*3.1416/180)
n) klik tombol (cosinus) trus tambah karo kode nang ngisor iki.
txthasil.Text = cos(CSng(txtbil1.Text)*3.1416/180)
o) klik tombol (tangen) trus tambah karo kode nang ngisor iki.
txthasil.Text = tan(CSng(txtbil1.Text)*3.1416/180)
p) klik tombol (LogBN) trus tambah karo kode nang ngisor iki.
txthasil.Text = Log(CSng(txtbil1.Text)) /Log( CSng(txtbil2.Text))
q) klik tombol (Log) trus tambah karo kode nang ngisor iki.
txthasil.Text = Log(CSng(txtbil1.Text)) + Log(CSng(txtbil2.Text))
r) klik tombol (Exp) trus tambah karo kode nang ngisor iki.
txthasil.Text =Exp( CSng(txtbil1.Text))
s) klik tombol (Sqr) trus tambah karo kode nang ngisor iki.
txthasil.Text = sqr(CSng(txtbil1.Text))
t) klik tombol (Exit) trus tambah karo kode nang ngisor iki.
Unload me
9) ngelakokno program kalkulator sing wis dig awe,..,carane klik play sing ono nang toolbar utowo klik run, klik start,