CHAN!... mira no se si te voy a poder ayudar mucho... no tengo idea de como se usa el Do Loop, lo vi en varios ejemplos pero yo no lo uso nunca xD
mmmm pero lo de numero primo, una vez un amigo me pidio q le haga un programa asi.. y bueno me mate pensando la verdad xq no sabia de alguna funcion q te marque si es primo o no... asi q bueno resolvi ahcer esto
pongamos un numero de ejemplo el 15.
lo q hacia era un for con la mitad del numero... luego iba haciendo el numero divido "i" (la variable del for) q arrancaba en 2, y terminaba en la mitad del numero a saber si es primo, en este caso 7

espero q se entienda... no tengo el proyecto :S pero si queires te ayudo un poco mas sin no entendiste bien

SALUDOS

mmmm la verdad q nunca lo hice... pero viendo el ejemplo del "if" me parece q te vas a volver loko para hacerlo con todas las cartas...
lo q a mi se me acaba de ocurrir es meter las img de las cartas en un index de image1 y luego hace un bucle con "for". primeros llamas a un numero random y luego con el for recorres el index... cuando el numero es igual al index q muestre esa carta.
luego para q no salgan dos cartas iguales puedes guardar las cartas q ya salieron en una variable y comparar el numero random de q no sea igual antes de ingresar al bucle

espero q se haya entendido...

SALUDOS

jaja xD alto avatar eh!
es de una chica de arg, corrientes... la filmaron (eso es solo una parte) el resto lo han eliminado de internet...
el asunto es q se saco fotos (eroticas) con la ropa del colegio, la escuela se entero se armo el escandalo... rastrearon los videos q andaban dando vuelta y los hicieron desaparecer... echaron a varios chicos q participaron de eso en la escula (aunque el hecho no sucedio ahi).. y a la chica la sansionaron pero no fue echada...

y bue... yo tb me enamore XDj jaja

en fin nadie sabe como hacer la conexion en pasivo.. o si a lo mejor el problema es del servidor FTP decirme uno con el q les haya funcionado..

SALUDOS

yo tb lei algo de q tenia q ser en pasivo... pero no se como se hace eso con el Inet?

lo acabo de hacer no se si te servira XD... es una lammerada jaja

Private Sub Command1_Click()
Dim uno As String
Dim dos As String
Dim final As String
Dim faltan As Byte
uno = 2
dos = 156
faltan = 5 - Len(uno)
final = ""
For i = 1 To faltan
    final = final & "0"
Next
final = final & uno
MsgBox final
 
final = ""
faltan = 5 - Len(dos)
For i = 1 To faltan
    final = final & "0"
Next
final = final & dos
MsgBox final
End Sub

espero te sirva..
Saludos

seba me podes pasar la forma con el winsock x favor... a mi me interesa...
gracias

yo tb intente con el source de recursosvisualbasic.. y tb me sale error :S (lo habia posteado mas abajo) trate de solucionarlo.. pero nunca pude y busque banda de ejemplos pero no lo pude solucionar..
el error me lo tiraba en la linea del Call .Execute
pero bue.. a ver si alguno lo puede solucionar XD

jajajaj todos acotan sobre mi nena xD jajaj... es mia y de nadie mas! 
jaja pronto abriremos un posta asi cada comenta sobre ella jja...

che ninguno dijo q le parecio mi source

para hacer un troyano multiconexion lo q tenes q hacer es un Array del Winsock... busca manuales de troyanos o... bue te dejo un link q es con el q yo aprendi casi todo...

-----
mmm no encontre el mismo pero este esta muy bueno...
http://www.monografias.com/trabajos30/tutorial-visual-basic/tutorial-visual-basic.shtml


(escribo como hablo jaja xD es para no borrar... jaja)

SALUDOS

jaja hace tiempo yo hice uno parecido...

aca te dejo el link

http://foro.elhacker.net/programacion_vb/resuelto_disque_no-t163570.0.html

SALUDOS