活代码LINQ——09

一、代码

' Fig. 9.7: LINQWithListCollection.vb
' LINQ to Objects using a List(Of String).
Module LINQWithListCollection
   Sub Main()
      ' populate a List of Strings
      Dim items As New List(Of String)
      items.Add("aqua") ' add "aqua" to the end of the List
      items.Add("rust") ' add "rust" to the end of the List
      items.Add("yellow") ' add "yellow" to the end of the List
      items.Add("red") ' add "red" to the end of the List

      ' select Strings starting with "r" and convert them to uppercase
      Dim startsWithR = _
         From item In items _
         Where item.StartsWith("r") _
         Order By item _
         Select item.ToUpper()

      ' display query results
      For Each item In startsWithR
         Console.Write("{0} ", item)
      Next

      Console.WriteLine() ' output end of line

      items.Add("ruby") ' add "ruby" to the end of the List
      items.Add("saffron") ' add "saffron" to the end of the List

      ' print updated query results
      For Each item In startsWithR
         Console.Write("{0} ", item)
      Next

      Console.WriteLine() ' output end of line
   End Sub ' Main
End Module ' LINQWithListCollection

' **************************************************************************
' * (C) Copyright 1992-2009 by Deitel & Associates, Inc. and               *
' * Pearson Education, Inc. All Rights Reserved.                           *
' *                                                                        *
' * DISCLAIMER: The authors and publisher of this book have used their     *
' * best efforts in preparing the book. These efforts include the          *
' * development, research, and testing of the theories and programs        *
' * to determine their effectiveness. The authors and publisher make       *
' * no warranty of any kind, expressed or implied, with regard to these    *
' * programs or to the documentation contained in these books. The authors *
' * and publisher shall not be liable in any event for incidental or       *
' * consequential damages in connection with, or arising out of, the       *
' * furnishing, performance, or use of these programs.                     *
' **************************************************************************

  二、运行结果:

来源:Visual Basic 2008 How to  Program           P305

转载于:https://www.cnblogs.com/xiehaofeng/p/10102278.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值