Visual Basic - NUMEROS NEGATIVOS EN UN TEXTBOX

MI PROBLEMA ES EL SIGUIENTE, TENGO UN TEXTBOX Y YA LOGRE QUE SOLO ACEPTE NUMEROS (NO LETRAS), PERO REQUIERO AHORA QUE PUEDA ACEPTAR NUMEROS NEGATICOS. O SEA, QUE PUEDA ACEPTAR SOLO EL SIMBOLO MENOS (-), SOLO UNA VEZ Y AL PRINCIPIO DE LA CANTIDAD. QUE RUTINAS UTILIZAN USTEDES PARA INTRODUCIR TANTO NUMEROS POSITIVOS COMO NEGATIVOS EN UN TEXTBOX Y QUE A LA VEZ ACEPTE SOLO NUMEROS?

GRACIAS

En el evento keypress de un textbox puedes validar que caracteres son los unicos que quieres

Private Sub Text1_KeyPress()

If KeyAscii < 48 Or KeyAscii > 57 Then ' solo los numeros
If KeyAscii <> 46 Then 'me parece que este es el signo negativo
If KeyAscii <> vbKeyBack Then 'solo returno de carro
If KeyAscii <> vbKeyReturn Then 'la tecla enter
KeyAscii = 0
End If
End If
End If
End If

solo busca el caracter ascii de el signo de menos y listo

Funciona perfecto para realizar operaciones cuando el número es negativo.. La pregunta es como avanzar al siguiente textbox. utilizando la misma rutina.Si me pueden ayudar Gracias.