Autor
|
Tema: borrar los 3 primeros caracteres (Leído 2,182 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
|
|
|
|
|
|
|