none
Corregir o Agregar Texto en un Textbox RRS feed

  • Pregunta

  • Buena Tarde a Todos...

    Solicito de su apoyo ya que actualmente estoy trabajando en un proyecto que contiene diversos TextBox, el tema es que cuando terminamos de escribir en uno de ellos y nos dimos cuenta de que nos hizo falta una letra o queremos agregar más texto entre las palabras ya escritas, solo nos permite escribir una letra y el resto nos manda el cursor hasta el final de todo lo escrito en el TextBox y ahí permite seguir escribiendo.. busco su ayuda para saber como evitar que nos mande hasta el final y nos permita corregir o agregar palabras entre lo ya escrito... Espero haber explicado correctamente y tener su apoyo.

    Gracias...

    jueves, 8 de noviembre de 2018 18:17

Respuestas

  • Agrega este código en un manejado de evento KeyPress() 

    Keyascii = Asc(UCase(Chr(Keyascii)))


    Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos

    • Marcado como respuesta Kikin Daniel sábado, 10 de noviembre de 2018 0:00
    viernes, 9 de noviembre de 2018 23:45

Todas las respuestas

  • Debes tener algún código que te cambia la posición del cursor en eventos KeyPress, KeyDown, KeyUp... del textbox o del formulario.
    Compruébalo.

    Saludos, Javier J

    jueves, 8 de noviembre de 2018 18:33
  • revisa bien los eventos KeyPress o Textchanged o KeyDown, KeyUp debes de tener algún código que te esta provocando eso...o si tienes un codigo en el evento KeyPress que al dar enter et manda el focus a otro textbox revisalo si estas trabajando así ...te dejare un código que te puede hacer eso de forma limpia...

    If e.KeyChar = Convert.ToChar(Keys.Return) Then If e.KeyChar = ChrW(Keys.Return) Then e.Handled = True Me.txtrol.Focus()' aqui va la caja de texto que desea en donde aparesca el focus al dar enter End If End If

    ese codigo metelo en el evento keypres de cada caja de texto 

    jueves, 8 de noviembre de 2018 19:42
  • gracias por la respuesta... en realidad no he utilizado KeyPress o alguno similiar, únicamente estoy utilizando Change en los textbox...

    en los textbox utilice la siguiente instrucción para que todo lo que escriba me lo ponga en mayúsculas.. 

    txtcomentainfo.Text = UCase(txtcomentainfo)

    me estoy percantando que si quito esa indicación (aparte de escribir en minúsculas) ahora si me permite hacer modificaciones en el texto que ya tengo escrito, es decir; el problema que formule en mi pregunta inicial queda solucionado, pero requiero que esos campos solo escriban con mayúsculas y en la instrucción que menciono arriba no le veo mayor problema.. me pueden orientar acerca de lo que este mal por favor

    gracias....

    viernes, 9 de noviembre de 2018 23:07
  • Agrega este código en un manejado de evento KeyPress() 

    Keyascii = Asc(UCase(Chr(Keyascii)))


    Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos

    • Marcado como respuesta Kikin Daniel sábado, 10 de noviembre de 2018 0:00
    viernes, 9 de noviembre de 2018 23:45
  • gracias Sergio, me funciono correctamente.
    sábado, 10 de noviembre de 2018 0:00