SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Jamaicol en Lunes 31 de Octubre de 2005, 14:27

Título: Sobre El Manejo De Formatos
Publicado por: Jamaicol en Lunes 31 de Octubre de 2005, 14:27

Pues tengo un combobox que quiero que me saque porcentajes, y mi duda es, como hago para que cuando yo le meta un valor a mano en la casill y apriete enter me ponga el detras automaticamente el simbolo del tanto por cien.
No se como darle formato a eso.

Título: Re: Sobre El Manejo De Formatos
Publicado por: cpmario en Lunes 31 de Octubre de 2005, 18:46

Puedes hacerlo cuando presionas enter o al perder el foco.

Código: Text

1.  
2. Private Sub Combo1_KeyPress(KeyAscii As Integer)
3.     If KeyAscii = 13 Then
4.          KeyAscii = 37
5.     End If
6. End Sub
7.  
8. Private Sub Combo1_LostFocus()
9.     If Right$(Combo1.Text, 1) <> "%" Then
10.         Combo1.Text = Combo1.Text & "%"
11.     End If
12. End Sub
13.  
14.  

 :comp: