本文整理汇总了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()