Question

vb6.0中实时错误424,要求对象是怎么回事

Private Sub Command1_Click()
Dim myNum() As Integer
Dim i As Integer
Dim mySum As Integer
Dim j As Integer
i = InputBox("请输入你要输入的整数个数：", "输入整数", 1)
ReDim myNum(i - 1)
mySum = 0
Label3.Caption = ""
For j = 0 To i - 1
myNum(j) = InputBox("请输入第" & j + 1 & "个整数：", "输入整数", 0)
If j = i - 1 Then
Label3.Caption = Label3.Caption & myNum(j)
Else
Label3.Caption = Label3.Caption & myNum(j) & "+"
End If
mySum = mySum + myNum(j)
Next
Label4.Caption = mySum
End Sub

Label3.Caption = ""变成黄色

Answer 1

你要放个LABEL叫LABEL1。
你是不是把LABEL1打成LABELL了？
还不明白的话QQ33289165