📄 ch05-03-06.aspx
字号:
<%@ Page language="VB" %>
<Html>
<Head>
<Title>后测式Do...Loop循环语句</Title>
</Head>
<Body>
<H1>后测式Do...Loop循环语句<BR>
使用 Until 关键字 </H1>
<%
' 声明一个整数变量,并指定初始值
Dim intA As Integer = 0
' 后测式Do...Loop循环
Do
' 查看Do...Loop循环的运作情形
' Response.Write ("变量 intA 的值为 " & intA & "<BR>")
' 也可以写成 intA += 1
intA = intA + 1
' 在这里设置 Until 关键字的条件式
Loop Until intA > 10
Response.Write("循环结束执行之后, intA 变量的值为:" & intA)
%>
</Body>
</Home>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -