Foxtable(狐表)用户栏目专家坐堂 → [求助] 加载指定行的问题


  共有2144人关注过本帖树形打印复制链接

主题:[求助] 加载指定行的问题

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


加好友 发短信
等级:六尾狐 帖子:1302 积分:10502 威望:0 精华:1 注册:2018/1/20 12:40:00
[求助] 加载指定行的问题  发帖心情 Post By:2018/8/22 18:15:00 [显示全部帖子]

我想只加载符合下面条件的   drs  的行,应该怎么继续写呢。
Dim SUM As Double
Dim drs As List (of DataRow)

For Each dr As DataRow In DataTables("xmzb").DataRows
    sum = DataTables("XMFP").Compute("Sum(当月人天)","[项目名称]= '" & dr("XMMC").replace("'", "''") & "' ")
    If sum > dr("APC") Then
    drs.Add(dr)
    End If
Next

 回到顶部