按键精灵输入框输入数字循环问题

2025-05-12 23:13:49
推荐回答(1个)
回答(1):

Event Form1.InputBox1.Change
i = Form1.InputBox1.Text
If i > 0 Then 
For i
Call 子程序()
Next
End If
End Event
Sub 子程序()
MsgBox "abc"
End Sub
你把sub 子程序到end sub之间改一下就可以了