Visual Basic para Aplicaciones - VARIABLE STRING QUE CRECE N-VECES AYUDA¡¡¡¡

Life is soft - evento anual de software empresarial
 
Vista:

VARIABLE STRING QUE CRECE N-VECES AYUDA¡¡¡¡

Publicado por Oskar (15 intervenciones) el 19/09/2003 17:19:06
HOLA:
VARIABLE STRING QUE CRECE N-VECES AYUDA¡¡¡¡
NECESITO QUE SE ALMACENE EN UNA VARIABLE UN TEXTO QUE EL USUARIO INTRODUCE EN UN TEXTBOX Y QUE AL ABANDONAR EL PROCEDIMIENTO PERMANEZCA ESTE ALMACENAMIENTO, Y QUE AL HACER DENUEVO ESTE PROCEDIMIENTO LA CADENA CREZCA CON LO QUE YA TENIA ALMACENADO Y LO QUE SE INDODUJO DE NUEVO.. Y ASI SUCESIVAMENTE.... NO SE SI USAR ERREGLOS Y DE QUE MANERA SE PUEDA USAR UNA DOS VARIABLES.....
CUALQUIER COMENTARIO TE LO AGRADECERIA MUCHO..
SALUDOS..
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

RE:VARIABLE STRING QUE CRECE N-VECES AYUDA¡¡¡¡

Publicado por J.Fernando (39 intervenciones) el 23/09/2003 19:19:35
Una Idea

Dim Palabra As String

Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
on Error Resume Next
'La condición te ayudará a recortar la palabra en caso
'de que presionen BackSpace

If KeyCode = 8 Then
Palabra = Mid(Palabra, 1, Len(Palabra) - 1)
Open "C:\Texto.Txt" For Output As #1
Print #1, Palabra
Close #1
End If
End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
On Error Resume Next
Open "C:\Texto.Txt" For Input As #1
Line Input #1, Palabra
Close #1
Palabra = Palabra & Chr(KeyAscii)
Open "C:\Texto.Txt" For Output As #1
Print #1, Palabra
Close #1
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar