siyuan_qx 2021-07-24 11:07 采纳率: 0%
浏览 89

vb.net 关于list<of T>用法的问题

我定义了一个list ,
jwdfile="d:\jwd.csv" '包含站号,经度,维度,海拔 的文件
ss = File.ReadAllLines(jwdfile)
jwalist = ss.ToList()
比如站号=“54602”
我想快速找到jwalist中等于此站号的行,如何编写?

  • 写回答

1条回答 默认 最新

  • CSDN专家-showbo 2021-07-24 13:48
    关注

    可以用linq的where查找。有帮助麻烦点个采纳【本回答右上角】,谢谢~~

    img

    
    <%@ Page Language="VB" %>
    <%@ Import Namespace="System.IO" %>
    <%@ Import Namespace="System.Linq" %>
    <% 
    
        Dim jwdfile = Server.MapPath("jwd.csv")
        Dim ss = File.ReadAllLines(jwdfile, Encoding.UTF8)
        Dim jwalist = ss.Select(Function(v) v.Split(",")) '拆开每行字符为数组
        Dim no = "54602" '要查的站号
        Dim item = jwalist.Where(Function(v) v(0) = no).FirstOrDefault()
        If item Is Nothing Then
            Response.Write("找不到站号为" & no & "的记录<BR>")
        Else
            Response.Write(String.Join(",", item) & "<BR>")
        End If
    
        no = "5460211" '要查的站号
        item = jwalist.Where(Function(v) v(0) = no).FirstOrDefault()
        If item Is Nothing Then
            Response.Write("找不到站号为" & no & "的记录<BR>")
        Else
            Response.Write(String.Join("<BR>", item))
        End If
        %>
    
    
    评论

报告相同问题?

问题事件

  • 创建了问题 7月24日

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?