Imports System
Public Class Test
Public Shared Sub Main()
Dim s As String = "c++ c php vb.net java golang vb.net nodejs"
Dim pos As Integer = s.LastIndexOf("vb.net")
If (pos <> -1) Then
Console.Write("{0} {1}", pos, s(pos))
Else
Console.Write("not found")
End If
End Sub
End Class
' run:
'
' 29 v
'