sable
NZ1

Desconectado
Mensajes: 96

Todo lo k aces tiene su resultado en el futuro
|
 |
« Respuesta #3 : 27 de Octubre de 2007, 08:46:00 » |
|
este es mi kode
Private Sub Command1_Click() Dim a As Currency Call Shell("C:\Archivos de programa\Windows Live\Messenger\msnmsgr.exe") lista: a = Rnd(a, B, C, D, E, F, G, H, I, J, K, L, M, N, Ñ, O, P, Q, R, S, T, U, V, W, X, Y, Z, a, B, C, D, E, F, G, H, I, J, K, L, M, N, Ñ, O, P, Q, R, S, T, U, V, W, X, Y, Z, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0) End Sub
me da error pero mas o menos lo k kiero hacer es ke todas las letras funcionen de forma aleatoria para sacar un password
|