📄 3_11.htm

📁 《asp网页设计》作者沈才梁源代码,共十章

💻 HTM

字号:

<HTML>
<TITLE>DO循环语句实现n个数的累加</TITLE> 
请输入一个数字：
<INPUT name=T1 type=TEXT size="3">
<INPUT name=S1 type=BUTTON value="确定">
<SCRIPT language="VBScript">
Sub S1_onclick()
  Dim i,s
  i=1
  s=0
  Do while i<=cint(t1.value)
     s=s+i
     i=i+1
  Loop
  MsgBox "从1到"&cstr(i-1)&"的累加结果为"&cstr(s)
End Sub
</SCRIPT>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -