用新VB.NET 枚举提高效率 [ English ]2008-2-24 1:51:52 中国学网 跟贴 0 条 网友投稿
Dim loopCounter As Integer Dim enumCollection As Ienumerator With testCollection .Add("1") .Add("2") .Add("3") End With For Each collectionItem In testCollection Console.Out.WriteLine(collectionItem) Next For loopCounter = 1 To testCollection.Count Console.Out.WriteLine(testCollection.Item(loopCounter)) Next enumCollection = testCollection.GetEnumerator() Do While enumCollection.MoveNext Console.Out.WriteLine(enumCollection.Current) Loop IEnumerator带给你For…Each技术所能提供的计数功能,另外还有使循环复位和从起始位置开始的新加功能。 转帖于 Xue163.com_VB.NET |
|