Initialize BitArray with False values
Imports System Imports System.Collections Public Class SamplesBitArray Public Shared Sub Main() Dim myBA2 As New BitArray(5, False) Console.WriteLine("Count: {0}", myBA2.Count) Console.WriteLine("Length: {0}", myBA2.Length) Console.WriteLine("Values:") PrintValues(myBA2) End Sub 'Main Public Shared Sub PrintValues(myList As IEnumerable) Dim obj As [Object] For Each obj In myList Console.WriteLine(obj) Next obj End Sub End Class