Mega Code Archive

 

Categories / VB.Net / Development

 

Array CreateInstance(GetType(Integer), 11) to create Array

Imports System Public Class MainClass          Shared Sub Main(ByVal args As String())         Dim squares As Array = _             Array.CreateInstance(GetType(Integer), 11)         For i As Integer = 0 To 10             squares.SetValue(i * i, i)         Next i         Dim txt As String = ""         For i As Integer = 0 To 10             Console.WriteLine( squares.GetValue(i).ToString )         Next i     End Sub End Class