kode program:
Private Sub cmdbatal_Click()
txtkd.SetFocus
txtkd.Text = “”
txtnama.Text = “”
txtjumlah.Text = “”
txtsisa.Text = “”
txtterjual.Text = “”
txtharga.Text = “”
txttotal.Text = “”
End Sub
kode program:
Private Sub cmdbatal_Click()
txtkd.SetFocus
txtkd.Text = “”
txtnama.Text = “”
txtjumlah.Text = “”
txtsisa.Text = “”
txtterjual.Text = “”
txtharga.Text = “”
txttotal.Text = “”
End Sub
“ MENGHITUNG JUMLAH PEMASUKAN TIKET KA ”
Private sub text1_keypress(keyascii as integer)
If keyascii = 13 then
Text2.setfocus
End
End sub
Private sub text2_keypress(keyascii as integer)
If keyascii=13 then
Text3.setfocus
End if
End sub
Welcome to WordPress.com. After you read this, you should delete and write your own post, with a new title above. Or hit Add New on the left (of the admin dashboard) to start a fresh post.
Here are some suggestions for your first post.