Manual - Crear una DLL con Visual Basic

[ranefi]

Wazzzzzzzzaaaa apening batos locos cholos marihuanos,     ¿Cómo se les va? Jejejeje. Güeno, pues aquí me tienen "de nuez", en esta publicación vamos a ver como crear una apestosa DLL, quizá se pregunten     ¿Para qué diablos me va a servir una cochinada de ésas? Pues mis queridos amigos, permítanme informarles pa’ qué sirve una cochinada de éstas, pos pa’ nada, jajajajajaja, no peladetes, no es cierto,  bueno, pues una librería nos sirve para personalizar nuestros cuadros de mensajes y muchas cosas más, pero mis estimados caballeros, no es intención de éste humilde manual el hacerles conocer para que funcionan las DLL’s sino aprender a crearlas, ya más adelante ustedes verán para que les sirve. Bueno, pues “Lets move the body folks”:

Primero abriremos Visual Basic y elegiremos la opción “DLL ActiveX” e inmediatamente agregamos un hermoso Formulario, ya conocen todo el proceso para agregar un formulario, así que me voy a limitar a mostrar solamente las imágenes (    ¡Ay de mí!     ¡    ¿Por qué seré tan flojo?! Jeje):

Recuerden, es “DLL ActiveX”


Agregamos un hermoso Formulario



Ahora agregamos un control llamado Image, cambiamos su propiedad Name “(Nombre)” por imaIcono y por último localizamos su propiedad Picture y elegimos un icono de nuestra colección (el que ustedes quieran o tengan):

Dibujen el control Image


Cambien la propiedad Name del control


Elijan una imagen en la propiedad Picture



Ahora pelaos, vamos a agregar un control Label y vamos a cambiar su propiedad Name “(Nombre)” por lblMensaje:

Dibujen el control Label o etiqueta


Cambien la propiedad Name del control por lblMensaje



Lo que sigue es dibujar el control CommandButton en nuestro formulario y cambiar su propiedad Name por cmdOkas:

Dibujen el control CommandButton


Cambien la propiedad Name del CommandButton por cmdOkas



Ya casi peladetes, ahora den clic sobre el Formulario, localicen la propiedad Name “(Nombre)” y escriban frmMensaje:

Clic sobre el formulario y cambiamos su propiedad Name por frmMensaje



Bueno, lo que falta es dar clic sobre Proyecto1, localizamos la propiedad Name “(Nombre)” de Proyecto1 y escribimos MalditasDLLs




Nos regresamos al formulario (frmMensaje) y nos vamos a la “vista código” y escribimos lo siguiente:

Código:

Private Sub cmdOkas_Click()
    Unload Me
End Sub

Nos situamos en Class1 con doble clic y escribimos el siguiente código y en el cuadro de propiedades localizamos la propiedad Instancing y elegimos 6-GlobalMultiUse:

Código:

Public Sub MensajeDeCaca(MugrosoTitulo As String, _
    MugrosoMensaje As String, MugrosoBoton As String)
   
    Dim FormularioCaca As Form
   
    Set FormularioCaca = New frmMensaje
   
    With FormularioCaca
        .Caption = MugrosoTitulo
        .lblMensaje.Caption = MugrosoMensaje
        .cmdOkas.Caption = MugrosoBoton
        .Show vbModal
    End With
End Sub

Ya estamos situados en Class1 y cambiamos su propiedad Instancing y elegimos 6-GlobalMultiUse


Escribimos el código



Lo que tenemos que hacer ahora es compilar nuestra DLL, ya saben donde peladetes, nos vamos a Archivo-Generar MalditasDLLs.d ll… Les recomiendo grabar su proyecto “de un ave” (de una vez) para que no vayan a tener problemas, tambor (también) les recomiendo que graben la DLL en una carpeta de fácil acceso:

Estamos por compilar la DLL


Ahora elegimos la ruta que deseemos



Güeno, pos ya casi terminamos, ahora lo que debemos hacer es abrir un proyecto nuevo y elegir “EXE estándar”

Elegimos EXE estándar



Dibujamos un CommandButton en nuestro formulario:



Seleccionamos la opción Referencias del menú Proyecto:



Buscamos nuestra DLL compilada, en éste caso se llamará MalditasDLLs y la elegimos:



Ya para terminar, nos vamos a la “vista código” y escribimos lo siguiente:

Código:

Private Sub Command1_Click()
    MensajeDeCaca "Hola mundo", _
        "Yo soy aquél, el ranefi" & _
        " y vengo del pandemonio de ranefilandia", _
        "Okas dijo la foca"
End Sub

Así debe quedar el cochino código



Ya pa’ que amarre (para concluir), ejecutamos la aplicación y damos clic en el botón que agregamos, si todo sale bien, aparecerá una imagen como la siguiente:




Pero si no lo hace, pos formateen su PC, Ojoi Ojoi Ojoi Ojoi Ojoi Ojoi Ojoi, jijijijijijiji, no se crean HentaiBoys, lo único que tendrán que hacer es verificar el nombre de cada control o el código, es por eso que en este manual utilicé nombres para cada control. Pues bueno mis estimados, hasta aquí los dejo, ya es muy tarde y mañana tengo que ir “al otro lado” a comprar gasolina ya que aquí ta’ muy cara; espero y hayan entendido toda esta porquería, si tienen alguna duda, sólo récenle a la Virgen de Guadalupe que ella vendrá a ayudarlos, ajajajaajajaja jaja, toy jugando amigos, simplemente “mándenme un bipazo” jajajajajaja, no, jajajaja, escríbanme al correo que tengo registrado en el foro y se finir. Au revoir cochinotes.


PD: Esto lo aprendí ya hace mucho de una página que se llama “El gurú programador”, no estoy seguro si el manual siga en línea, pero si desean otro tipo de explicación, pues bueno, vayan a San Google y háganle la pregunta sobre dicho manual.


Para ver este enlace Registrate o Inicia Sesion

Ejemplo cochinón

[ranefi]

    ¡Vamos peladetes!     ¡    ¿A qué esperan cochinones?! Entren para aprender algo nuevo.


Después publicaré cómo crear informes en Visual Basic y sin código usando el Data Enviroment y Data Report. Nos vemos.

[Redhacker]

oye yo tengo vb 2005 tengo q crear una classlibary o no es lo mismo?

[CiberPunk]

de maravillas ranefi ahora si q comprendi halgo de como actuan los dll en nuestras PC's buena excelente:

[ranefi]

Muchas gracias, me alegra que les haya gustado peladetes.

[braian]

ranefi esta super bien explicado y como decia caligastia yo tambien casi me parto de risa, gracias por esta explicacion compadre.

[Kaique]

waaaaa....    ranefi     

se te descolgo el host en Yahoo, no se puede ver nada , podes arreglarlo Plz, toy interesado en verlo wey

[ranefi]

waaaaa....    ranefi     

se te descolgo el host en Yahoo, no se puede ver nada , podes arreglarlo Plz, toy interesado en verlo wey

Corregido está.  ; )

[kafmany]

Hola ranefi muy bueno el tutorial.. pero yo tengo una duda:
mi dll creada: libreria.dll yo la tengo en el directorio de mi programa.

El problema es que no puedes cambiar la libreria.dll de sitio porque si no el programa.exe no funciona. Sabes cómo se puede hacer para arreglar esto??
Es decir, que el programa llame a la libreria.dll desde el mismo directorio que la aplicación.

[ranefi]

Hola ranefi muy bueno el tutorial.. pero yo tengo una duda:
mi dll creada: libreria.dll yo la tengo en el directorio de mi programa.

El problema es que no puedes cambiar la libreria.dll de sitio porque si no el programa.exe no funciona. Sabes cómo se puede hacer para arreglar esto??
Es decir, que el programa llame a la libreria.dll desde el mismo directorio que la aplicación.

Hola kafmany, buena tarde y bienvenido al foro. Emmmmm bueno, un ejemplo muy burdo y poco recomendable sería el siguiente:

Código:

Sub Pausar(Intervalo As Integer)
    Dim X
   
    X = Timer

    Do While Timer - X < Val(Intervalo)
        DoEvents
    Loop
End Sub

Private Sub Form_Load()
    Dim Ruta As String
   
    Ruta = App.Path & "\"
   
    Shell "REGSVR32 " & Ruta & "CacaDLL.dll"
   
    Pausar 0
   
    SendKeys "{ENTER}"
   
    Unload Me
End Sub

Pero sólo es un ejemplo muy simple, existen otras formas, pero por lo menos ya tienes una idea de cómo hacerlo. Nos vemos.

[kafmany]

Muchas gracias me has dado la idea:

Código:

Shell "REGSVR32 /s " & Ruta & "midll.dll"

Lo único que ahora no se sabe si se ha registrado correctamente o no.. en ello estoy
MUCHAS GRACIAS..

[masturvin]

                                                                                   ranefi
                                                                                                                                                 
   estoy profundamente agradecido por todos tus aportes
                                                     puesto que admito que algunos de tus codigos
                                             los e utilizado para experimentar y valla que funcionan.

<***-[RANEFI ¡¡¡MUCHAS GRACIAS]-***>




                                                                                                        Nota: Disculpa las faltas de ortografia!!!

[>> s E t H <<]

no se ven las imagenes :s
y ademas veo tu post con letras raras

xfas arreglalo asi hago algo

pd: pegalo

[>> s E t H <<]

ya esta... era problema mio??

[zXxOsirisxXz]

sip. Ese post es viejo, y desde hace mucho tenia esas imagenes. Ahora el avatr de ranefi parece k se fue o el lo cambio :S