Perhatikan Step by Step berikut :
1. Buka Aplikasi Visual Basic.
![]() |
| VB Portable |
![]() |
| Open Project |
3. Buat Form Sepeti gambar dibawah ini :
![]() |
| Form Gaji |
Catatan : Gunakan beberapa Icon dibawah ini :
![]() |
| command button |
![]() |
| combo box |
![]() |
| label |
![]() |
| text box |
4. Copas Script Berikut :
Private Sub Combo1_Click()
Select Case Combo1.ListIndex
Case 0
Text2 = 100000
Text3 = 50000
Case 1
Text2 = 150000
Text3 = 75000
Case 2
Text2 = 200000
Text3 = 100000
End Select
End Sub
Private Sub Command1_Click()
Kosong
Text1.SetFocus
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub List1_Click()
If list1.ListIndex = 0 Then
Text4 = 100000
ElseIf list1.ListIndex = 1 Then
Text4 = 200000
ElseIf list1.ListIndex = 2 Then
Text4 = 300000
ElseIf list1.ListIndex = 3 Then
Text4 = 400000
End If
End Sub
Private Sub Text5_Click()
Text5 = Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text)
End Sub
5. Tekan F5 atau Play untuk melihat Hasilnya :
![]() |
| Hasil Program |
Catatan : untuk Property [name : tidak ada diubah]
untuk Property [Caption : disesuaikan] > Perhatikan Rumus.
Nah... Sekian postingan kali ini sobat Mengenai Program Gaji, jika ada pertanyaan atau komentar atau saran, langsung saja dikotak komentar yang sudah disediakan.
semoga tutorial diatas, bermanfaat bagi kita semua *amin.
Silahkan membaca Tutorial selanjutnya mengenai "Program Huruf"
Salam Sukses....!Lanjutkan Membaca Artikel Lainnya, diantaranya :
Artikel Umum .1
Artikel Pendidikan .2
Artikel Komputer .3
Artikel Visual Basic .4
Artikel Pribadi-ku .5
Artikel Religion .6









0 komentar:
Posting Komentar
Terimakasih telah membaca Artikel ini, silahkan tinggalkan Pesan...
Salam Sejahtera :)