Visual Basic String Substring Function C