Foxtable(狐表)用户栏目专家坐堂 → 集合


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

主题:集合

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


加好友 发短信
等级:幼狐 帖子:138 积分:1538 威望:0 精华:0 注册:2017/3/5 20:17:00
集合  发帖心情 Post By:2018/9/9 17:15:00 [显示全部帖子]

老师,这个为什么不对?
            Dim drs As new List(of DataRow)
            drs = DataTables("审批进度").SQLSelect("申请编号 = '" & e.DataRow("申请编号")  & "'")
            If drs IsNot Nothing Then
                Dim lst As new List(of String)
                For Each dr1 As DataRow In drs
                    lst.Add(dr1("申请编号"))
                Next
            End If


lst.Add(dr1("申请编号"))   这个地方不执行。
[此贴子已经被作者于2018/9/9 17:16:46编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
qinjh18935180888
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:138 积分:1538 威望:0 精华:0 注册:2017/3/5 20:17:00
  发帖心情 Post By:2018/9/9 19:37:00 [显示全部帖子]

10

   For Each dr1 As DataRow In drs
                    lst.Add(dr1("申请编号"))
msgbox(lst)
                Next

没有弹出内容,出错。
[此贴子已经被作者于2018/9/9 19:39:34编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
qinjh18935180888
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:138 积分:1538 威望:0 精华:0 注册:2017/3/5 20:17:00
  发帖心情 Post By:2018/9/9 20:06:00 [显示全部帖子]

老师:好了,谢谢答复。代码都是正确的,刚不知什么原因。

 回到顶部