tomtom
首頁
新隨筆
聯(lián)系
聚合
管理
隨筆 - 20 文章 - 7 trackbacks - 0
<
2025年5月
>
日
一
二
三
四
五
六
27
28
29
30
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
1
2
3
4
5
6
7
常用鏈接
我的隨筆
我的評論
我的參與
最新評論
留言簿
(1)
給我留言
查看公開留言
查看私人留言
隨筆檔案
2007年1月 (1)
2006年12月 (2)
2006年11月 (5)
2006年10月 (1)
2006年9月 (1)
2006年3月 (2)
2006年2月 (8)
文章分類
.NET Framework類庫
ASP.NET對象
EXCEL函數(shù)應用
SQL
VB.NET流程控制(6)
VB.NET的程序,模塊和函數(shù)(1)
Windows(1)
平面設計,美工(1)
網(wǎng)頁數(shù)據(jù)庫
文章檔案
2006年2月 (9)
積分與排名
積分 - 20264
排名 - 1715
最新評論
1.?re: DW2004連接數(shù)據(jù)庫問題的解決
請問有沒有別的解決方式,因為這個方法不適用於最新版本CS3,
我的作業(yè)系統(tǒng)是VISTA,DW是CS3,這方是不奏效~~
不能用啊~~
--兔兔
2.?re: For Each...In...Next循環(huán)語句
1122211222
--hhmng
3.?re: 編寫一個asp.net程序代碼
空格+& 是續(xù)行符 固定格式
--雙
4.?re: 推薦一個免費的asp.net空間
不是啊。。。可以啊
--tom
5.?re: 推薦一個免費的asp.net空間
這個站點的用不了。。白注冊
--aaa
ASP.NET子程序和函數(shù)
1
<
h1
>
Asp.Net子程序和函數(shù)
</
h1
>
2
<
%@ page language
=
"
vb
"
%
>
3
<
script language
=
"
vb
"
runat
=
"
server
"
>
4
5
6
Sub count2N()
Sub
count2N()
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
14
15
Function add2N()
Function
add2N()
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
24
25
<
%
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
%
>
數(shù)據(jù)有兩種傳遞方法,按值和按地址,ByVal 是按值傳遞
total += 1 的意思與total=total+1的意思一樣
count2N( )是過程, add2N( )是函數(shù), 過程和函數(shù)括號里面的都是變量, 調(diào)用過程和函數(shù)要聲明變量的值.
調(diào)用過程要用 "call 過程" 調(diào)用(27行)
調(diào)用函數(shù)可借助變量total與函數(shù)的關系調(diào)用(29行)
posted on 2006-02-14 18:00
The Game, tomtom
閱讀(370)
評論(0)
編輯
收藏
所屬分類:
VB.NET的程序,模塊和函數(shù)
新用戶注冊
刷新評論列表
只有注冊用戶
登錄
后才能發(fā)表評論。
網(wǎng)站導航:
博客園
IT新聞
Chat2DB
C++博客
博問
管理
Copyright ©2025 The Game, tomtom Powered by:
博客園
模板提供:
滬江博客
主站蜘蛛池模板:
国产免费久久精品丫丫
|
特级一级毛片免费看
|
国产99视频精品免费专区
|
亚洲人成无码网WWW
|
国产高清对白在线观看免费91
|
yy6080亚洲一级理论
|
成人精品综合免费视频
|
亚洲人成无码网站久久99热国产
|
51午夜精品免费视频
|
亚洲中文字幕不卡无码
|
花蝴蝶免费视频在线观看高清版
|
黄网站在线播放视频免费观看
|
蜜桃精品免费久久久久影院
|
欧洲亚洲国产精华液
|
亚洲精品无码成人片在线观看
|
国产高清视频免费在线观看
|
亚洲AV乱码久久精品蜜桃
|
免费国产黄网站在线观看可以下载
|
亚洲视频免费在线观看
|
国产精品视频免费观看
|
亚洲国产综合AV在线观看
|
亚洲毛片网址在线观看中文字幕
|
三年片在线观看免费观看大全一
|
亚洲黄色在线观看网站
|
一二三四在线观看免费高清中文在线观看
|
亚洲综合精品伊人久久
|
www国产亚洲精品久久久
|
国产一区二区三区免费观看在线
|
亚洲美女视频网址
|
岛国片在线免费观看
|
黄 色一级 成 人网站免费
|
亚洲电影免费在线观看
|
啦啦啦在线免费视频
|
中文字幕不卡免费高清视频
|
亚洲精品电影天堂网
|
亚洲第一区精品日韩在线播放
|
日韩免费在线视频
|
极品色天使在线婷婷天堂亚洲
|
亚洲AV无码专区电影在线观看
|
我要看WWW免费看插插视频
|
黄桃AV无码免费一区二区三区
|