none
Permitir coma RRS feed

  • Pregunta

  • Hola, programo en Vb y he intentado hacer que el evento keypress de un textbox me permita usar sólo una coma, el dilema redica en que debo hacerlo con select case, en italic dejo el código que deseo usar como select case, de antemano gracias

                                   

    Private Sub TxtBase_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtBase.KeyPress

            Select Case Asc(e.KeyChar)
                Case 48 To 57, 8
                Case 44
    If InStr(TxtBase.Text, ",") <> 0 Then 
                        e.Handled = True
                    End If
                Case 13
    If TxtBase.Text <> "" Then
                        TxtAltura.Focus()
                    End If
                Case Else
                    e.Handled = True

            End Select
        End Sub 

    • Cambiado Enrique M. Montejo viernes, 8 de abril de 2016 6:19 Pregunta relacionada con controles de Windows Forms.
    miércoles, 6 de abril de 2016 2:53

Todas las respuestas