Imports System
Imports System.Collections
Public Class MainClass
Shared Sub Main(ByVal args As String())
Dim array_list As New ArrayList
array_list.Add("A")
array_list.Add(1001)
array_list.Add("")
For Each obj As Object In array_list
Console.WriteLine(obj.GetType.ToString)
Next obj
End Sub
End Class