Imports System

Public Module Module1

    Public Sub Main()

        Dim myString as String = "234"

        Dim result as Long

        If Long.TryParse(myString, result) Then

            Console.WriteLine(result)

        Else

            Console.WriteLine("Failed!")

        End If

    End Sub

End Module