Dúvida com objeto.value.replace

02/12/2008

0

Olá.

Estou usando

objeto.value.replace(/\D/g, ´´)

no evento KeyUp de um TextBox para eliminar caracteres não numéricos de um TextBox.

Alguém pode me indicar uma máscara que elimine os caracteres não numéricos com excessão do caracter vírgula ( , ) ?


Falarod

Falarod

Responder

Posts

03/12/2008

Facc

Olá. Estou usando objeto.value.replace(/\D/g, ´´) no evento KeyUp de um TextBox para eliminar caracteres não numéricos de um TextBox. Alguém pode me indicar uma máscara que elimine os caracteres não numéricos com excessão do caracter vírgula ( , ) ?


Não sei se é o seu caso, mas aí vai uma função que substitui caracteres.

    Private Function Subst(ByVal Texto As String, ByVal Isto As String, ByVal PorIsto As String) As String
        Dim i As Long
        If Len(Isto) < 1 Then
            Subst = Texto
            Exit Function
        End If

        For i = 1 To Len(Texto)
            If Mid(Texto, i, Len(Isto)) = Isto Then
                Subst = Subst & PorIsto
                i = i + (Len(Isto) - 1)
            Else
                Subst = Subst & Mid(Texto, i, 1)
            End If
        Next i
    End Function



Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar