本文整理匯總了VB.NET中System.Collections.ArrayList.FixedSize方法的典型用法代碼示例。如果您正苦於以下問題：VB.NET ArrayList.FixedSize方法的具體用法？VB.NET ArrayList.FixedSize怎麽用？VB.NET ArrayList.FixedSize使用的例子？那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。您也可以進一步了解該方法所在類System.Collections.ArrayList的用法示例。
在下文中一共展示了ArrayList.FixedSize方法的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Main
' 導入命名空間
Imports System.Collections
Public Class SamplesArrayList
Public Shared Sub Main()
' Creates and initializes a new ArrayList.
Dim myAL As New ArrayList()
myAL.Add("The")
myAL.Add("quick")
myAL.Add("brown")
myAL.Add("fox")
myAL.Add("jumps")
myAL.Add("over")
myAL.Add("the")
myAL.Add("lazy")
myAL.Add("dog")
' Create a fixed-size wrapper around the ArrayList.
Dim myFixedSizeAL As ArrayList = ArrayList.FixedSize(myAL)
' Display whether the ArrayLists have a fixed size or not.
Dim msg As String
If myAL.IsFixedSize Then
msg = "has a fixed size"
Else
msg = "does not have a fixed size"
End If
Console.WriteLine("myAL {0}.", msg)
If myFixedSizeAL.IsFixedSize Then
msg = "has a fixed size"
Else
msg = "does not have a fixed size"
End If
Console.WriteLine("myFixedSizeAL {0}.", msg)
Console.WriteLine()
' Display both ArrayLists.
Console.WriteLine("Initially,")
Console.Write("Standard :")
PrintValues(myAL, " "c)
Console.Write("Fixed size:")
PrintValues(myFixedSizeAL, " "c)
' Sort is allowed in the fixed-size ArrayList.
myFixedSizeAL.Sort()
' Display both ArrayLists.
Console.WriteLine("After Sort,")
Console.Write("Standard :")
PrintValues(myAL, " "c)
Console.Write("Fixed size:")
PrintValues(myFixedSizeAL, " "c)
' Reverse is allowed in the fixed-size ArrayList.
myFixedSizeAL.Reverse()
' Display both ArrayLists.
Console.WriteLine("After Reverse,")
Console.Write("Standard :")
PrintValues(myAL, " "c)
Console.Write("Fixed size:")
PrintValues(myFixedSizeAL, " "c)
' Add an element to the standard ArrayList.
myAL.Add("AddMe")
' Display both ArrayLists.
Console.WriteLine("After adding to the standard ArrayList,")
Console.Write("Standard :")
PrintValues(myAL, " "c)
Console.Write("Fixed size:")
PrintValues(myFixedSizeAL, " "c)
Console.WriteLine()
' Adding or inserting elements to the fixed-size ArrayList throws an exception.
Try
myFixedSizeAL.Add("AddMe2")
Catch myException As Exception
Console.WriteLine("Exception: " + myException.ToString())
End Try
Try
myFixedSizeAL.Insert(3, "InsertMe")
Catch myException As Exception
Console.WriteLine("Exception: " + myException.ToString())
End Try
End Sub
Public Shared Sub PrintValues(myList As IEnumerable, mySeparator As Char)
Dim obj As [Object]
For Each obj In myList
Console.Write("{0}{1}", mySeparator, obj)
Next obj
Console.WriteLine()
End Sub
End Class輸出：
myAL does not have a fixed size. myFixedSizeAL has a fixed size. Initially, Standard : The quick brown fox jumps over the lazy dog Fixed size: The quick brown fox jumps over the lazy dog After Sort, Standard : brown dog fox jumps lazy over quick the The Fixed size: brown dog fox jumps lazy over quick the The After Reverse, Standard : The the quick over lazy jumps fox dog brown Fixed size: The the quick over lazy jumps fox dog brown After adding to the standard ArrayList, Standard : The the quick over lazy jumps fox dog brown AddMe Fixed size: The the quick over lazy jumps fox dog brown AddMe Exception: System.NotSupportedException: Collection was of a fixed size. at System.Collections.FixedSizeArrayList.Add(Object obj) at SamplesArrayList.Main() Exception: System.NotSupportedException: Collection was of a fixed size. at System.Collections.FixedSizeArrayList.Insert(Int32 index, Object obj) at SamplesArrayList.Main()