VB如何调用函数

我是一名中学生,请大家说得详细一些,最好有例子
2024-11-21 22:44:11
推荐回答(3个)
回答1:

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

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

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

扩展资料:

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

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

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

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

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

回答2:

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

回答3:

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 = "真"