例如一个button的单击事件中有个循环
For i As Integer = 1 to 5
dy()
Next
而在模块中定义了这个过程,内部加了一个判断,当条件成立时跳出本过程,同时也跳出那个button事件中的循环
Public Sub dy(Byval i As Integer)
If i=4 Then
Exit Sub
'代码
End If
End Sub
这样的代码该怎样写?
------解决方案--------------------
可能要写成函数形式,要有一个boolean类型的返回值判断一下
------解决方案--------------------
------解决方案--------------------
学习下。
------解决方案--------------------
不好意思,没看清楚
- VB.NET code
'按钮事件内循环 For i As Integer = 1 To 5 If Not dy(i) Then '返回false时跳出for Exit For End If Next Private Function dy(ByVal i As Integer) As Boolean If i = 4 Then '满足条件时跳出函数返回false Return False End If Return True End Function
------解决方案--------------------
Exit For 吧?
------解决方案--------------------
For i As Integer = 1 to 5
if dy()=false then return
Next
Public function dy(Byval i As Integer)as boolean
If i=4 Then
return false
'代码
End If
return true
End function