quitar una letra de un textbox

[palmerasistemas]

Este codigo te ayudará, saludos.
llamame histoclin.

Me.TextBox1.Text = "G12"

'seleciconamos G
Me.TextBox1.Select(0, 1)
Dim var1 As String
var1 = Me.TextBox1.SelectedText
MsgBox(var1)

'seleciconamos 12
Me.TextBox1.Select(1, 2)
Dim var2 As Integer
var2 = Me.TextBox1.SelectedText
MsgBox(var2)