A’asalamu’alaikum wr.wb.
Baik lah sob saya akan memberikan tahun bagiman
cara membuat program menghitung biaya
pendidikan di miscrosof visual basic atau VB.....Cara membuat nya sangat mudah
sob.......?
1.Langkang pertama yang harus kita lakukan sob desain lah form seperti yang ada pada gambar disamping ini sob.
1.Langkang pertama yang harus kita lakukan sob desain lah form seperti yang ada pada gambar disamping ini sob.
2.langkah kedua harus memperhatikan propertis yang saya ubah atau para sob bisa memperhatikan pada table di bawah ini.
Masukan Code Programnya
Klik 2 kali tombol hitung.
Private Sub cmdhitung_Click()
txttotal.Text = txtbiaya.Text - (Val(txtbeasiswa.Text) +
Val(txtvoucer.Text))
End Sub
Klik 2 kali tombol selesai.
Private Sub cmdselesai_Click()
End
End Sub
Klik 2 kali check1/beasiswa.
Private Sub Check1_Click()
If Check1.Value = 1 Then
txtbeasiswa.Text = 200000
Else
txtbeasiswa.Text = 0
End If
End Sub
Klik 2 kali check1/voucer.
Private Sub Check2_Click()
If Check2.Value = 1 Then
txtvoucer.Text = 0.1 * txtbiaya
Else
txtvoucer.Text = 0
End If
End Sub
Contoh
Program Yang Jalan Dan Cara Kerjanya.
1.Masukan nilai pada biaya pendidikan seperti gambar dibawah ini.
Ctt: biaya
pendidikan(3000000).
2.setelah itu klik beasiswa atau voucer,bisa juga di klik keduanya.nilai
nya akan keluar sendiri.
3.klik hitung untuk mengetahui hasil nya.
Selamat Mencoba Ae Sob
Semoga Berhasil
0 Response to "Menghitung Biaya Pendidikan Program VB"
Post a Comment