Foxtable(狐表)用户栏目专家坐堂 → 引用含有值的问题


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

主题:引用含有值的问题

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/9 8:39:00 [显示全部帖子]

If Tables("表A").Rows(0).IsNull("第八列") Then
Tables("表A").Cols("第八列").Visible=False
End If

以此类推.
但是这有个问题,如果有多行数据 部分行该列有数据 部分行没有.这个要怎么处理你也没说.

所以只能给出代码给你参考然后自己操作了,例子我就不给你做了.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/9 9:58:00 [显示全部帖子]

.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文件 1.table


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/9 16:36:00 [显示全部帖子]

.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文件 1 (2).table


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/10 8:24:00 [显示全部帖子]

以下是引用7032175在2013-5-10 8:01:00的发言:
老师我的表很多,要是把表A和表B放在一个表里能不能实现。麻烦您了。

列都不同怎么放一个表? 
你想以什么样形式和规格放?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/10 14:45:00 [显示全部帖子]

.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文件 1 (2).table


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/10 15:22:00 [显示全部帖子]

多看帮助啊,不要急于求成............

For i As Integer = 3 To Tables("表B").Cols.Count-1
    dtb.AddDef(Tables("表B").Cols(i).Name, Gettype(String), 32)
Next

多一个表就多一段


这部分也多一段

Dim drList2 As List(of DataRow) = DataTables("表B").Select("编号='" & e.Form.Controls("TextBox1").Text & "'")
For Each dr As DataRow In drList2
    Dim drr As DataRow = DataTables("统计").Find("日期=#" & dr("日期") & "# and 编号='" & dr("编号") & "'")
    For i As Integer =3 To Tables("表B").Cols.Count-1
        drr(Tables("表B").Cols(i).Name)=dr(Tables("表B").Cols(i).Name)
    Next
Next

 回到顶部