Pemrograman Matematika

Nama : Iwan Adlan Ashshidiq
NIM : DTI200907
Kuliah : Pemrograman Matematika
Dosen : Nahar Mardiyantoro, S. Kom


Dalam matematika terdapat berbagai macam rumus-rumus perhitungan, mulai dari yang sederhana maupun yang agak berbobot seperti perhitungan algoritma. Namun kita bisa membuat perhitungan-perhitungan tersebut menjadi mudah dengan bantuan program komputer. Kita dapat membuat program tersebut dengan berbagai software yang tersedia, satu diantaranya adalah dengan Microsoft Visual Basic. Tidaklah sulit untuk membuat program bahkan untuk pemula sekalipun asalkan paham proses penghitungan dan syntaxnya. Untuk pertama-tama kita coba membuat program-program sederhana seperti dibawah ini :
1. Program menghitung luas persegi panjang
2. Program mencari bilangan genap dan ganjil
3. Program mencari bilangan prima
4. Program mencari factorial


1.Menghitung luas persegi panjang

1. Menentukan rumus, L = PxL
2. Buat label dengan caption: panjang diikuti textbox dengan nama : txtpanjang dan kosongkan caption-nya. Kemudian buat label dengan caption: lebar diikuti textbox dengan nama : txtlebar dan kosongkan caption-nya.
3. Buat command button dengan nama cmd proses dan caption : PROSES, double klik command button tersebut sehingga akan muncul :
Private sub_cmd proses click()

End sub

Pada tengah-tengah syntax tersebut akan kita isi dengan rumus luas persegi panjang.
L = P x L
Syntaxnya adalah :
Txthasil.text = txtpanjang.text * txtlebar.text
Yang bermakna tempatkanlah hasil perhitungan di kolom txthasil.text dengan rumus perhitungan angka yang dimasukkan ke dalam kolom txtpanjang.text akan dikalikan dengan angka yang dimasukkan ke dalam kolom txtlebar.text.

Jadi syntax cmdproses akan menjadi :
Private sub_cmd proses click()
Txthasil.text = txtpanjang.text * txtlebar.text
End sub

Kita juga dapat menambahkan fungsi agar user dapat melakukan penghitungan dalam program tersebut tanpa harus menutup dan membuka kembali program tadi. Buatlah command button dengan caption: “LAGI” , kemudian isi dengan syntax :
Txtpanjang.text = “”
Txtlebar.text = “”
Txt.panjang.setFocus
(“”) tanda kutip tersebut menunjukkan fungsi untuk mengosongkan textbox dan setFocus mengarahkan kursor ke textbox yang dituju dalam hal ini adalah textbox dari txtpanjang.

Anda juga dapat membuat tombol untuk fungsi keluar dari program yaitu dengan menggunakan command button, beri nama : EXIT (atau terserah anda), kemudian pada syntaxnya hanya ditambahkan kata “end”, contoh :
Privat sub cmdproses_click()
End
End Sub

Anda juga dapat mempraktekan langsung:

Private Sub cmd_Proses_Click()
txthasil.Text=Val(Txtpanjang.text)*Val(txtlebar.Text)
End Sub

Private Sub cmd_Lagi_Click()
Txtpanjang.Text=""
txtlebar.Text=""
txthasil.Text=""
Txtpanjang.SetFocus
End Sub

Privat sub cmd_Exit_click()
End
End Sub