Imports System
Public Class Test
Public Shared Sub Main()
Dim s As String = "c# javascript php c c++ python vb.net"
Dim last_space_pos As Integer = s.LastIndexOf(" ")
Console.WriteLine(last_space_pos)
Console.WriteLine(s(last_space_pos - 1))
Console.WriteLine(s(last_space_pos + 1))
End Sub
End Class
' run:
'
' 30
' n
' v
'