If Not IsNumeric(Text5.Text) ThenMsgBox ("用戶電話必須是數(shù)字")Exit SubEnd If以上代碼只能判斷電話是數(shù)字型的!不管有沒有都必須填寫,但是有的客戶沒電話??刹粚懙模趺磁??意思就是說,如果有電話的必須填寫數(shù)字型,如果沒電話可不填寫或?qū)憻o也可以!請問要怎么修改?請寫詳細(xì)點(diǎn)好嗎?謝謝出現(xiàn)錯誤拉。當(dāng)我輸入數(shù)字的時候可以添加,但是當(dāng)我什么都不輸入或輸入字符型的時候出現(xiàn)類型不匹配!
1 回答

皈依舞
TA貢獻(xiàn)1851條經(jīng)驗(yàn) 獲得超3個贊
if val(Text5.Text)<>0 then
If Not IsNumeric(Text5.Text) Then
MsgBox ("用戶電話必須是數(shù)字")
Exit Sub
End If
end if
請問你這個text5可以為空嗎? 如果不可以為空你自己做個判斷!~
- 1 回答
- 0 關(guān)注
- 198 瀏覽
添加回答
舉報
0/150
提交
取消