Red de conocimientos turísticos - Información de alquiler - Acerca de las llamadas a módulos en VB

Acerca de las llamadas a módulos en VB

1. Llamar a un módulo generalmente se refiere a llamar a la función del módulo en el proyecto, siempre que sea una función en el módulo, se puede usar directamente. Por ejemplo, el módulo tiene la función Función pública 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 + "\ ProgrammingMad.mdb;Jet OLEDB:Contraseña de la base de datos=260701"

conn.Execute (strsql)

conn.Execute (strsql)Cerrar

sql_execute = True

Cuando la función End ejecuta SQL, puede usar directamente VarSource = "select max(número de cuadro) de tb_basic" Si sql_execute(VarSource) = True Entonces

MsgBox "Guardar correctamente !", "Ventana de aviso". , , "Ventana de aviso"

Fin de If2, la llamada es para llamar a una función o proceso en este módulo, como llamar a Command1_Click