1Imports Microsoft.VisualBasic.Strings
2
3Class ExternalModuleFunction1
4    Shared Function Main() As Integer
5        Dim str As String = "abc"
6        Dim i As Integer
7        i = instr(str, "a") - 1
8        Return i
9    End Function
10End Class