Visual Basic - ELIMINAR EL ULTIMO CARACTER DE UN TEXT

HOLA A TODOS:

A ver tengo un problemilla, lo que quiero hacer es eliminar el ultimo caracter escrito en un objeto text, es decri, tengo un codigo separado por guiones por ejemplo:

432-1-12345-99875

y lo que quiero es asignar cada valor separado por guiones a una variable por ejemplo:
variable 1 = 432
variable 2 = 1
variable 3 = 12345
variable 4 = 99875

Alguien me podria echar un cablede como podria hacerlo, porque ahora he creado un textbox por cada variable y cuando pulse la tecla (-) pasa al siguiente textbox, pero el guion se escribe y no quiero que aparezca.

Gracias de antemano.

Atentamente Raul Lopez

Con un solo textbox, lo puedes hacer, con el siguiente codigo.

Dim Cadena() As String
Private Sub Command1_Click()
Dim I As Byte
Cadena = Split(Text1.Text, "-")
For I = LBound(Cadena) To UBound(Cadena)
MsgBox Cadena(I)
Next I
End Sub

Espero te sirva. Saludos Pola

Con varios TextBox podrás hacerlo con el evento KeyPress

"Alguien me podria echar un cablede como podria hacerlo, porque ahora he creado un textbox por cada variable y cuando pulse la tecla (-) pasa al siguiente textbox, pero el guion se escribe y no quiero que aparezca."

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc("-") Then
SendKeys "{TAB}"
KeyAscii = 0
End If
End Sub