1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  2. 'データ配列
  3. Dim companies() = New Company() { _
  4. New Company("X01", "ABC com", ), _
  5. New Company("X02", "DEF inc", ), _
  6. New Company("X03", "HIJ com", ), _
  7. New Company("X04", "KLM inc", ), _
  8. New Company("X05", "NOP com", ), _
  9. New Company("X06", "QRS com", ) _
  10. }
  11.  
  12. ' Sample 1
  13. Dim targetCode As String = Me.TextBox1.Text
  14. Dim name As String = _
  15. companies.Where(Function(p) p.Code.Equals(targetCode)) _
  16. .Select(Function(p) p.Name).FirstOrDefault()
  17.  
  18. Dim result As String
  19. If String.IsNullOrEmpty(name) Then
  20. result = "Not Found..."
  21. Else
  22. result = String.Format("The Company Name is {0}", name)
  23. End If
  24. Me.Label1.Text = result
  25.  
  26. ' Sample 2
  27. Dim companyList = _
  28. companies.Where(Function(x) x.TotalEmployee > ) _
  29. .Select(Function(x) New With { _
  30. .Code = x.Code, .Name = x.Name})
  31.  
  32. Dim result2 As String = String.Empty
  33. For Each com In companyList
  34. result2 = result2 & "Code : " & com.Code & " " & "Name : " & com.Name & vbNewLine
  35. Next
  36.  
  37. ' 【出力】
  38. ' Code : X01 Name : ABC com
  39. ' Code : X05 Name : NOP com
  40. Me.Label2.Text = result2
  41. End Sub
  1. Public NotInheritable Class Company
  2. Public Sub New()
  3.  
  4. End Sub
  5. Public Sub New(ByVal code As String, _
  6. ByVal name As String, _
  7. ByVal totalEmployee As Integer)
  8. Me._Code = code
  9. Me._Name = name
  10. Me._TotalEmployee = totalEmployee
  11. End Sub
  12.  
  13. Private _Code As String
  14. Public Property Code() As String
  15. Get
  16. Return Me._Code
  17. End Get
  18. Set(ByVal value As String)
  19. Me._Code = value
  20. End Set
  21. End Property
  22.  
  23. Private _Name As String
  24. Public Property Name() As String
  25. Get
  26. Return Me._Name
  27. End Get
  28. Set(ByVal value As String)
  29. Me._Name = value
  30. End Set
  31. End Property
  32.  
  33. Private _TotalEmployee As Integer
  34. Public Property TotalEmployee() As Integer
  35. Get
  36. Return Me._TotalEmployee
  37. End Get
  38. Set(ByVal value As Integer)
  39. Me._TotalEmployee = value
  40. End Set
  41. End Property
  42. End Class

Linq与Lambda的更多相关文章

  1. LINQ使用Lambda表达式选择几列

    学习LINQ的Lambda的表达式,尝试从数据集合中,选择其中几列. 创建一个model: source code: namespace Insus.NET.Models { public class ...

  2. Linq之Lambda进阶

    目录 写在前面 系列文章 带有标准查询运算符的Lambda Lambda中类型推断 Lambda表达式中变量作用域 异步Lambda 总结 写在前面 上篇文章介绍了Lambda的基本概念以及匿名方法, ...

  3. SQL、LINQ、Lambda 三种用法(转)

    SQL.LINQ.Lambda 三种用法颜色注释: SQL LinqToSql Lambda QA1. 查询Student表中的所有记录的Sname.Ssex和Class列.select sname, ...

  4. 浅谈sql 、linq、lambda 查询语句的区别

    浅谈sql .linq.lambda 查询语句的区别 LINQ的书写格式如下: from 临时变量 in 集合对象或数据库对象 where 条件表达式 [order by条件] select 临时变量 ...

  5. LInq 与lambda表达式

    LInq 与lambda表达式 LinQ是我们常用的技术之一.因为我们绕不开的要对数据进行一系列的调整,如 排序. 条件筛选.求和.分组.多表联接 等等. lambda则是我们常用的语法糖,配合lin ...

  6. 使用LINQ、Lambda 表达式 、委托快速比较两个集合,找出需要新增、修改、删除的对象

    本文需要对C#里的LINQ.Lambda 表达式 .委托有一定了解. 在工作中,经常遇到需要对比两个集合的场景,如: 页面集合数据修改,需要保存到数据库 全量同步上游数据到本系统数据库 在这些场景中, ...

  7. Linq与Lambda,神一般的工作效率

    Linq与Lambda,神一般的工作效    通过对linq和lambda的学习,越发感觉linq和lambda的重要性,他们能极大地简化程序,同时提升程序的可读性,大大提升了我们的工作效率,在公司的 ...

  8. SQL、Linq和Lambda表达式 的关系

    首先说说这三者完全是三种不同的东西,SQL是结构化查询语言(Structured Query Language)简称,这大家再熟悉不过了,下面主要介绍LINQ和Lambda表达式的基本概念以及同一查询 ...

  9. c#封装DBHelper类 c# 图片加水印 (摘)C#生成随机数的三种方法 使用LINQ、Lambda 表达式 、委托快速比较两个集合,找出需要新增、修改、删除的对象 c# 制作正方形图片 JavaScript 事件循环及异步原理(完全指北)

    c#封装DBHelper类   public enum EffentNextType { /// <summary> /// 对其他语句无任何影响 /// </summary> ...

  10. 动态LINQ(Lambda表达式)构建

    using System; using System.Collections.Generic; using System.Linq; using System.Linq.Expressions; us ...

随机推荐

  1. RavenDb学习(七) 异步工作以及维度查询

    .异步执行 var entity = new Company {Name = "Async Company #2", Id = "companies/2"}; ...

  2. sed实现文件自我复制

    sed -n '1,$'p test  >> test

  3. Java设计模式(8)组合模式(Composite模式)

    Composite定义:将对象以树形结构组织起来,以达成“部分-整体” 的层次结构,使得客户端对单个对象和组合对象的使用具有一致性. Composite比较容易理解,想到Composite就应该想到树 ...

  4. sparkr跑通函数 包含排序

    spark1.4.0的sparkR的思路:用Spark从大数据集中抽取小数据(sparkR的DataFrame),然后到R里分析(DataFrame). 这两个DataFrame是不同的,前者是分布式 ...

  5. R-table和tapply函数

    table可统计数据的频数 tapply可根据因子.向量和要计算的函数计算 > class<-c(1,2,3,2,1,2,1,3) > class[1] 1 2 3 > c(8 ...

  6. Java 之 File

    11.3 I/O类使用 由于在IO操作中,需要使用的数据源有很多,作为一个IO技术的初学者,从读写文件开始学习IO技术是一个比较好的选择.因为文件是一种常见的数据源,而且读写文件也是程序员进行IO编程 ...

  7. (笔记)Mysql命令mysqldump:备份数据库

    mysqldump命令用来备份数据库. mysqldump命令在DOS的[url=file://\\mysql\\bin]\\mysql\\bin[/url]目录下执行. 1) 导出整个数据库(导出文 ...

  8. C++编程基础练习

    注:本文练习题均出自<Essential C++>第一章 练习1,1 从一个简单程序开始 #include<iostream> #include<string> u ...

  9. (实用)使用unetbootin制作Linux的U盘启动盘

    本文介绍在Ubuntu(基于Debian的操作相同)使用unetbootin将Linux操作系统的安装镜像烧录到U盘中,使得U盘成为安装介质.当然,windows系统下也同样可以使用该软件的相应版本. ...

  10. 【经验之谈】Git使用之TortoiseGit配置VS详解;国内几大Git代码托管网站

    转载自: http://www.cnblogs.com/xishuai/p/3590705.html   http://www.cnblogs.com/shanyou/p/3662482.html