Private Sub Text1_Change() If Not IsNumeric(Text1.Text) Then MsgBox ("你输入的不是数字,请重新输入!") End If End Sub
7,762
社区成员
197,608
社区内容
加载中
试试用AI创作助手写篇文章吧