Mensajes

¡No sirven!

Y luego que sigue, "santa claus no existe"?

11. El rugido que escuchamos cuando ponemos un caracol de mar cerca del oído no es sonido el océano, sino el de nuestra sangre mientras pasa por las venas de la oreja.

Demonios!, mi vida ya no tiene sentido. 
Que caso tiene seguir viviendo?

Pero para qué quiere guardaespaldas ??
No creo que nadie se plantee secuestrar a Ratzinger......

Pues en mi pueblo los guardaespaldas no solo se usan para protegerse de los secuestros...

Que planeas? 
jeje

Hey! pero no nos dejes con la duda(al menos a mí), de que se trataba?

A la hora de llamar a la funcion "AAA", en vez de:

Código (vb) [Seleccionar] Expandir


BBB (AAA)


Usa:

Código (vb) [Seleccionar] Expandir


Call BBB(AAA)


ó

Código (vb) [Seleccionar] Expandir


BBB AAA


Ya que usar una variable en parentesis se esta indicando el valor de la variable.

Saludos!

 

Imagen?

Quieres colocar "Tuenti - Windows Internet Explorer" en donde dice "Form1" ó quieres colocar el icono de Internet Explorer en donde esta el del Form?

Si es lo primero, la propiedad se llama "Caption", si es lo segundo se llama "Icon", y si no es ninguna de las dos anteriores marque "1"... No, no, si no es ninguna de las dos anteriores no entiendo lo que quieres hacer, si te pudieras explicar un poquito mejor.

Saludos!

Como que solo te abre ejecutables? 

No, te debe abrir todos (o casi todos), los tipos de archivos.

Código (vb) [Seleccionar] Expandir


Archivo = "C:\otroarchivo.dat"
Archivo = "C:\otroarchivo.dll"
Archivo = "C:\otroarchivo.com"


Código (vb) [Seleccionar] Expandir


Hex$(OffSet(584) & Hex$(OffSet((585)))


Código (vb) [Seleccionar] Expandir


Dim Archivo As String
Dim FF As Integer
Dim OffSet() As Byte
Dim fLen As Long

Archivo = "C:\Executable.exe"
FF = FreeFile

Open Archivo For Binary As FF
fLen = LOF(FF)
ReDim OffSet(fLen)
Get FF, , OffSet
Close FF

MsgBox "Contenido del OffSet 584: " & Hex$(OffSet(584)) ' Offset 584


Espero y te sirva Saludos!