Imports System Imports System.Globalization Class Sample Public Shared Sub Main() Dim result As Boolean Dim uint16Val As UInt16 result = UInt16.TryParse("9", NumberStyles.Integer, Nothing, uint16Val) Console.WriteLine(uint16Val.ToString()) End Sub End Class