LINQ Group by 多列值在C#与VB.Net上写法的区别

最新推荐文章于 2026-06-14 15:57:11 发布
转载 最新推荐文章于 2026-06-14 15:57:11 发布 · 2.9k 阅读 · 1
标签
#vb.net #c# #linq #integer #function
#query
本文详细介绍了如何在VB.NET中使用LINQ语法实现与C#相似的Group By多列操作，特别关注了匿名类在不同语言版本中的差异，并提供了完整的代码示例和对比分析。

现有这样一个LIST，需要根据Age和Sex两列进行Group by 分组操作：

 

[csharp] view plain copy
  1. var  empList =new List<Employee>  
  2. {  
  3. new Employee {ID = 1, FName = "John", Age = 23, Sex = 'M'},  
  4. new Employee {ID = 2, FName = "Mary", Age = 25, Sex = 'F'},  
  5. new Employee {ID = 3, FName = "Amber", Age = 23, Sex = 'M'},  
  6. new Employee {ID = 4, FName = "Kathy", Age = 25, Sex = 'F'},  
  7. new Employee {ID = 5, FName = "Lena", Age = 27, Sex = 'F'},  
  8. new Employee {ID = 6, FName = "Bill", Age = 28, Sex = 'M'},  
  9. new Employee {ID = 7, FName = "Celina", Age = 27, Sex = 'F'},  
  10. new Employee {ID = 8, FName = "John", Age = 28, Sex = 'M'}   
  11. };  



用C# 很好实现，一般这样来写LINQ语句：

[csharp] view plain copy
  1. // query with lamda expression  
  2. var QueryWithLamda = empList.GroupBy(x => new { x.Age,  x.Sex})  
  3.             .Select(g=>new {g.Key, Count=g.Count()});   
  4.   
  5. //query with standard expression  
  6. var query=from el in empList  
  7.           group el by new {el.Age,el.Sex} into g  
  8.           select new {g.Key, Count=g.Count()};   

 

现在需要用VB.Net来实现，根据上边C#的写法，很容易想到这样来写：

[vb] view plain copy
  1. ' query with lamda  expression    
  2. Dim QueryWithLamda =  empList.GroupBy(Function(x)  New With { .Age=x.Age, .Sex= x.Sex}) _   
  3.                              .Select(Function(g) New With {g.Key, g.Count()})    
  4.   
  5.   
  6. ' query with standard expression  
  7. Dim Query = From el In empList _   
  8.             Group el By Key = new with { el.Age,  el.Sex} Into g= Group  _   
  9.             Select New  With {.key = Key, _  
  10.                             .count = g.Count()}   

 

但是打印一下结果发现不对，后来仔细研究了下，原来问题出在这:

Group el By Key = new with {el.Age, el.Sex} Into g= Group _

 

换成这样，结果就和C#的一样了:

Group el By Key = new with{key el.Age, key el.Sex} Into g= Group  _

 

看来在VB.NET中，匿名类和C#不一样，当Group by多列时，需要全部指定它们为Key，不然不会将它们作为一个整体进行group by

 

以下是全部代码:
C#:

void Main()
{
	 var  empList =new List<Employee>
	 {
		new Employee {ID = 1, FName = "John", Age = 23, Sex = 'M'},
		new Employee {ID = 2, FName = "Mary", Age = 25, Sex = 'F'},
		new Employee {ID = 3, FName = "Amber", Age = 23, Sex = 'M'},
		new Employee {ID = 4, FName = "Kathy", Age = 25, Sex = 'F'},
		new Employee {ID = 5, FName = "Lena", Age = 27, Sex = 'F'},
		new Employee {ID = 6, FName = "Bill", Age = 28, Sex = 'M'},
		new Employee {ID = 7, FName = "Celina", Age = 27, Sex = 'F'},
		new Employee {ID = 8, FName = "John", Age = 28, Sex = 'M'} 
	 };
		
	// query with lamda	expression
	var QueryWithLamda = empList.GroupBy(x => new { x.Age,  x.Sex})
	            .Select(g=>new {g.Key, Count=g.Count()}); 
	
	//query with standard expression
	var query=from el in empList
	          group el by new {el.Age,el.Sex} into g
			  select new {g.Key, Count=g.Count()}; 
 
	foreach (var employee in query /* Or  QueryWithLamda */ )
			 Console.WriteLine(employee.Count);
	 
}

public class Employee
{
  public int ID {get;set;}
  public string FName {get;set;}
  public int Age {get;set;}
  public char Sex {get;set;}
}


 


VB.NET代码:

Sub Main
	 Dim empList As New List(Of Employee)()
		empList.Add(New Employee() With _
		{.ID = 1, .FName = "John", .Age = 23, .Sex = "M"c}) 
		empList.Add(New Employee() With _
		{.ID = 2, .FName = "Mary", .Age = 25, .Sex = "F"c})
		empList.Add(New Employee() With _
		{.ID = 3, .FName = "Amber", .Age = 23, .Sex = "M"c}) 
		empList.Add(New Employee() With _
		{.ID = 4, .FName = "Kathy", .Age = 25, .Sex = "F"c})
		empList.Add(New Employee() With _
		{.ID = 5, .FName = "Lena", .Age = 27, .Sex = "F"c}) 
		empList.Add(New Employee() With _
		{.ID = 6, .FName = "Bill", .Age = 28, .Sex = "M"c})
		empList.Add(New Employee() With _
		{.ID = 7, .FName = "Celina", .Age = 27, .Sex = "F"c}) 
		empList.Add(New Employee() With _
		{.ID = 8, .FName = "John", .Age = 28, .Sex = "M"c})
		
	' query with lamda	expression	
	Dim QueryWithLamda = empList.GroupBy(Function(x)  New With { Key x.Age, Key x.Sex}) _
	            				.Select(Function(g) New With {g.Key, g.Count()}) 
	
	' query with standard expression
	Dim QueryWithStanard = From el In empList _ 
			    Group el By Key = new with {Key el.Age, Key el.Sex} Into g= Group  _ 
			    Select New  With {.key = Key, _
								.count = g.Count()} 
								
	Dim QueryWithStanard2 = From el In empList _ 
			    Group el By Key = el.Age,  el.Sex  Into g= Group  _ 
			    Select New  With {.key = Key, _
								.count = g.Count()} 							
 
	For Each employee In QueryWithLamda  'Or  QueryWithLamda
			 Console.WriteLine(employee.Count)
	Next employee 

End Sub
Public Class Employee 
		Private privateID As Integer
		Public Property ID() As Integer 

			Get 
				Return privateID
			End Get 

			Set(ByVal value As Integer) 
				privateID = value
			End Set 

		End Property 

		Private privateFName As String 
		Public Property FName() As String
			Get 
				Return privateFName
			End Get 

			Set(ByVal value As String) 
				privateFName = value
			End Set 
		End Property  

		Private privateAge As Integer 
		Public Property Age() As Integer
			Get 
				Return privateAge
			End Get 

			Set(ByVal value As Integer) 
				privateAge = value
			End Set 
		End Property  

		Private privateSex As Char 
		Public Property Sex() As Char
			Get 
				Return privateSex
			End Get 

			Set(ByVal value As Char) 
				privateSex = value
			End Set 
		End Property
End Class

[vb] view plain copy
  1. Sub Main  
  2.      Dim empList As New List(Of Employee)()  
  3.         empList.Add(New Employee() With _  
  4.         {.ID = 1, .FName = "John", .Age = 23, .Sex = "M"c})   
  5.         empList.Add(New Employee() With _  
  6.         {.ID = 2, .FName = "Mary", .Age = 25, .Sex = "F"c})  
  7.         empList.Add(New Employee() With _  
  8.         {.ID = 3, .FName = "Amber", .Age = 23, .Sex = "M"c})   
  9.         empList.Add(New Employee() With _  
  10.         {.ID = 4, .FName = "Kathy", .Age = 25, .Sex = "F"c})  
  11.         empList.Add(New Employee() With _  
  12.         {.ID = 5, .FName = "Lena", .Age = 27, .Sex = "F"c})   
  13.         empList.Add(New Employee() With _  
  14.         {.ID = 6, .FName = "Bill", .Age = 28, .Sex = "M"c})  
  15.         empList.Add(New Employee() With _  
  16.         {.ID = 7, .FName = "Celina", .Age = 27, .Sex = "F"c})   
  17.         empList.Add(New Employee() With _  
  18.         {.ID = 8, .FName = "John", .Age = 28, .Sex = "M"c})  
  19.           
  20.     ' query with lamda  expression    
  21.     Dim QueryWithLamda = empList.GroupBy(Function(x)  New With { Key x.Age, Key x.Sex}) _  
  22.                                 .Select(Function(g) New With {g.Key, g.Count()})   
  23.       
  24.     ' query with standard expression  
  25.     Dim QueryWithStanard = From el In empList _   
  26.                 Group el By Key = new with {Key el.Age, Key el.Sex} Into g= Group  _   
  27.                 Select New  With {.key = Key, _  
  28.                                 .count = g.Count()}   
  29.                                   
  30.     Dim QueryWithStanard2 = From el In empList _   
  31.                 Group el By Key = el.Age,  el.Sex  Into g= Group  _   
  32.                 Select New  With {.key = Key, _  
  33.                                 .count = g.Count()}                               
  34.    
  35.     For Each employee In QueryWithLamda  'Or  QueryWithLamda  
  36.              Console.WriteLine(employee.Count)  
  37.     Next employee   
  38.   
  39. End Sub  
  40. Public Class Employee   
  41.         Private privateID As Integer  
  42.         Public Property ID() As Integer   
  43.   
  44.             Get   
  45.                 Return privateID  
  46.             End Get   
  47.   
  48.             Set(ByVal value As Integer)   
  49.                 privateID = value  
  50.             End Set   
  51.   
  52.         End Property   
  53.   
  54.         Private privateFName As String   
  55.         Public Property FName() As String  
  56.             Get   
  57.                 Return privateFName  
  58.             End Get   
  59.   
  60.             Set(ByVal value As String)   
  61.                 privateFName = value  
  62.             End Set   
  63.         End Property    
  64.   
  65.         Private privateAge As Integer   
  66.         Public Property Age() As Integer  
  67.             Get   
  68.                 Return privateAge  
  69.             End Get   
  70.   
  71.             Set(ByVal value As Integer)   
  72.                 privateAge = value  
  73.             End Set   
  74.         End Property    
  75.   
  76.         Private privateSex As Char   
  77.         Public Property Sex() As Char  
  78.             Get   
  79.                 Return privateSex  
  80.             End Get   
  81.   
  82.             Set(ByVal value As Char)   
  83.                 privateSex = value  
  84.             End Set   
  85.         End Property  
  86. End Class   


 

 

相关讲讨论讨论帖子:

 

http://topic.csdn.net/u/20120529/16/2648950b-26b4-4b90-aa9a-05dff88c85f4.html

http://stackoverflow.com/questions/10801859/linq-group-by-multiple-values-does-not-work-well-in-vb-net-but-work-well-in-c-sh

http://social.microsoft.com/Forums/zh-CN/adonetzhchs/thread/7f06ff9e-a704-411e-9220-7a86963a290e


用Linq 解决 数据的多字段分组统计（VB.net）
u010492546的博客
06-20 2225
Sub Main dim objs as array = { _ new with { .Item="A", .Loc="L1", .Q1 = 1, .Q2=0}, _ new with { .Item="A", .Loc="L1", .Q1 = 2, .Q2=1}, _ new with { .Item="B", .Loc="L1", .Q1 = 3, .Q2=99}, _
Blender MCP：AI驱动3D自动化工作流架构与实战
weixin_30565327的博客
04-30 430
在3D内容创作领域，自动化与程序化生成正成为提升生产效率的关键技术。其核心原理在于通过API接口与协议，将传统手动操作转化为可编程指令，实现批量处理与远程控制。这一技术价值在于大幅降低重复劳动，使艺术家能够聚焦于创意设计，同时为规模化内容生产奠定基础。在应用场景上，自动化工作流广泛用于游戏资产生成、产品可视化、建筑渲染以及动态广告内容制作。本文聚焦于Blender MCP（Model Context Protocol）这一具体实现，它通过TCP桥接与结构化工具封装，将Blender的Python API安全
vb.net中LINQ的各个实用用法
璀璨 - 帝禹
04-25 1381
在VB.NET中，LINQ（Language Integrated Query）提供了丰富的查询功能，使得编写针对各种数据源的查询变得简单且一致。：根据给定条件从数据源中筛选出符合条件的元素。假设有一个Students：对数据源中的元素进行升序或降序排序。对于一个Products。
linq to DataTable group by用法(VB.Net语法)
Osiris
02-19 7625
Module Module1 Sub Main() Dim table As New DataTable table.Columns.Add("A", GetType(Integer)) table.Columns.Add("B", GetType(Integer)) table.Columns.Add("C", GetT
Ef数据GroupBy多字段查询Vb.net与c#参考
09-29 568
Dim g = lst.Data.GroupBy(Function(T) New With { Key T.mName, Key T.mU...
进阶系列（9）——linq
anbixu9818的博客
12-27 233
一、揭开linq的神秘面纱（一）概述 LINQ的全称是Language Integrated Query，中文译成“语言集成查询”。LINQ作为一种查询技术，首先要解决数据源的封装，大致使用了三大组件来实现这个封装，分别是LINQ to Object、LINQ to ADO.NET、LINQ to XML。它们和.NET语言的关系如下 要使用LINQ来编程，...
VS08新特性之LINQ 基础
aabbcczy的专栏
11-29 1284
。回顾请说出三条以上 C# 3.0 的新特性请说出扩展方法定义的语法格式使用 var 和 object 声明变量有什么区别？。本章任务编写 LINQBasic 程序使用Lambda表达式查询数组使用委托和匿名方法操作字符串。本章目标掌握 LINQ 中的基本概念掌握 LINQ 的组成理解委托和匿名方法理解 Lambda 表达式掌握基本查询方法：Select()Where()OrderBy()
.NET技术演进与开发者成长心法：兼容性、源码阅读与跨栈建模
最新发布
06-14 398
编程语言与运行时框架的演进，本质是工程哲学在兼容性、抽象能力与可维护性之间的持续权衡。.NET的向后兼容设计并非技术保守，而是基于二进制兼容、源码稳定与运行时沙箱的系统性保障；async/await等语法糖背后是状态机与IOCP的底层协同，揭示了异步编程的本质逻辑；而将TPL与GCD、MVC路由与Rails路由对照理解，则体现了跨技术栈建模的价值——它让知识从离散点升级为可迁移的网络。这种‘读源码→解框架→连生态’的学习路径，正是中高级开发者突破技术瓶颈、构建长期竞争力的核心方法论。
处理 Exists
心想事成
02-25 648
处理 Exists #r @"C:\Program Files\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.5\System.Data.Linq.dll";; #r @"E:\Projects\F#3\FSharp.Data.TypeProviders.dll";; open Microsoft.FSharp.Dat
在VB.net中，LINQ有什么方法与属性
fsyuheduo的博客
08-24 1285
==标题==在VB.net中，LINQ有什么方法与属性==正文==在VB.NET中使用LINQ（Language Integrated Query），你可以利用一系列的方法和属性来查询和操作内存中的集合（如数组、列表等）以及数据库等数据源。LINQ提供了丰富的功能来简化数据查询和处理的复杂性。虽然LINQ本身不是VB.NET特有的，但VB.NET提供了对LINQ的良好支持，包括语法糖和强大的类型推...
VB.NET中LINQ TO List泛型查询语句（分组，聚合函数）
06-28 1403
Public Class LinqToList 'LINQ在C#中使用比较方便，但是在VB中使用比较麻烦，复杂，和C#用法并不太一样 Dim listNew As List(Of Product) = New List(Of Product) '新商品 Dim listOld As List(Of Product) = New List(Of Product) '旧商品
Linq语句group by分组语法Ladama表达式
weixin_44569910的博客
05-25 750
LINQ（Language Integrated Query）是C＃和VB.NET中的统一查询语法，用于保存和检索不同来源的数据。它集成在C＃或VB中，从而消除了编程语言和数据库之间的不匹配，以及为不同类型的数据源提供单个查询接口。 例如，SQL是一种结构化查询语言，用于保存和检索数据库中的数据。同样的，LINQ是一个用C＃和VB.NET构建的结构化查询语法，用于保存和检索来自不同类型数据源的数据...
C#学习之List的select、where和group by
热门推荐
Justinyh的博客
10-11 2万+
第四章 C#学习之List的select、where和group by。
vb.net 教程 3-8 窗体编程 容器 1 Panel & GroupBox
学习微软 .net 技术开发
12-25 3824
版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。 之前有网友留言问Panel控件的讲解，其实我感觉Panel和GroupBox用法差不多。这里就列在一起讲一下。 上面的图片，能看出来那个是Panel，哪个是GroupBox吗？ 其实下面的那个容器是Panel加上一个Label做的。 基本上，容器都是用来放置其它控件的，在容器中的控件受...
在VB.net中，LINQ有什么查询表达式，举例说明
fsyuheduo的博客
08-25 913
==标题==在VB.net中，LINQ有什么查询表达式，举例说明==正文==在VB.net中，LINQ有什么查询表达式，举例说明在VB.NET中，LINQ（Language Integrated Query）查询表达式提供了一种声明性的方式来查询和操作数据集合。这些查询表达式通过一系列的关键字来定义，这些关键字在编译时会被转换成对集合进行操作的调用（通常是扩展方法）。以下是一些常见的LINQ查询表...
List Group By 用法
极客神殿
05-02 2387
var dealOtherDetail = items.GroupBy(x => new { x.DetailID }).Select(g => new { g.Key.DetailID, qty = g.Sum(a => a.AppointQty) }).ToList(); linq group by多个字段,返回多个字段 直接上例子. var wflist = from u in db.TWelFare where u.fy_no == fy_no orderby u
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值