Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
dim b() as variant ' o el tipo que sea
If (Not Not b) = False Then '
'no se inicializo (hay que dimensionarlo)
Else
'esta inicializado
End If
Cita de: XxX--Underwar--xXx en 20 Marzo 2011, 18:36 PM
No lo se algo se puede ocurrir.. talvez mandandole un correo a una persona X de la casa de la victima a la que tu conoscas.. como ahora es muy comun el facebook podrias agregarlo a amigos y despues convenserlo que se meta en pagina X... mm muchas formas jeje pero la verdad esas ya estan muy quemadas lol
Declarar d como cadena
Declarar da como cadena
De s = 1 a Tamaño(Text1)
d = SubCadena(Text1, s, 1)
da = SubCadena(Text1, s + 1, 1)
si d = da hacer
L = L + 1
sino
cadena = concatenar( L , d )
si L <> 0 hacer
Text2.Text = concatenar( Text2 , cadena )
sino
Text2 = concatenar( Text2 , d )
Fin Si
L = 0
Fin Si
Siguiente s