VB.Net Tutorial/Data Type/Integer Family
Версия от 16:40, 26 мая 2010; (обсуждение)
Hexadecimal Byte, UInteger and Integer
Option Strict On
Public Module modMain
Public Sub Main()
Dim maxValue As Byte = &HFF
Dim posValue As UInteger = &HF034
Dim negValue As Integer = &HF034
Console.WriteLine(maxValue)
Console.WriteLine(posValue)
Console.WriteLine(negValue)
End Sub
End Module
255 61492 61492
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