belajar usaha, materi smk, game

Combo dan Option vb 6

Penggunaan Combo dan Option

Pada VB Penggunaan toolbox berjenis combobox adalah untuk mempermudah pilihan yang berjumlah banyak, begitu juga dengan toolbox optionbutton. Berikut ini adalah contoh gambaran program yang menggunkan combobox dan optionbutton:

Jika di klik pada tombol combo maka keluar beberapa pilihan, sebagai contoh jika anda memilih jabatan: Direktur maka gajinya: 5000000

Bagaimana cara mengambil combo dari toolbox? Pilihlah tool yang bernama combobox seperti berikut ini kemudian anda gambar di form.

Untuk lebih jelasnya sebaiknya anda membuat program seperti gambar diatas, yang pertama kali anda lakukan adalah membuat design form seperti berikut ini:

Untuk code programnya hanya ditulis pada: combo1, option1, option2, command1 adalah sebagai berikut:
Private Sub Combo1_Click()
If Combo1 = "Direktur" Then
Text1 = 5000000
ElseIf Combo1 = "Kepala Cabang" Then
Text1 = 3500000
ElseIf Combo1 = "Supervisor" Then
Text1 = 2500000
Else
Text1 = 1500000
End If
End Sub

Private Sub Command1_Click()
Text3 = Val(Text1) + Val(Text2)
End Sub

Private Sub Option1_click()
If Option1 = True Then
Text2 = 500000
End If
End Sub

Private Sub Option2_Click()
If Option2.Value = True Then
Text2.Text = 0
End If
End Sub
Anda baru saja membaca artikel yang berkategori visual basic dengan judul Combo dan Option vb 6. Anda bisa bookmark halaman ini dengan URL http://saapii.blogspot.com/2013/06/combo-dan-option-vb-6.html. Terima kasih!
Ditulis oleh: syaiful ridlo - Thursday, 20 June 2013

Belum ada komentar untuk "Combo dan Option vb 6"

Post a Comment