vb函数分sub(无返回值)以及function(有返回值)
简单范例
Public Function ss() As String
ss = "我是"
End Function
注意,想定义的函数能够在窗体或别的模块调用,该函数必须是public的,也就是第一个关键字必须为public
function的调用很简单,直接写函数名和参数
如 msgbox ss
而sub的调用直接call,如:
Public Sub ss()
ss = "我是"
End Sub
调用call ss
另外一点需要注意,调用模块定义的函数,直接写函数名。但如果调用窗体的函数,就得把窗体加上。比如,我要调用sheet1下的bb函数,则该写成 call sheet1.bb
在模块里定义:
function aa(a)
aa=a
end function
窗体里调用:
x=aa(1)
msgbox x