Mega Code Archive

 
Categories / VB.Net Tutorial / Data Type
 

Integer Family MaxValue

Public Class Tester     Public Shared Sub Main         Dim result As New System.Text.StringBuilder()         result.AppendLine("MaxValue...")         Dim maxByte As Byte = Byte.MaxValue         Dim maxSByte As SByte = SByte.MaxValue         Dim maxShort As Short = Short.MaxValue         Dim maxUShort As UShort = UShort.MaxValue         Dim maxInteger As Integer = Integer.MaxValue         Dim maxUInteger As UInteger = UInteger.MaxValue         Dim maxLong As Long = Long.MaxValue         Dim maxULong As ULong = ULong.MaxValue         result.Append("Byte ").AppendLine(maxByte)         result.Append("SByte ").AppendLine(maxSByte)         result.Append("Short ").AppendLine(maxShort)         result.Append("UShort = ").AppendLine(maxUShort)         result.Append("Integer = ").AppendLine(maxInteger)         result.Append("UInteger = ").AppendLine(maxUInteger)         result.Append("Long = ").AppendLine(maxLong)         result.Append("ULong = ").AppendLine(maxULong)         Console.WriteLine(result.ToString())      End Sub End Class MaxValue... Byte 255 SByte 127 Short 32767 UShort = 65535 Integer = 2147483647 UInteger = 4294967295 Long = 9223372036854775807 ULong = 18446744073709551615