- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 列宽设置 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=68352)
-- 发布时间：2015/5/15 11:07:00
-- 列宽设置
各位老大:早上好！
我想用数据表来设置列宽，
在表A DataColChanged中的代码如下：
Select Case e.DataCol.Name
Case "第五列"
For Each dc As DataCol In DataTables("表B").DataCols
If e.DataRow("第四列") = dc.Name Then
dc.Width = e.NewValue
End If
Next
End Select
以上不知道有什么问题，请帮忙指点一下，
多谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:大红bom查询.rar |
-- 发布时间：2015/5/15 11:08:00
--
你想实现什么效果? 代码是没有问题的,错的是你的逻辑. 你要说明白你的逻辑是什么要实现什么效果
-- 发布时间：2015/5/15 11:15:00
--
Select Case e.DataCol.Name
Case "第五列"
If DataTables("表B").DataCols.Contains(e.DataRow("第四列")) Then
Tables("表B").Cols(e.DataRow("第四列")).width = e.NewValue
End If
End Select
-- 发布时间：2015/5/15 11:50:00
--
哇！解决了，感谢3楼！！！