
| Dim Person = New With {.Name = "John Chen", .Age = 13} Console.WriteLine("Name:" & Person.Name) Console.WriteLine("Age:" & Person.Age) |
| Public Class _ClosureClass _Closure$__10 ' Methods <DebuggerNonUserCode> _ Public Sub New()Sub New() <DebuggerNonUserCode> _ Public Sub New()Sub New(ByVal other As _Closure$__10) ' Fields Public $VB$Local_Name As String Public $VB$Local_Age As Integer End Class |
| Dim Data As String() = {"a", "b", "d", "c"} Dim Query = From O In Data Order By O Descending '这就是核心 '输出信息 For Each QItem In Query Console.WriteLine(QItem) Next |
| Dim CLRLanguage() As String = {"Visual Basic", "C#", "J#", "C++/CLI"} Dim CLRCount() As KeyValuePair(Of String, Integer) = {New KeyValuePair(Of String, Integer)("Visual Basic", 1000000), _ New KeyValuePair(Of String, Integer)("C#", 1200000), _ New KeyValuePair(Of String, Integer)("J#", 300000), _ New KeyValuePair(Of String, Integer)("C++/CLI", 600000)} Dim Query = (From O As String In CLRLanguage Order By (From Count In CLRCount Where Count.Key = O Select Count.Value)) |
上一篇: Visual Basic 9不完全入门之LINQ简介
下一篇: Visual Basic 9不完全入门之语法增强
| 关于我们 | 联系我们 | 广告服务 | 工作机会 | 版权声明 | 欢迎投稿 | 网站地图 |
| Copyright © 2000-2008 , www.21tx.com , All Rights Reserved . |
| © 晨新科技 版权所有 Created by TXSite.net |