TXTS
gostaria de saber como faço para que um txtbox possa receber somente os valores: "O" "B" "R" e "F" 
vlw pela atenção
flw
[S46]
vlw pela atenção
flw
[S46]
No evento KeyPress do Textbox, coloque:
Select Case KeyAscii
Case Asc("O")
Case Asc("B")
Case Asc("R")
Case Asc("F")
End Select
Só isso, se o código for igual a um que está dentro do Select Case, ele vai permitir. Você também pode colocar direto o código ASCII dentro do Select Case.
Flw!
Select Case KeyAscii
Case Asc("O")
Case Asc("B")
Case Asc("R")
Case Asc("F")
End Select
Só isso, se o código for igual a um que está dentro do Select Case, ele vai permitir. Você também pode colocar direto o código ASCII dentro do Select Case.
Flw!
Eu vou tentar aqui, já retorno!
Aqui funcionou assim:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case UCase(Chr(KeyAscii))
Case "O"
Case "B"
Case "R"
Case "F"
Case Else: KeyAscii = 0
End Select
End Sub
Certo! Testa ae e me retorna!
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case UCase(Chr(KeyAscii))
Case "O"
Case "B"
Case "R"
Case "F"
Case Else: KeyAscii = 0
End Select
End Sub
Certo! Testa ae e me retorna!
Tópico encerrado , respostas não são mais permitidas