buenas tengan todos
tengo un problema con el control text y la posiscion del puntero.
resulta que cuando hago esto
text1.Text = vbCrLf & "[config]"
text1.Text = text1.Text + vbCrLf
me sucede lo siguiente.
1. el puntero simepre se posiciona al comienzo
2. no me pasa de "[config]" creandome un bucle infinito
como puedo solucionar el problema?
para mayor detalle les dejo el code completo:
en un form colocar un control text, un list, el text debe ser multiline
un boton
Private Sub Form_Load()
Code = 101
list1.AddItem "0" & Code
End Sub
Private Sub Command1_Click()
Code = 200
list1.AddItem "0" & Code
text1.Text = vbCrLf & "[config]"
Code = 201
list1.AddItem "0" & Code
text1.Text = text1.Text + vbCrLf
End Sub
Private Sub text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Code = Code + 1
list1.AddItem "0" & Code
End If
End Sub
hola de nuevo, lo q entendi fue q queres q el puntero del mouse se posicione al final de "[config]" proba en agregale esto:
Text1.Text = text1.Text + vbCrLf
'----
Text1.SelStart = Len(Text1)
Text1.SetFocus
despues explicame lo del listbox y de la variable Code.
mira te explico lo de code y el list box.
la verdad estoy haciendo un proyecto aparte con archivos de lenguaje (osea que mer permita esocjer el idioma para la aplicacion. y que estos esten por archivos y no dentro de la aplicacion)
esto que coloco aca es parte de otro proyeco para crear los archivos de lenguaje. uso el un listbox para identificar donde deben ir las lineas de codigo que estan en el textox a la hor de guardar, usando la variable code para generar un codigo seguido(este codigo es para cuando lo lea la aplicacion que sus componentes van en orden
en el ejemplo que deje arriba me falta colocar una parte que es identiifcar el formulario que seria [nombre Form] y en el list este kedaria vacio. pero eso lo arreglo yo.
me sirvio tu ejemplo te agradezco mucho la ayuda de nuevo, muchas gracias de nuevo