用MyFile = Dir("C:\WINDOWS\*.ini")函数,若第二次调用 Dir 函数,但不带任何参数,则函数将返回同一目录下的下一个 *.ini 文件租唤。
这个可选的errornumber参数可以为任何有效的错误号。如友型悄果errornumber是有效的错误号,但尚好渣未被定义,则Error将返回字符串“应用程序定义的错误或对象定义的错误”。
如果errornumber不是有效的错误号,则会导致错误发生。如果省略errornumber,就会返回与最近一次运行时错误对应的消息。如果没有发生运行时错误,或者errornumber是 0,则Error返回一个长度为零的字符串 ("")。
扩展资料:
当一数字转成字符串时,总会在前头保留一空位来表示正负。如果 number 为正,返回的字符串包含一前导空格暗示有一正号。
使用 Format 函数可将数值转成必要的格式,如日期、时间、货币或其他用户自定义格式。与 Str 不同的是,Format 函数不包含前导空格来放置 number 的正负号。
注意 Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点(例如,国际性的应用程序),可使用 CStr 将数字转成字符串。
参考资料来源:百度百科-DIR
参考资料来源:百度百科-ERROR
1.定义一个加法函数
Private Function addition(a As Double, b As Double) As Double
addition = a + b
End Function
2.在command1单誉扰击事件中触发,庆没旦先在窗体察稿中加入2个文本框和一个按钮command1
Private Sub Command1_Click()
Debug.Print addition(Text1.Text, Text2.Text)
End Sub
private Function fn1() as string '函数fn1,返岁基回银颂字符串类型的值
'函数体
fn1 = "你好锋雀郑"
end Function
private Function fn2(n as boolean) as string '函数fn2
fn2 = iif(n,"真","假")
end function
调用时:
dim str as string
str = fn1 'str = "你好"
str = fn2(true) 'str = "真"