Imports System
Public Class RemoveTheFirstAndTheLastCharacterFromAString_VB_NET
Public Shared Sub Main(ByVal args As String())
Dim s As String = "vb.net programming"
s = s.Substring(1, (s.Length - 1) - 1)
Console.WriteLine(s)
End Sub
End Class
' run:
'
' b.net programmin
'