ch06-01-01.aspx

来自「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」· ASPX 代码 · 共 34 行

ASPX
34 行
字号 
<%@ Page Language="VB" %>
<Html>
<Head>
<Title>Ch06-01-01.aspx 子程序、函数范例</Title>
 <Script Language="VB" Runat = "Server">
	' 这是从 1 连加到 N 的程序
	Sub Count2N(ByVal intA As Integer)
		Dim Totals As Integer = 0, I As Integer
		For I = 1 to intA 
			Totals += I 
		Next
		Response.Write("从1加到" & intA & "的总和为" & Totals & "<BR>")
	End Sub
	
	Function Add2N(ByVal intA As Integer)
		Dim Totals As Integer = 0, I As Integer
		For I = 1 to intA 
			Totals += I 
		Next
		Return Totals	' 返回加总的结果
	End Function 
</Script>
</Head>
<Body>
<%
Dim Totals As Integer, Limits As Integer = 50
' 调用 Count2N 程序
Call Count2N(20)
Totals = Add2N(Limits)
Response.Write("从 1 加到 " & Limits & " 的总和为 " & Totals & "<BR>")
%>
</Body>
</Html>

ch06-01-01.aspx - 源码说明

本页面展示了「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」中的 ch06-01-01.aspx 源码文件，采用 ASPX 编程语言编写，共 34 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?