为什么说else没有if 呢

来源:百度知道 编辑:UC知道 时间:2024/05/20 01:28:45
Private Sub Command3_Click()
If Text1.Text = Null Then MsgBox "!!!"
Else
For i = 1 To Text1.Text
s = s + i
Next
Text3 = s
End If
End Sub

为什么说else没有if 呢 谢谢
可是又说 For i = 1 To Text1.Text 类型不匹配

将If Text1.Text = Null Then MsgBox "!!!"
改为:
If Text1.Text = Null Then
MsgBox "!!!"

========补充问题====
For i = 1 To Text1.Text
改为:
For i = 1 To cInt(Text1.Text)

不匹配是正常的Text1.Text 这个是string型的而需要的是int型的 肯定不匹配啊 需要用强制类型转换装换成int型的