Foxtable(狐表)用户栏目专家坐堂 → [求助]利用Select方法查找指定条件的行不起作用


  共有1855人关注过本帖平板打印复制链接

主题:[求助]利用Select方法查找指定条件的行不起作用

帅哥哟,离线,有人找我吗?
tkxffb
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:174 积分:1665 威望:0 精华:0 注册:2018/4/22 18:54:00
[求助]利用Select方法查找指定条件的行不起作用  发帖心情 Post By:2023/7/3 21:23:00 [只看该作者]

老师好,下面这段代码不起作用,请看一下,谢谢指教

Dim r As Row = Tables("日常采购统计表").Current   '----定义当前行
Dim dt As Date = r("录入日期")
Dim m As Integer = dt.Month      '----获取指定日期的月份
Dim y As Integer = dt.Year       '----获取指定日期的年份

For Each dr1 As DataRow In DataTables("日常采购统计表").dataRows
     Dim dt1 As Date = dr1("录入日期")
     Dim m1 As Integer = dt1.Month      
     Dim y1 As Integer = dt1.Year       

     Dim drs As List(Of DataRow) = DataTables("日常采购统计表").Select(""& y1 &" = "& y &" And "& m1 &" = "& m &"")
     For Each dr As DataRow In drs
           '-----代码
     Next
Next

 回到顶部