Membuat Program Determinan, Perkalian, dan Penjumlahan Matriks

Nah,,,sekarang saya akan memberitahu teman-teman gimana caranya untuk membuat sebuah program yang saya beri nama PROGRAM DETERMINAN, PERKALIAN, DAN PENJUMLAHAN MATRIKS.

Langkah-Langkah Membuat Program Determinan, Perkalian, dan Penjumlahan Matriks

  1. Buka Visual Basic 6.0, kemudian pilih Standard EXE, seperti tampilan dibawah ini:

Setelah itu maka akan muncul tampilan seperti di bawah ini!

Untitled2. Buatlah beberapa object yang diperlukan untuk pembuatan program, yaitu : Tempatkan 5 buah kontrol Label, 13 buah text,   3 buah  Command, 3 buah Option, dan 1 buah Line, dengan tata letak sebagai berikut :

3. Setelah semua object terpasang, edit beberapa object dengan pengaturan properti sbb:

Nama Kontrol

Properti Nilai
Form1 CaptionName Program Determinan, Perkalian, dan Penjumlahan MatriksProgram_3
Label1 Caption DETERMINAN, PERKALIAN, DAN PENJUMLAHAN MATRIKS
Label2 Caption Masukkan Nilai A
Label3 Caption Masukkan Nilai B
Label4 Caption Hasil Matriks
Label5 Caption Determinan
Text1 Name Text1
Text2 Name Text2
Text3 Name Text3
Text4 Name Text4
Text5 Name Text5
Text6 Name Text6
Text7 Name Text7
Text8 Name Text8
Text9 Name Text9
Text10 Name Text10
Text11 Name Text11
Text12 Name Text12
Text13 Name Text13
Option1 Caption Perkalian
Option2 Caption Penjumlahan
Option3 Caption Determinan
Command1 Caption PROSES
Command2 Caption HAPUS
Command3 Caption KELUAR

Dengan mengikuti petunjuk di atas, maka tampilannya akan menjadi seperti di bawah ini !

 

4. Langkah selanjutnya adalah menuliskan kode program pada masing – masing tombol PROSES, HAPUS dan KELUAR.

a.      Pada Tombol Proses

Klik dua kali (doble click) TOMBOL PROSES, kemudian ketikkan kode program sebagai berikut :
Private Sub Command1_Click()

If Option2.Value = True Then

Text12.Text = Val(Text4.Text) + Val(Text8.Text)

Text11.Text = Val(Text3.Text) + Val(Text7.Text)

Text10.Text = Val(Text2.Text) + Val(Text6.Text)

Text9.Text = Val(Text1.Text) + Val(Text5.Text)

ElseIf Option3.Value = True Then

Text13.Text = (Val(Text1.Text) * Val(Text4.Text) – Val(Text2.Text) * Val(Text3.Text)) + (Val(Text8.Text) * Val(Text5.Text) – Val(Text7.Text) * Val(Text6.Text))

Else

Text12.Text = (Val(Text3.Text) * Val(Text6.Text)) + (Val(Text4.Text) * Val(Text8.Text))

Text11.Text = (Val(Text3.Text) * Val(Text5.Text)) + (Val(Text4.Text) * Val(Text7.Text))

Text10.Text = (Val(Text1.Text) * Val(Text6.Text)) + (Val(Text2.Text) * Val(Text8.Text))

Text9.Text = (Val(Text1.Text) * Val(Text5.Text)) + (Val(Text2.Text) * Val(Text7.Text))

End If

 

End Sub

b.      Pada Tombol Hapus
Untuk kembali pada tampilan object, Klik menu View | Object, lalu klik dua kali (doble click) TOMBOL HAPUS, selanjutnya ketikkan kode program berikut :
Private Sub Command2_Click()

Text1.Text = “”

Text2.Text = “”

Text3.Text = “”

Text4.Text = “”

Text5.Text = “”

Text6.Text = “”

Text7.Text = “”

Text8.Text = “”

Text9.Text = “”

Text10.Text = “”

Text11.Text = “”

Text12.Text = “”

Text13.Text = “”

Text1.SetFocus

End Sub

c.       Pada Tombol Keluar
Seperti langkah di atas, Klik kembali menu View | Object, lalu klik dua kali (doble click) TOMBOL KELUAR, selanjutnya ketikkan kode program berikut :
Private Sub Command3_Click()

End

End Sub

5.  Selanjutnya dengan di edit seperlunya, sehingga hasil akhirnya seperti di bawah 

6.  Untuk menjalankan program yang telah dibuat tekan F5 pada keyboard.
Sehingga muncul tampilan program yang siap dijalankan, ketik angka pada kotak “Masukan Nilai A” dan “Masukan Nilai B” sesuai keinginan, selanjutnya pilih salah satu option Perkalian, Penjumlahan, dan Determinan. Setelah itu klik tombol PROSES, maka hasilnya akan muncul pada kotak Hasil Matriks dan Determinan , seperti gambar di bawah ini :

7.  Jika sudah dicoba dan hasilnya benar, selanjutnya file dapat disave dengan klik File | Save Project
8.  Dan untuk menyimpan program yang telah dibuat klik File | Make Project.
9.  Program siap dijalankan.

Nah,,sekian duluuu yw penjelasan dari saya tentang langkah-langkah membuat program determinan, perkalian, dan penjumlahan matriks. Kalow temand-temand mw mencoba program tersebut, silahkan download di SINI.

 

About these ads

Berikan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Logout / Ubah )

Twitter picture

You are commenting using your Twitter account. Logout / Ubah )

Facebook photo

You are commenting using your Facebook account. Logout / Ubah )

Google+ photo

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s