用Inputbox动态输入20个数。如果输入数据不合法，要用Msgbox报错
vb吧
全部回复
仅看楼主
level 2
积极力量sky
楼主
大佬们看看我
2020年06月22日 10点06分
1
level 13
隨風🍁缒夢
Option Explicit
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 20
If IsNumeric(InputBox("请输入第" & CStr(i) & "个数：", "提示")) = False Then
Call MsgBox("不是数字", vbExclamation)
Exit Sub
End If
Next
End Sub
2020年06月22日 10点06分
2
1
