Tutorial membuat aplikasi penjualan sederhana dengan visual basic

Channel:

Fajar Firdaus

Subscribers:

1,860

Published on September 23, 2017 5:00:38 PM ● Video Link: https://www.youtube.com/watch?v=_WllUKZePb0

Category:

Tutorial

Duration: 13:46

6,914 views

113

Tutorial membuat aplikasi penjualan sederhana dengan visual basic
Private Sub Combo1_Click()
If Combo1.Text = "Baso" Then Text2.Text = "15000"
If Combo1.Text = "Mie Ayam" Then Text2.Text = "9000"
If Combo1.Text = "Nasi Goreng" Then Text2.Text = "12000"
End Sub

Private Sub Command1_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
Combo1 = ""
Text1.SetFocus
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Combo1.AddItem "Baso"
Combo1.AddItem "Mie Ayam"
Combo1.AddItem "Nasi Goreng"
End Sub

Private Sub Text3_Change()
Text4.Text = Val(Text2.Text) * Val(Text3.Text)
End Sub

Private Sub Text5_Change()
Text6.Text = Val(Text5.Text) - Val(Text4.Text)
End Sub

Private Sub Timer1_Timer()
Text7 = Format(Date, "dd mm yyyy")
Text8 = Format(Time, "hh:mm:ss")
End Sub