Validar un textbox ya sea que ingrese numeros o letras dependiendo de dos radiobutton

[joellomaximo]

hola que tal quisiea saber como puedo hacer para validar un text box ya que existen dos radiobuton en mi formulario de VISUAL BASIC. En el primer radiobuton1 que solo ingresen numeros y no letras en el textbox1, en el segundo radiobuton2 que solo ingrese letras y no numeros en el textbox1
OJO : QUE SOLO TENGO DOS RADIOBUTONS Y UN SOLO TEXTBOX
desde ya muchisimas gracias se que es faciel por favor ayudenme

[STK_Pablo]

en el evento keypress del textbox verificas que radiobutton esta con value=true y en base a eso utilizas para los numeros:

Código vb:

If InStr("0123456789", Chr(KeyAscii)) = 0 Then
        KeyAscii = 0
      End If
 

y para las letras:

Código vb:

If InStr("ABCDEFG.....xyz", Chr(KeyAscii)) = 0 Then
        KeyAscii = 0
      End If
 

Espero que con esto te alcance para lo que necesitas


en definitiva, te quedaria algo as{i dentro del keypress del txtbox

Código vb:

Private Sub txtBox_KeyPress(KeyAscii As Integer)
  If KeyAscii = 13 Then SendKeys "{Tab}": KeyAscii = 0: Exit Sub
  If KeyAscii = 8 Then Exit Sub   'Si es retroceso salir de la funcion
  If radiobutton(0).Value Then          'Numerico por ejemplo
      If InStr("0123456789", Chr(KeyAscii)) = 0 Then
        KeyAscii = 0
      End If
  ElseIf radiobutton(1).Value Then          'Texto por ejemplo
      If InStr("ABCDEF......VWXYZabcdefgh.....xyz", Chr(KeyAscii)) = 0 Then
        KeyAscii = 0
      End If
  End If
End Sub