Contoh Program Faktorial dengan VB

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

• dapat menghasilkan dollars dengan iklan yang kita pasang dblog kita
• dalam membuat postingan kita tidak sadar bahwa kita sedang belajar, apalagi tema blognya tentang ilmu pendidikan
• dengan berbagi ilmu dan informasi kita akan mendapatkan amal jariah yang tidak putus-putus kecuali isi blog yang dilarang seperti pornografi dan lain-lain
• dan masih banyak yang lainnya.

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

Cukup sekian dulu curhat/motivasi dari saya, semoga berguna bagi anda. Dan sekarang seperti biasa, saya akan melaksanakan tugas saya sebagai blogger dengan menyuguhkan postingan sebagus mungkin kepada anda semoga anda terbantu.

Baiklah dalam postingan kita akan membuat program-program matematika sederhana dengan VB.

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 seperti pada gambar berikut :

Gambar Program faktorial

b.    kemudian ketikkan code/listing/script program 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 dapat anda lihat hasilnya pada gambar dibawah ini :

Gambar Program faktorial dengan VB 6.0