关于VB计算问题

来源:百度知道 编辑:UC知道 时间:2024/06/05 21:33:54
帮我看下这段代码
为什么运行它说类型不符
请帮我修改下
谢谢~~

Private Sub Command1_Click()
Dim a As Long
Dim b As Integer
a = 0
b = InputBox(("输入你要计算的数字"), "警告")
For b = "b" To 100
b = a + b
Next
Print "b="; b
End Sub

Private Sub Command1_Click()
Dim a As Long
Dim b As Integer

b = InputBox(("输入你要计算的数字"), "警告")
For i = b To 100
c = c + i
Next
Print "c="; c
End Sub
不知道是不是你要的结果,如果你是要计算从你输入的数字到100的累加过程,这个就是答案

Dim b As Integer定义为整型 但inputbox的返回值是string 呵呵 改为Dim b As string
For b = val(b) To 100