PERMITIR TEXBOX SOMENTE TEXTO

PEDROALSOI 10/04/2013 19:22:41
#421771
Ola queria saber o seguinte code:
Caso texbox1 ponha um numero nao seja permitido ou seja nao tem jeito de colocar numero
mas caso check um checkbox permita tipo isso:


[txt-size=1] [/txt-size] Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If (Asc(e.KeyChar) >= 48 And Asc(e.KeyChar) <= 57) Then
e.Handled = True
e = Nothing
End If
If CheckBox1.Checked Then
If (Asc(e.KeyChar) >= 57 And Asc(e.KeyChar) <= 58) Then
e.Handled = True
e = Nothing
End If
End If
End Sub
FELLIPEASSIS 10/04/2013 19:29:52
#421772 Resposta escolhida
If CheckBox1.Checked = false Then
If (Asc(e.KeyChar) >= 48 And Asc(e.KeyChar) <= 57) Then
e.Handled = True
e = Nothing
End If
Else
If (Asc(e.KeyChar) >= 57 And Asc(e.KeyChar) <= 58) Then
e.Handled = True
e = Nothing
End If
end if
Tópico encerrado , respostas não são mais permitidas
Voltar