error Data mismatch = tipe data berbeda (mungkin yang diinput huruf dan bukan angka )
coba ganti dengan ini : if isnumeric(Datainput) then if datainput=1 then ..... else msgbox "ini huruf bukan angka !" end if Best Regards, David J M Advanced Access Independent Software Vendor ----------------------------- From: caringinblk [mailto: [EMAIL PROTECTED] if datainput=1 then option1.setfocus 'no.10 _______________________________________________ Join Excite! - http://www.excite.com The most personalized portal on the Web! Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Ikuti juga forum diskusi VB.net dengan mengirim email kosong ke [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/indoprog-vb/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
