VB如何调用函数

用MyFile = Dir("C:\WINDOWS\*.ini")函数，若第二次调用 Dir 函数，但不带任何参数，则函数将返回同一目录下的下一个 *.ini 文件。

这个可选的errornumber参数可以为任何有效的错误号。如果errornumber是有效的错误号，但尚未被定义，则Error将返回字符串“应用程序定义的错误或对象定义的错误”。

如果errornumber不是有效的错误号，则会导致错误发生。如果省略errornumber，就会返回与最近一次运行时错误对应的消息。如果没有发生运行时错误，或者errornumber是 0，则Error返回一个长度为零的字符串 ("")。

扩展资料：

当一数字转成字符串时，总会在前头保留一空位来表示正负。如果 number 为正，返回的字符串包含一前导空格暗示有一正号。

使用 Format 函数可将数值转成必要的格式，如日期、时间、货币或其他用户自定义格式。与 Str 不同的是，Format 函数不包含前导空格来放置 number 的正负号。

注意 Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点（例如，国际性的应用程序），可使用 CStr 将数字转成字符串。

参考资料来源：百度百科-DIR

参考资料来源：百度百科-ERROR

Private Function Fun(I As String)

I = "123"

End Function

Private Sub Command1_Click()

Dim x As String

Call Fun(x)

'call fun((x))

Debug.Print x

End Sub

byref表示该参数按地址传递 byval按值传递 如果FUN函数参数前置空则默认byref按地址传递

按地址传递 如果参数在函数内有改变数值 那么调用的变量也会随之改变

单个参数变量外加（）则按byval值传递

如果是将所有参数变量外加（）是为了让 function函数有返回值可以调用如：

Private Sub Command1_Click()

Debug.Print Fun(1)

End Sub

Private Function Fun(a As Integer) As Integer

a = a + 1

Fun = a

End Function

你可以试试我第一个的函数过程 2种调用方式有何不同结果 不懂再问

程序是这样执行的：

从主函数传入值（10，2）进调用函数，则x=10,y=2；

因为y<>0

所以preminder

=

x/y=》preminder=10/2=5,x=y=》x=2,y=preminder=>y=5

执行第二次循环

因为y<>0

所以preminder

=

x/y=》preminder=2/5=0,x=y=》x=5,y=preminder=>y=0

执行第三次循环

因为y=0跳出、

此时gys=5作为返回值

/*其中‘/’为整除，取得整数部分*/

---