Cómo llamar a activex.dll en vb usando código

1: Cree un proyecto DLL ActiveX y escriba el siguiente código en el módulo de clase:

Opción explícita

Función pública mathAdd(a As Integer, _

b Como entero) Como entero

mathAdd = a b

Función final

Seleccione Generar archivo DLL en el menú Archivo para generar el archivo Add.DLL. dll

2: Proyecto EXE estándar, el código de llamada es el siguiente:

Opción explícita

Función de declaración privada mathAdd Lib "Add.dll " (a Como entero, b Como entero) Como entero

Private Sub Command1_Click()

MsgBox mathAdd(Text1.Text, Text2.Text)

End Sub