Cara Membuat DATA TABUNGAN dan BUNGA NASABAH menggunakan VB 6.0

Kali ini saya akan membuat tutorial bagaimana cara untuk membuat program sederhana DATA TABUNGAN dan BUNGA NASABAH dengan menggunakan Visual  Basic 6.0

Sudah pasti langkah pertama adalah menyalakan PC dan membuka program Visual Basic 6.0.. hehe..

Setelah anda membuka VB 6, kemudian buatlah project baru..

Tambahkan komponen2 berikut yg semuanya ada pada ToolBox.

Pastikan semua terletak pada posisi yang benar..

Kemudian klik 2 kali pada ruang kosong di form tersebut.

masukkan kode ini :

Private Sub Command1_Click()

If Text1.Text <= 1000000 Then

Text2.Text = 0.0015

Text3.Text = Val(Text1.Text * Text2.Text)

Text4.Text = Val((Val(Text1.Text)) + (Val(Text3.Text)))

Else

If Text1.Text >= 1000000 And Text1.Text < 5000000 Then

Text2.Text = 0.005

Text3.Text = Val(Text1.Text * Text2.Text)

Text4.Text = Val((Val(Text1.Text)) + (Val(Text3.Text)))

Else

If Text1.Text >= 5000000 And Text1.Text < 10000000 Then

Text2.Text = 0.1

Text3.Text = Val(Text1.Text * Text2.Text)

Text4.Text = Val((Val(Text1.Text)) + (Val(Text3.Text)))

Else

If Text1.Text >= 10000000 Then

Text2.Text = 0.5

Text3.Text = Val(Text1.Text * Text2.Text)

Text4.Text = Val((Val(Text1.Text)) + (Val(Text3.Text)))

End If

End If

End If

End If

End Sub

Private Sub Command2_Click()

Text1.Text = Clear

Text2.Text = Clear

Text3.Text = Clear

Text4.Text = Clear

End Sub

Private Sub Form_Load()

Label1.Caption = "Data Tabungan dan Bunga Nasabah"

Label2.Caption = "Total Tabungan"

Label3.Caption = "Bunga Dalam %"

Label4.Caption = "Bunga Dalam Rp"

Label5.Caption = "Jumlah Tabungan + Bunga"

Form1.Caption = "Dedik Kurniawan"

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

Command1.Caption = "Proses"

Command2.Caption = "Hapus"

End Sub

Kode program tersebut telah dibuat sedemikian rupa hingga dapat menghasilkan : 

Program kini telah selesai..

Untuk cara penggunaannya tinggal diisi hanya pada bagian jumlah tabungan saja.. kemudian klik tombol proses. maka hasilnya akan secara otomatis muncul pada program anda.. 

terimakasih telah menyimak penjelasan dari saya..
terus ikuti Blog saya dan cari ilmu - ilmu yang lainnya :D