Bueno y al fin VB6 o .NET
En VB.NET
Dim a As String
a = "Hola"
MessageBox.Show(a.Substring(0, 2))
como Tal la funcion es SubString(Inicio,Tamaño) esta funcion esta en cualquier string, lo que haces es devolver una nueva cadena, osea la cadena de la variable queda intacta.
Atentamente,
Juan Manuel Lombana