数学建模社区-数学中国

标题: ASP语法大全 [打印本页]
作者: 韩冰    时间: 2005-1-16 11:36
标题: ASP语法大全

来源:http://blog.csdn.net/aspstu/

2 P* w$ Q& c9 Z+ E2 l- ^

语句7 a6 i: q5 G" ^' H8 M; k Call

% \) P. u% |/ b) y( J, B( H

[call] name [argumentlist]

$ s, q+ z0 r) ~! t

把控制转移到函数或子程序。当调用函数或子程序时，Call是可写可不写的。但是如果你用了Call,那么argumentlist必须用括号括起来。

8 H6 Y! O0 a2 R0 q) G$ w E$ p$ h) x

Const

; }. ]0 S' c$ w

[Public | Private] Const constantname=expression

, w! z" H: h. _5 u Z3 l& f

用于申明常数。你可以在一行里申明多个常数，此时你必须用逗号把常数赋值语句隔开。

5 s3 c/ c! d2 O, }4 ?7 w

Dim

# E x$ R; G9 p" K

Dim varname[ ( [subscripts])][, varname [( [subscripts])]...

1 N8 z0 l1 E, r5 D5 ]

创建一个新变量并且分配存储空间。

! l0 `" i1 Y' }: m" B) t% r3 g9 `; e* x

DO . . . LOOP

+ `0 d8 [# ?' X/ w2 H

语法 1：

+ J5 C6 q# I( K# l

Do [{While | Until } condition ]

+ ? C: G) A' W0 r/ f9 k, c9 Q

[statements]

. }5 Y( U: z( i$ s

[Exit Do]

& r2 W8 X6 B+ Y, t

[statements]

" k' g+ H& g9 m7 o

LOOP

0 k# r, H: a7 u! [3 N. y

语法 2：

% Z; J9 F2 S$ W# H

Do

: o) I( o& v4 C, c

[statements]

2 T8 Y0 M6 k2 `3 r

[Exit Do]

6 [: S5 S+ F1 N0 F0 }9 n

[statements]

$ |0 |) R% w) _

LOOP [{While | Until } condition ]

0 t6 f: k% i% n# v

当条件condition为真时或直到条件condition为真时，两种形式都重复执行语句。

! e2 K& C' t6 Z

Erase

6 c+ i8 E8 w# C8 f7 ]! z/ A

Erase array

% x* D* M& w4 K. _

清理数组，对于固定长度的数组，重新初始化元素；对于动态数组，重置存储空间。

6 a( W6 e6 j. h3 I1 d3 @& s

Exit

2 P9 F! \7 B u" r' T

Exit Do

2 C) k, L/ `- a/ U: @* l0 k4 @ o

退出一个 DO . . . LOOP 循环。

9 F" r( o. U6 g( k3 J

Exit For

" V3 F1 G1 Z' [9 V/ [9 r3 k. O

退出一个 For . . . Next 循环或For Each . . . Next循环。

% b! p" ?# w5 K) W2 X2 q: `/ J4 T

Exit Function

* {! W; V$ Y" ?3 K ^7 G

退出一个 函数。

. g% t# ?0 a/ ~% [# v! w" R

Exit Sub

! J2 P! V- ^$ K8 \8 U

退出一个子程序。

& z2 u% F& m' V' t* \6 a

For . . . Next

1 O" x0 h r" H7 [. ]: Q6 }' z

For counter = start To End [Step step]

% P. n! r2 ?+ [3 r

[statements]

7 k- |8 L" |4 E0 g/ Y

[Exit For]

: O! [4 A8 v5 `" M0 d

[statements]

c9 k( S: A* [) R: c6 n

Next

: d; F8 z L3 |

由loop 计数器指定的次数重复执行statements语句群。

8 K1 p7 M1 I/ f0 A

For Each . . . Next

, |# o: A! K0 ^; A

For Each element In group

8 x2 C3 s) F3 f4 v' h6 d, S& S+ {& E

[statements]

9 h# m3 i3 D0 |, d7 v

[Exit For]

$ i7 I! y/ R. t

[statements]

- h! _' W/ J6 t

Next [element]

# g; y# p P; Z: F1 L

对于每一个在数组或集合中的元素，重复执行statements语句群。

1 v! L! x }* o) j% a. P: q

Function

$ n+ \/ Q0 l s( a# p1 j; V

[Public | Private] Function name [(arglist)]

4 Z! p" T; ~( w

[statements]

1 S$ N% d' g5 e3 F x; O& g; h9 h

[name=expression]

; M5 Q' T/ N, e+ Z, `- P

[Exit Function]

# r6 P l( p3 ~4 b% \# g7 X i$ B

[statements]

$ E: Y0 U' n+ A

[name=expression]

( y- g' T- b/ h! W. @9 f4 v0 d3 k

End Function

; j; j# z4 R" V5 J- T3 \5 v7 U

定义一个函数，指明函数名，参数及代码。

6 S& i# ?0 P7 l$ H/ n* X

If . . . Then . . . Else

4 u' b5 g$ ~5 [+ t) W4 d( L

语法1：

# V3 \% M( L) [9 b" b

If condition Then statements [Else elsestatements]

/ }5 r6 K( P5 H' E! G6 c* p( W( S

语法2：

/ t9 s9 S m# A4 g$ F" J6 g+ j

If condition Then

2 N" [6 o9 I4 b5 ^

statements

/ `0 S0 E2 H% `4 k+ M4 b" u/ M, k

[ElseIf condition-n Then

* V0 q" T/ V' x3 V0 ]- {4 S

[elseifstatements]] . . .

- ~9 s" z8 M, I# s/ t

[Else

s0 S4 ?& U% t0 h

[elsestatements]]

6 t* \$ s6 U. i: z& e

End If

8 r& A' d/ K+ u$ y

两种格式都条件执行一系列语句。

7 q8 J. o( U/ W

On Error

; o; W. b; R# b4 [5 U2 r3 H

On Error Resume Next

9 {% {) x1 F a9 i

当一个错误发生时，这条语句就执行紧靠发生错误语句后面的语句，或者执行紧靠调用进程后面的语句。

; j: _. Q8 w4 R4 T

Option Explicit

4 [9 {6 k& P" q7 f" O8 _$ H

Option Explicit

' [4 j/ c l' t' v% Y8 y8 c

在使用变量之前强制明确定义该变量，可以用Dim,Private,Public或 ReDim语句定义变量。

; z M, j! R' R; c+ a

Private

2 D) ^3 H! V1 y( U1 ?

Private varname[([下标])][, varname[([下标])] . . .

& J9 a. j. j* J7 O0 A

创建私有变量并且分配存储空间。（私有变量只能在定义该变量的脚本中可用）

; f" t+ @ G- ]$ }: P8 f- n

Public

" S2 X5 w* S) F) Q/ j

Public varname[([下标])][, varname[([下标])] . . .

- z4 L/ R% G' w% O

创建公有变量并且分配存储空间。（公有变量在程序的任何地方均可使用）

# L# ~" q% N o: |' d5 l

Randomize

+ h; j; B: Y f6 @5 Z3 y

Randomize [number]

1 V& \2 q+ p& R; R" Y' y& K

给Rnd函数的随机数发生器一个新种子值。

! q' ]% \% y6 `4 {' x

ReDim

9 d& H# A- J7 d2 a+ h

ReDim [Preserve] varname(subscripts)[, varname(subscripts)] . . .

6 D7 d) a$ e4 U9 ?2 F& f6 G

修改维的下标，大小；或重置动态数组的大小。Preserve 保护已存数组的数据。

, e) \# q. D) L# N/ c) G

Rem

" G g$ b) l- a; Y& M

语法1：

! Y! i! a! q( ]' g8 l

Rem comment

9 X' _+ F/ N& B n: Z2 N) ?8 \

语法2：

! X9 ]- u8 h. |3 T4 e7 D

‘comment

h, v' K- E) B" Z# y% m/ v/ `' _

这两种语句形式都能使注释的句子不被处理。如果Rem和其它语句在同一行上，Rem 语句必须在后且二者之间必须用冒号隔开。

1 \6 X2 V3 z5 b9 }

Select Case

s9 M5 s$ g C

Select Case testexpression

" J- ?; O" r# }/ b8 T3 h% ?0 u

[Case expressionlist-n

5 l' s$ G8 @5 [' C- r( d

[statements-n]] . . .

' E1 S8 c, e, a5 F. n) Q% h

[Case Else expressionlist-n

) [; i) ^. O$ w% J7 t

[elsestatements-n]]

M9 j, `6 r) L5 s7 D+ e

End Select

! `1 ^ s6 g3 q* O

如果某一个expressionlist 和testexpression 匹配，则执行和expressionlist对应的语句；如果没有一个expressionlist 和testexpression 相匹配，则执行和Case Else 相对应的语句。

5 z( o {: {) Q

Set

2 [" h; I/ b& @4 W3 Q+ ~* c: `

Set obectvar= {objectexpression | Nothing}

2 c2 O. U) N+ u/ M k& f# p, A

赋予一个变量或一个性质对象引用。当赋予的值为Nothing 时，使obectva 和任何以前指明的对象解除关系。

6 P0 J5 `" z X3 K# X! |0 ]

Sub

4 s u2 h; N& U, v- g

[Public | Private] Sub name [(arglist)]

0 g2 b. r, \5 W* n4 z P& ?

[statements]

6 K+ t$ h; y6 h- U

[Exit Sub]

! v% U& ~! g: [" a2 N4 y

[statements]

3 B; c" o6 N9 g a4 A- A

End Sub

p8 A) O3 U; x2 D" h# M

定义一个子程序，指明名称，参数及代码。

* m# W5 f5 C# g( o1 D& T

While . . . Wend

/ {# Z. ]; m% ]- X; J! I

While condition

& @( J( O; l& J; d

[statements]

0 W! i1 h- @& b: a8 n

Wend

. c' J8 M" W( f D

不停地连续执行语句statements 直到条件condition为True。

" n I( N1 _4 T/ m$ `, M9 \

6 k T( e0 {4 Q4 c, x* s





欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5