Mas Sigit,
coba as Double
untuk memastikan, text di txtdisc dan txtth harus di-validasi sebagai
numeric.
kalau dimasukkan huruf, maka akan error..
contoh untuk validasi textbox
Private Sub txtdisc_Validate()
if not isnumeric(txtdisc.text) then
MsgBox "Error, harus memasukkan angka", 48
cancel = true
exit sub
End If
txtdisc.text = format(txtdisc.text, "#,##0.00")
End Sub
evryone... sorry menghilang dr peredaran sejak yahoogroup di-bounce dari
gmail.
whew...
----- Original Message -----
From: sigit budiarto
To: [email protected]
Sent: Tuesday, April 24, 2007 4:21 PM
Subject: [indoprog-vb] error flow
Dear All,
Aku mau tanya nih.Kalo aku bikin coding dengan pembagian pake tipe data
apa ya?? Masalahnya adalah setelah hasil keluar, lalu muncul pesan runtime
error 6 error flow.
Cth :
Total diskon (%) = disc / total harga * 100
>> txttd = (txtdisc / txtth) *100
nah untuk Dim txttd As ....??? Agar setelah hasilnya keluar tidak muncul
lagi error flow.
Maklum baru belajar nih, Thanx's a lot B4
---------------------------------
Kunjungi halaman depan Yahoo! Indonesia yang baru!
[Non-text portions of this message have been removed]
[Non-text portions of this message have been removed]
