Convert.ToUInt16 : Convert « System « VB.Net by API

1. VB.Net by API
2. System
3. Convert

Convert.ToUInt16

  
Imports System
Imports System.Text
Imports System.Text.RegularExpressions


Public Class MainClass
    Shared Sub Main(  )
        Dim shrShort As Short
        Dim shrUInt16 As UInt16
        Dim shrInt16 As Int16
        Dim intInteger As Integer
        Dim intUInt32 As UInt32
        Dim intInt32 As Int32
        Dim lngLong As Long
        Dim lngInt64 As Int64
    
        shrShort = 0
        shrUInt16 = Convert.ToUInt16(shrShort)
        shrInt16 = shrShort
        intInteger = shrShort
        intUInt32 = Convert.ToUInt32(shrShort)
        intInt32 = shrShort
        lngInt64 = shrShort
    
        lngLong = lngLong.MaxValue
        If lngLong > Short.MaxValue Then
          shrShort = Convert.ToInt16(lngLong)
        End If
        intInteger = CInt(lngLong)
    
    End Sub 'Main

   
End Class

   
    
  

Related examples in the same category