Membuat Contoh-Contoh Kegiatan Matematika Sederhana Dengan Vb 6.0 - Fezarzone

Minggu-minggu ini saya lagi semangat-semangatnya untuk menciptakan postingan selain dikarenakan hari libur semester, juga untuk terus meningkatkan page rank blog saya baik digoogle maupun alexa. Dimana tiada waktu tanpa SEO dan menciptakan postingan, bagiku ngeblog sudah menjadi hobi dan sesuatu yang sangat menarik. Dikarenakan berdasarkan saya aneka macam laba dari ngeblog atau blogging itu sendiri diantaranya :

• dapat menghasilkan dollars dengan iklan yang kita pasang dblog kita
• dalam menciptakan postingan kita tidak sadar bahwa kita sedang belajar, apalagi tema blognya ihwal ilmu pendidikan
• dengan membuatkan ilmu dan gosip kita akan mendapat amal jariah yang tidak putus-putus kecuali isi blog yang dihentikan ibarat pornografi dan lain-lain
• dan masih banyak yang lainnya.

Jadi saya sarankan bagi pembaca mulai kini belajarlah untuk menciptakan blog. Karena ngeblog itu indah..hehehe…

Cukup sekian dulu curhat/motivasi dari saya, agar mempunyai kegunaan bagi anda. Dan kini ibarat biasa, saya akan melakukan kiprah saya sebagai blogger dengan menyuguhkan postingan sebagus mungkin kepada anda agar anda terbantu.

Baiklah dalam postingan kita akan menciptakan program-program matematika sederhana dengan VB dimana bahan ini juga sudah pernah saya bahas dalam postingan MEMBUAT CONTOH-CONTOH PROGRAM SEDERHANA DENGAN BAHASA PEMROGRAMAN C++, tetapi bedanya postingan kemaren memakai bahasa pemrograman C++:

contoh 1 : Membuat Program Faktorial Dengan Vb 6.0

a.    Buatlah New Project pada software VB anda kemudian tambahkan tiga buah label, tiga commandbutton dan dua textbox pada form. Kemudian ubah properti masing-masing dan Atur form ibarat pada gambar berikut :

Gambar Program faktorial

b.    kemudian ketikkan code/listing/script kegiatan berikut :

Private Sub Command1_Click()

Dim a, b, i As Integer

i = 1

b = Text1.Text

For a = 1 To b

i = i * a

Next

Text2.Text = i

End Sub

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

Text1.SetFocus

End Sub

Private Sub Command3_Click()

End

End Sub

c.     Run(F5) dan coba masukkan nilai faktorial 4 dimana 4!=1x2x3x4=24 berikut sanggup anda lihat kesudahannya pada gambar dibawah ini :

Gambar Program faktorial dengan VB 6.0

contoh 2 : Membuat Program Penghitung Determinan dan Penjumlahan, Perkalian Matriks Berordo 2x2 dengan VB 6.0

a.    Buatlah New Project pada software VB anda kemudian tambahkan 5 buah label, tiga commandbutton, 13 textbox dan 3  optionbutton pada form. Kemudian ubah properti masing-masing dan Atur form ibarat pada gambar berikut :

Gambar Program Determinan, penjumlahan dan perkalian matriks dengan VB

b.    kemudian ketikkan code/listing/script kegiatan berikut :

Private Sub Command1_Click()

If Option2.Value = True Then

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

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

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

Text9.Text = Val(Text4.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(Text1.Text) * Val(Text8.Text)) + (Val(Text2.Text) * Val(Text6.Text))

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

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

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

End If

End Sub

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

Private Sub Command3_Click()

End

End Sub

c.     Silahkan run(F5) kegiatan anda coba masukkan nilai pada matriks A dan matriks B kemudian pilih salah satu option kemudian tekan tombol proses,,selamat mencoba !

Gambar Program Determinan, penjumlahan dan perkalian matriks dengan VB 6.0

Buka Artikel yang terkait :

MEMBUAT PROGRAM MENGKONVERSI SUHU DENGAN VISUAL BASIC

MEMBUAT APLIKASI PENGHITUNG HARGA BARANG DENGAN VISUAL BASIC