 Autor
|
Tema: borrar los 3 primeros caracteres (Leído 1,991 veces)
|
bautistasbr
 Desconectado
Mensajes: 268
|
ola a tod@s,tengo un textbox con un texto,lo q quiero hacer es q al dar al commandbutton se me borren los 3 primeros caracteres d dixo textbox,pero no se me ocurre ninguna forma d hacerlo.
Si me puedieseis exar una mano os lo agradeceria muxo
|
|
|
|
|
En línea
|
|
|
|
CodeName47/GEDZAC
Desconectado
Mensajes: 113
|
tienes que recorre el textbox como un arreglo e ir almecenanado solo los caracterres en una variable y al final asignas la variable al textbox.
un mini pseudocodigo seria asi, la verdad se me olvida la sintaxis del VB
tam = len(text1.text) 'tamaño de la palabra del textbox
for i = 0 to tam
aqui recorres letra por letra
y haces el algoritmo que guarde las que te interesa
next
las que me interesan = text1.text
no se si me entendiste la idea
saludos
|
|
|
|
|
En línea
|
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Gedzac Labs
www. Gedzac. com
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
|
|
|
|
Hendrix
|
Mucho mas facil: Dim palabra As String
palabra = "Texto" ' Aki introduce el texto que tu kieras...
MsgBox Right(palabra, Len(palabra) - 3) Salu2 |
|
|
|
|
En línea
|
"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián |
|
|
|
Gorky
|
Listo para tu codigo: Text1.Text = Mid(Text1.Text, 4, Len(Text1.Text))
PD: Es curioso la de formas que hay para hacer una misma cosa. |
|
|
|
« Última modificación: 13 Junio 2006, 18:36 pm por Gorky »
|
En línea
|
|
|
|
bautistasbr
Desconectado
Mensajes: 268
|
muxisimas gracias a todos,funciona d vicio
|
|
|
|
|
En línea
|
|
|
|
|
|
|
 |
