如果有电话的必须填写数字型，如果没电话可不填写或写无也可以！请问要怎么修改？

Question

If Not IsNumeric(Text5.Text) ThenMsgBox ("用户电话必须是数字")Exit SubEnd If以上代码只能判断电话是数字型的！不管有没有都必须填写，但是有的客户没电话。可不写的，要怎么弄？意思就是说，如果有电话的必须填写数字型，如果没电话可不填写或写无也可以！请问要怎么修改？请写详细点好吗？谢谢出现错误拉。当我输入数字的时候可以添加，但是当我什么都不输入或输入字符型的时候出现类型不匹配！

Answer 1

if val(Text5.Text)<>0 then
If Not IsNumeric(Text5.Text) Then
MsgBox ("用户电话必须是数字")
Exit Sub
End If
end if
请问你这个text5可以为空吗？ 如果不可以为空你自己做个判断！~