Question

vb编程单击窗体,在inputbox对话框中输入1到9之间的整数n后,在窗体上显示n

vb编程单击窗体,在inputbox对话框中输入1到9之间的整数n后,在窗体上显示n个正弦函数，设置自定义坐标系并显示

Answer 1

Private Sub Command1_Click()
Dim a
a = InputBox("请输入： ", "输入窗口 ")
If IsNumeric(a) And InStr(1, a, ".", vbTextCompare) = 0 And a > 0 Then
MsgBox "你输入的正确 ", vbOKOnly, "程序提示 "
Else
MsgBox "你输入的不正确 ", vbOKOnly, "程序提示 "
End If
End Sub

追问

If IsNumeric(a)这是什么