发布网友 发布时间:2022-04-25 15:21
共1个回答
热心网友 时间:2023-10-12 08:32
Sub 过程可以使用参数(由调用过程传递的常数、变量或表达式)。如果Sub 过程无任何参数,则 Sub 语句必须包含空括号 ()。◆ 自定义子程序过程的形式如下: [Public/Private] sub 子程序名[(参数列表)] 语句 [Exit Sub] 语句 End Sub⑴ 子程序的调用:调用子程序的语句格式如下:子程序名[参数列表]或: Call 子程序名[(参数列表)]说明:◆ 调用 Sub 过程时,只需输入过程名及所有参数值,参数值之间使用逗号分隔。不需使用 Call 语句,但如果使用了此语句,则必须将所有参数包含在括号之中。下面的示例显示了调用 MyProc 过程的两种方式。一种使用 Call 语句;另一种则不使用。两种方式效果相同。Call MyProc(firstarg, secondarg)MyProc firstarg, secondarg说明:◆ 过程名的命名规则与变量的命名规则相同。◆ “参数列表”用来指明过程所需要的参数, 此处参数也称形参或哑元◆ 当过程不需要参数时,子程序名后的部分可以省略◆ 请注意当不使用 Call 语句进行调用时,括号被省略。下面的 Sub 过程使用两个固有的(或内置的)VB函数,即 MsgBox 和 InputBox,来提示用户输入信息。然后显示根据这些信息计算的结果。 例5.1 Sub ConvertTemp()temp = InputBox("请输入华氏温度。", 1)MsgBox "温度为 " & Celsius(temp) & " 摄氏度。"End Sub5.1.2 自定义函数的定义与调用Function 过程是包含在 Function 和 End Function 语句之间的一组 VB语句。Function 过程与 Sub过程类似,但是 Function 过程可以返回值。Function 过程可以使用参数(由调用过程传递的常数、变量或表达式)。如果 Function 过程无任何参数,则Function 语句必须包含空括号 ()。Function 过程通过函数名返回一个值,这个值是在过程的语句中赋给函数名的。Function 返回值的数据类型总是Variant(可变类型)。◆ 自定义函数的形式如下: [Public/Private] Function 函数名([参数列表]) [As 类型] 语句 函数名=返回值 [Exit Function] 语句 函数名=返回值 End Function要从过程获取数据,必须使用 Function 过程。请记住,Function 过程可以返回值;Sub 过程不返回值。⑵ 函数的调用:函数有一个返回值,函数不能作为语句使用,而必须作为表达式或表达式的一部分。自定义函数的使用方法与标准函数的使用方法相同。其形式如下:变量名 = 函数名([参数列表])说明:◆ 调用 Function 过程时,函数名必须用在变量赋值语句的右端或表达式中。例如: Temp = Celsius(fDegrees)或 MsgBox "温度为 " & Celsius(fDegrees) & " 摄氏度。"说明:◆ 当过程不需要参数时,子程序名后的部分可以省略,但函数名后的圆括号不能省。◆“As 类型”用来指定函数返回值的类型,若省略为可变型。◆ 自定义函数的过程中必须有给函数名赋值的语句。在下面的示例中,Celsius 函数将华氏度换算为摄氏度。Sub 过程 ConvertTemp 调用此函数时,包含参数值的变量被传递给函数。换算结果返回到调用过程并显示在消息框中。