Pmbyaran kurang

=> PEMBAYARAN KURANG
[txtbayar_keypress]
if keyascii=13 Then
if val(txtbayar.text)= asc("0") and keyascii <= asc ("9") or keyascii = vbkeyback) then key ascii = 0
endsub