VB版编写程序,判断用户输入的数是否为整数
展开全部
控件如下: Text1, Command1 代码如下 (Command1单机过程): Private Sub Command1_Click() If IsNumeric(Text1.Text) Then If (Int(Text1.Text) = Text1.Text) Then MsgBox "整数", 64, "提示" Else MsgBox "非整数", 64, "提示" End If Else MsgBox "非数字", 64, "提示" End If End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询