VB.Net/Language Basics/Boxing UnBoxing
Boxing and unboxing demo
<source lang="vbnet"> Imports System Public Class MainClass
Shared Sub Main() Dim myIntegerVariable As Integer = 123 " boxing Dim myObjectVariable As Object = myIntegerVariable Console.WriteLine("myObjectVariable: {0}", _ myObjectVariable.ToString( )) " unboxing (must be explicit) Dim anotherIntegerVariable As Integer = _ DirectCast(myObjectVariable, Integer) Console.WriteLine("anotherIntegerVariable: {0}", _ anotherIntegerVariable) End Sub
End Class
</source>