ASP.NET子程序和函数 - tomtom

文章档案

积分与排名

积分 - 20117

排名 - 1714

最新评论

1. re: DW2004连接数据库问题的解决
請問有沒有別的解決方式，因為這個方法不適用於最新版本CS3，
我的作業系統是VISTA,DW是CS3，這方是不奏效~~
不能用啊~~
--兔兔
2. re: For Each...In...Next循环语句
1122211222
--hhmng
3. re: 编写一个asp.net程序代码
空格+& 是续行符固定格式
--双
4. re: 推荐一个免费的asp.net空间
不是啊。。。可以啊
--tom
5. re: 推荐一个免费的asp.net空间
这个站点的用不了。。白注册
--aaa

ASP.NET子程序和函数

<h1>Asp.Net子程序和函数</h1>
2

<%@ page language="vb" %>
3

Sub count2N()Sub count2N(ByVal intA as integer)
7

Dim total as integer=0, i as integer
8

For i=1 to intA
9

total=total+i
10

Next
11

response.write("从1加到"& intA &"的总和为"& total & "<br>")
12

End sub
13

Function add2N()Function add2N(ByVal intA as integer)
16

Dim total as integer=0,i as integer
17

For i=1 to intA
18

total += i
19

Next
20

Return total
21

End Function
22

</script>
23

<%
26

Dim total as integer,limit as integer=50
27

Call count2N(20)
28

total=Add2N(limit)
29

response.write("从1加到"& limit & "的总和为" & total & "<br>")
30

数据有两种传递方法，按值和按地址，ByVal 是按值传递
total += 1 的意思与total=total+1的意思一样

count2N( )是过程, add2N( )是函数, 过程和函数括号里面的都是变量, 调用过程和函数要声明变量的值.
调用过程要用 "call 过程" 调用(27行)
调用函数可借助变量total与函数的关系调用(29行)

posted on 2006-02-14 18:00 The Game, tomtom 阅读(367) 评论(0) 编辑收藏所属分类: VB.NET的程序,模块和函数

常用链接

留言簿(1)

随笔档案

文章分类

文章档案

积分与排名

最新评论


只有注册用户登录后才能发表评论。




网站导航: 博客园 IT新闻 Chat2DB C++博客博问管理