Foxtable(狐表)用户栏目专家坐堂 → 遍历行与列赋值 得到列名值为空?怎么解决呢?


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

主题:遍历行与列赋值 得到列名值为空?怎么解决呢?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/22 11:21:00 [显示全部帖子]

贴出完整代码

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/22 11:52:00 [显示全部帖子]

调试
           If dt.DataRows.Count>0 Then   '如果S数据存在,暂时不做操作
               msgbox(s & "数据存在")
            Else   '如果s数据不存在,则新增数据 
    bb=dt.AddNew         ' 新增dt表行
                'For Each Row As DataRow In dt.DataRows     '遍历dt1的所有行
                    For Each Col As DataCol In dt.datacols   '遍历dt1的所有列   
               msgbox(Col.name)                  
                        If Col.name="提供单位或个人" Then
                            bb("提供单位或个人")=s   '指定提供单位或个人为s数据
                        Else  If Col.name="guid" Then
                            bb("guid")=guid.newguid.tostring()   '指定提供单位或个人为s数据
                        Else     
               msgbox("bb1=" & bb1(Col.name))    
                            bb(Col.name)=bb1(Col.name)  '其他列直接对应列名赋值相应的数据    
               msgbox("bb=" & bb(Col.name))   
                        End If
                    Next
                'Next
            End If

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/23 20:21:00 [显示全部帖子]

1、bb1也是空的:
2、有其它表事件代码影响了

        msgbox("bb1=" & bb1(Col.name)) 这里有没有值
                            bb(Col.name)=bb1(Col.name)  '其他列直接对应列名赋值相应的数据
        msgbox("bb=" & bb(Col.name))    为空……

 回到顶部