网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
excel吧 关注：281,024贴子：1,546,403
  • 17回复贴，共1页

为什么Return语句，会出现 无GoSub返回 这样的错误?

Sub gotoreturn()
Dim i As Integer
For i = 2 To 10
If Sheet1.Cells(i, 1) > 1 / 3 Then GoTo 100
Next i
Exit Sub
100:
Sheet1.Cells(i, 2) = "迟到"
Return
End Sub



Sub gotoreturn()
Dim i As Integer
For i = 2 To 10
If Sheet1.Cells(i, 1) > 1 / 3 Then GoSub 100
Next i
Exit Sub
100:
Sheet1.Cells(i, 2) = "迟到"
Return
End Sub


Sub gotoreturn()
Dim i As Integer
For i = 2 To 10
If Sheet1.Cells(i, 1) > 1 / 3 Then GoTo 100
200:
Next i
Exit Sub
100:
Sheet1.Cells(i, 2) = "迟到"
GoTo 200
Return
End Sub


return是和gosub配套使用的. 你没有gosub当然不能用return.
另外你这段完全没必要goto啊
Sub gotoreturn()
Dim i As Integer
For i = 2 To 10
If Sheet1.Cells(i, 1) > 1 / 3 Then Sheet1.Cells(i, 2) = "迟到"
Next i
End Sub


帮助里有 GoSub...Return 语句示例
另说句实话，gosub,goto用的多了，脑子真容易乱。


自学网里的那个代码写错了哈，，看视频的时候里面的老师有更改过来了哦。。。我记得哦。。。


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 17回复贴，共1页
分享到: