tomtom
首頁
新隨筆
聯系
聚合
管理
隨筆 - 20 文章 - 7 trackbacks - 0
<
2025年7月
>
日
一
二
三
四
五
六
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
8
9
常用鏈接
我的隨筆
我的評論
我的參與
最新評論
留言簿
(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函數應用
SQL
VB.NET流程控制(6)
VB.NET的程序,模塊和函數(1)
Windows(1)
平面設計,美工(1)
網頁數據庫
文章檔案
2006年2月 (9)
積分與排名
積分 - 20467
排名 - 1709
最新評論
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子程序和函數
1
<
h1
>
Asp.Net子程序和函數
</
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
%
>
數據有兩種傳遞方法,按值和按地址,ByVal 是按值傳遞
total += 1 的意思與total=total+1的意思一樣
count2N( )是過程, add2N( )是函數, 過程和函數括號里面的都是變量, 調用過程和函數要聲明變量的值.
調用過程要用 "call 過程" 調用(27行)
調用函數可借助變量total與函數的關系調用(29行)
posted on 2006-02-14 18:00
The Game, tomtom
閱讀(378)
評論(0)
編輯
收藏
所屬分類:
VB.NET的程序,模塊和函數
新用戶注冊
刷新評論列表
只有注冊用戶
登錄
后才能發表評論。
網站導航:
博客園
IT新聞
Chat2DB
C++博客
博問
管理
Copyright ©2025 The Game, tomtom Powered by:
博客園
模板提供:
滬江博客
主站蜘蛛池模板:
无码免费又爽又高潮喷水的视频
|
亚洲精品永久在线观看
|
青草草色A免费观看在线
|
亚洲永久无码3D动漫一区
|
黄色短视频免费看
|
久久国产成人亚洲精品影院
|
国产亚洲精品a在线观看app
|
亚洲夜夜欢A∨一区二区三区
|
青娱乐在线视频免费观看
|
深夜国产福利99亚洲视频
|
一级成人毛片免费观看
|
国内精品99亚洲免费高清
|
中国性猛交xxxxx免费看
|
亚洲国产精品无码久久久不卡
|
国产亚洲综合成人91精品
|
a级毛片免费在线观看
|
久久精品国产亚洲AV麻豆~
|
久久ww精品w免费人成
|
亚洲五月丁香综合视频
|
成人免费男女视频网站慢动作
|
亚洲AV综合永久无码精品天堂
|
无码人妻精品中文字幕免费
|
久久精品亚洲中文字幕无码麻豆
|
亚洲AV成人潮喷综合网
|
一本到卡二卡三卡免费高
|
国产亚洲A∨片在线观看
|
免费一级毛片无毒不卡
|
91在线亚洲精品专区
|
卡1卡2卡3卡4卡5免费视频
|
黄页网址在线免费观看
|
亚洲AV无码久久精品蜜桃
|
国产va精品免费观看
|
亚洲精品美女在线观看
|
在线观看成人免费
|
一级一级一片免费高清
|
亚洲欧洲日韩综合
|
91精品国产免费
|
久久久久久亚洲av无码蜜芽
|
亚洲日韩小电影在线观看
|
男男AV纯肉无码免费播放无码
|
亚洲人成伊人成综合网久久
|