14/02/2006, 07:42
|
| | | Fecha de Ingreso: marzo-2005
Mensajes: 288
Antigüedad: 19 años, 2 meses Puntos: 2 | |
Mira de esta forma te ahoras codigo.
en la dll creo esta funcion
Clave: Public Function imprimir(ByVal dato As Variant)
Open "C:\prueva.txt" For Output As #1
Print #1, dato
Close #1
End Function
En tu proyecto. Private Declare Function imprimir Lib "Prueba.dll" (ByVal dato As Variant)
Private Sub Command1_Click()
imprimir "hola mundo"
End Sub
__________________ "No hay lenguaje de programación potente que sea inferior a otro semejante cuando existe un buen programador que lo defiende"
Yosvanis Cruz Alias VisualGuallabo Ycruz |