Dim
创新互联服务紧随时代发展步伐，进行技术革新和技术进步，经过十年的发展和积累，已经汇集了一批资深网站策划师、设计师、专业的网站实施团队以及高素质售后服务人员，并且完全形成了一套成熟的业务流程，能够完全依照客户要求对网站进行成都网站建设、成都网站制作、建设、维护、更新和改版，实现客户网站对外宣传展示的首要目的，并为客户企业品牌互联网化提供全面的解决方案。
bStop
As
Boolean
Private
Sub
Command1_Click()
bStop=
False
Do
DoEvents
'暂时释放CPU时间
执行其他代码
If
bStop=Ture
Then
goto
kk
Loop
kk:
End
Sub
Private
Sub
Command2_Click()
bStop=Ture
End
Sub
实话说，我从来没听说VB里有return语句，如果是VB.net里有的就当我没学过孤陋寡闻吧。
我只知道VB里跳出循环是Exit for，而不是什么return。
先不说有没有return关键字，明显它在j循环的外面，而在i循环的里面，那自然是只对i循环有效果了，怎么可能结束j循环呢？
如果要结束i循环就在那个位置用exit for。如果要线束j循环就在j循环体里用 exit for。
exit for 只结束包含它的最近的一层的循环，懂我的意思么？
return在其它语言里，是表示返回，跳出整个函数，而不是跳出某个循环。
1、首先打开编辑器，这个时候可以先写上循环关键字。
2、在界面上可以看到C语言的语句，然后需要使用协商For循环的循环变量。
3、接下来是需要写上初值和终值。
4、此时还可以进行嵌套使用。
5、这个时候就可以写入循环时的操作。
6、记得要有Next结尾完成。
1、语言之间具有互通性（这是一个前提基调）；
2、比如在java或者c/c++中，在循环中进行一个判断，如果判断成功或者不成功，那么就可以设置一个关键字break来跳出这个循环哦；
3、这个break的作用的就是当你判断实现或者未实现这个判断语句时，你像不需要再进行循环或者判断，那么可以用这个break关键字来发挥作用哦。
Dim n As Integer
If n3 then
If TextBox1.Text = "u201116812" And TextBox2.Text = "88888888" Then
MsgBox("登录成功！", 0, "提示信息")
Else
MsgBox("登录失败！", 0, "提示信息")
TextBox1.Focus()
TextBox2.Focus()
n = n + 1
‘ Return
End If
else
MsgBox("3次登录失败！", 0, "提示信息")
Me.Close()
end if
dim i
for i=2 to 1
msgbox("*")
next
语法没问题，这应该在winform里面能够调试成功，显示运行框，但是在web application里面就不能出现弹出信息框了，在网页上要出现，建议用response.write("scriptalert（'***'）/script").
for i=100 to 1 这样的语句在VB9.0后是支持的。楼下的，不要天天抱着VB6啃。
