Ir para conteúdo
Fórum Script Brasil
  • 0

Quero uma função que bloqueia números negativos...


Guest Aaron Godoy

Pergunta

Guest Aaron Godoy

Gostaria de saber se tem uma função que bloqueia números negativos, se ela poderia de alguma maneira bloque-los na text box, assim como retkey que eu uso que não permite letras...

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0

Este Quote é de outro fórum e soluciona sua questão:

tiagosandrade

27-May-2005, 22:05

No meu caso deu certo assim

Private Sub txtRaio_KeyPress(KeyAscii As Integer)

If KeyAscii = 46 Then

Exit Sub

ElseIf KeyAscii < vbKey0 Or KeyAscii > vbKey9 Then

KeyAscii = 0

End If

End Sub

Mas se quiser validar (. , e backspace) faça assim

Private Sub txtRaio_KeyPress(KeyAscii As Integer)

If KeyAscii = 46 Or KeyAscii = 44 Or KeyAscii = 8 Then

Exit Sub

ElseIf KeyAscii < vbKey0 Or KeyAscii > vbKey9 Then

KeyAscii = 0

End If

End Sub

Pra saber o valor das teclas eu fiz um programinha basico veja:

num textbox

Private Sub txt1_KeyPress(KeyAscii As Integer)

MsgBox KeyAscii

End Sub

so digitar q o programa mostra o valor

Espero ter ajudado.

Link para o comentário
Compartilhar em outros sites

  • 0
Este Quote é de outro fórum e soluciona sua questão:

tiagosandrade

27-May-2005, 22:05

No meu caso deu certo assim

Private Sub txtRaio_KeyPress(KeyAscii As Integer)

If KeyAscii = 46 Then

Exit Sub

ElseIf KeyAscii < vbKey0 Or KeyAscii > vbKey9 Then

KeyAscii = 0

End If

End Sub

Mas se quiser validar (. , e backspace) faça assim

Private Sub txtRaio_KeyPress(KeyAscii As Integer)

If KeyAscii = 46 Or KeyAscii = 44 Or KeyAscii = 8 Then

Exit Sub

ElseIf KeyAscii < vbKey0 Or KeyAscii > vbKey9 Then

KeyAscii = 0

End If

End Sub

Pra saber o valor das teclas eu fiz um programinha basico veja:

num textbox

Private Sub txt1_KeyPress(KeyAscii As Integer)

MsgBox KeyAscii

End Sub

so digitar q o programa mostra o valor

Espero ter ajudado.

Brigadão cara, ajudou sim...

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...