Visual Basic - Fallo en rutina para mayusculas

Life is soft - evento anual de software empresarial
 
Vista:

Fallo en rutina para mayusculas

Publicado por pedro (155 intervenciones) el 24/05/2005 23:22:39
Hola foreros

Tengo la siguiente rutina para convertir a mayusculas el texto que se ingresa en un combo:

Public Sub Mayus (caja as control)
caja=UCase(LTrim(caja))
caja.selstart=Len(caja)
end sub

Esta se la llama en el evento change, entonces por cada caracter se convierte a mayusculas, hasta ashi todo bien. Pero cuando se quiere modificar alguna letra o letras del medio de la palabra ingresada me posiciona al ultimo del text (por esta sentencia caja.selstart=Len(caja))

Como puedo hacer para solucionar esto? pense en que haga la conversion letra por letra, no la cadena completa ...pero como lo hago,

gracias y 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:Fallo en rutina para mayusculas

Publicado por manolo (3 intervenciones) el 25/05/2005 10:06:23
Public Sub Mayus (caja as control)
Dim Posicion As Integer 'Posicion del cursor dentro del texto
Posicion = caja.SelStart
caja=StrConv(caja, vbUpperCase)
caja.selstart=Posicion
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

RE:Fallo en rutina para mayusculas

Publicado por pedro (155 intervenciones) el 26/05/2005 22:22:06
gracias por la ayuda, lo voy a probar y te posteo para contarte como me fue.

salu2
pedro
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

RE:Fallo en rutina para mayusculas

Publicado por pedro (155 intervenciones) el 27/05/2005 22:02:24
gracias por la ayuda, me sirvio perfectamente.

pedro
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