一参数传递方式 按位置传递 实际参数和形式参数的次序必须相匹配,即位置必须一致 传送时,名称不要求一致,但是参数个数必须相同,位置也必须相同(主要是类型 形参各变量间用逗号隔开,变量可以是 字符串,数组名(带有左右括号) 实际参数可以是 常数、表达式、变量名、数组名(带有左右括号) ix: sub testsub(a as integer, array as single, recvar as rectype, c as string) ype rectype rand as string *12 serialnum as long End type Dim recv as rectype Call testsub(x, a, recv, dephone") 指名传递 就是把实参显式地指定给形参,用:=将形参和实参连接起来。例如: Sub adsum(first, second third) C=(first+second)*third print c End sub addsum first: =4 second: =6, third: =8 Adsum468与 adsum second:=6,frst:=4 third:=8中的任何依据等价 adsum third: =8 second: =6 first: =4按位置传递 实际参数和形式参数的次序必须相匹配，即位置必须一致 传送时，名称不要求一致，但是参数个数必须相同，位置也必须相同（主要是类型） 形参各变量间用逗号隔开，变量可以是： 字符串，数组名（带有左右括号） 实际参数可以是： 常数、表达式、变量名、数组名（带有左右括号） 设：sub testsub(a as integer,array() as single,recvar as rectype,c as string) Type rectype rand as string*12 serialnum as long End type Dim recv as rectype Call testsub(x,a(),recv,”dephone”) 指名传递 就是把实参显式地指定给形参，用:=将形参和实参连接起来。例如： Sub addsum(first,second,third) c=(first+second)*third print c End sub Addsum 4,6,8 与 参数传递方式 addsum first:=4,second:=6,third:=8 addsum second:=6,first:=4,third:=8 中的任何依据等价 addsum third:=8,second:=6, first:=4