1、调用模块一般是指调用工程中模块内的函数,只要模块内有这个函数就可以直接使用它。例如,模块内有函数Public Function sql_execute(strsql As String) As Boolean
Dim conn As New ADODB.Connection
Set conn = CreateObject("adodb.connection")
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\编程狂.mdb;Jet OLEDB:Database Password=260701"
conn.Execute (strsql)
conn.Close
sql_execute = True
End Function在执行SQL时,就可以直接使用VarSource = "select max(干部编号) from tb_basic "If sql_execute(VarSource) = True Then
MsgBox "保存成功!", , "提示窗口"
End If2、call是调用本模块内的函数或过程,例如Call Command1_Click
温馨提示:答案为网友推荐,仅供参考