楼主是这个意思吗?
Private Sub Text1_LostFocus()
If Not IsNumeric(Text1) Then
MsgBox ("输入错误")
End If
End Sub
Private Sub Text1_LostFocus()
If Not IsNumeric(Text1) Then
MsgBox ("输入错误")
End If
End Sub
2005-04-02 18:53
2005-04-02 22:30
,你在添加控件里找找看吧!
2005-04-03 01:51



2005-04-03 13:31