如何在vba中输入两个数字变量我要在程序的开头输入两个整型的数字变量W和T,以便在后面的程序中用到这两个变量,请问开头这两个变量如何输入,比如用inputbox如何编或是用其他实现就可以
来源：学生作业帮助网 编辑：六六作业网 时间：2025/02/02 06:04:51
如何在vba中输入两个数字变量我要在程序的开头输入两个整型的数字变量W和T,以便在后面的程序中用到这两个变量,请问开头这两个变量如何输入,比如用inputbox如何编或是用其他实现就可以
如何在vba中输入两个数字变量
我要在程序的开头输入两个整型的数字变量W和T,以便在后面的程序中用到这两个变量,请问开头这两个变量如何输入,比如用inputbox如何编或是用其他实现就可以
如何在vba中输入两个数字变量我要在程序的开头输入两个整型的数字变量W和T,以便在后面的程序中用到这两个变量,请问开头这两个变量如何输入,比如用inputbox如何编或是用其他实现就可以
方法1:
Sub test()
Dim W, T As Long
W = Application.InputBox("请输入W变量的值:", "W变量输入窗口", 100, Type:=1)
If W = False Then Exit Sub
T = Application.InputBox("请输入T变量的值:", "T变量输入窗口", 200, Type:=1)
If T = False Then Exit Sub
MsgBox "W变量的值是:" & W & vbCrLf & "T变量的值是:" & T
End Sub
方法2
Sub test()
Dim W, T As Long, Temp As String, Arr
Temp = InputBox("请输入W,T变量的值以"",""隔开:", "变量输入窗口", "100,200")
If Temp = "" Then Exit Sub
Arr = Split(Temp, ",")
W = Arr(0)
T = Arr(1)
MsgBox "W变量的值是:" & W & vbCrLf & "T变量的值是:" & T
End Sub