lo veo bastante util 
gracias! salu2!

gracias! salu2!
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ú

Cita de: youungest en 24 Diciembre 2007, 01:32 AM
mmmm
se me hara dificil porq no entendi lo q dijo demonioxx
eso lo del bucle :S
For i = 0 To Len(Text1.Text)
'aca pones lo que se repetira tantas veces x letras osea lo que buskara la letra y la reemplazara..
Next i
para cambiar las letras haces un bucle con el len de las letras y reemplaza cada letra... entonces dpue le agregas las boludeces de los costados y ponele que esas boludeces a los costados le pones una variable que diga que ya fue puesto tal boludes.. entonces pasa a la siguiente.. y asi...
:P
Cita de: vivachapas en 22 Diciembre 2007, 22:14 PM
jaja mira hagamos esto para q ganes algo jeje
mira en el primer post...
jajaj xD... lo que ingresa es Pedro, favor de responder esta pregunta: (los : activa la accion)

Dim i As Long
For i = 1 To ListConexion.ListItems.Count 'Creamos un bucle
vIndex = Split(ListConexion.ListItems(i).Key, "|||")
If ws(vIndex(0)).State <> 7 Then 'Si no estamos conectado
ListConexion.ListItems.Remove (i) 'Elimnaos la conexion
End If
Next i 'Cerramos el bucle