Hola a todos. Les voy a mostrar como ejecutar código en "tiempo de diseño" de Visual Basic, en otras palabras, como dañar una PC ajena con el código fuente sin compilar de Visual Basic (no se hagan, si pa' eso quieren aprender esto, jajajaja). Okas, bon appétit:
Primero debemos comenzar abriendo Visual Basic, pues obvio, aún no llegamos al nivel de dañar un PC con la mente, jejejeje.
Ahora vamos al menú Proyecto y elegimos "Agregar Control de Usuario"
Te va a aparecer el siguiente cuadro, selecciona "Control de Usuario"
Te va a aparecer un formulario como el siguiente:
Da doble clic sobre dicho formulario y escribe el siguiente código:
mciSendString "Set CDAudio Door Open", "", 127, 0
MsgBox "Ajajajaja, tambor pude ejecutar un troyano en tu PC", _
vbCritical, "Ajajaja"
Mira peladete cochino, debe quedar así:
Ahora agrega un módulo, recuerda, ve al menú Proyecto->Agregar Módulo, te debe aparecer una ventana como ésta:
Escribe el siguiente código:
Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" _
(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _
ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Mira, así debe quedar:
Ya por último, agrega el control que acabas de crear al formulario de inicio (quiero decir a Form1), ejemplo:
Notarás que el código se ejecutó, en pocas palabras, se abrió la unidad de tu CD y apareció un mensaje, ahora graba
tu proyecto y cierra todo, después vuelve a abrir el proyecto y abre Form1, ya verás lo que pasa. MUHAHAHAHAHA, como ven
es facilísimo dañar una PC con el puro código fuente de Visual Basic y sin haber compilado; obviamente, el pelao debe
tener Visual Basic.
Saben peladetes, hay una forma para ejecutar dicho código con el simple hecho de abrir el código fuente y no el
formulario (en este caso Form1), pero no se las voy a decir, suficiente es con haberles transmitido semejante
conocimiento. Güeno pelaos, nos vemos.
Código de ejemplo
Autor