以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]通过菜单代码设置的参数不能保存 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5394) |
-- 作者:ssqq -- 发布时间:2009/12/9 22:13:00 -- [求助]通过菜单代码设置的参数不能保存 记得帮助文件中说通过菜单设置的表的颜色啊,字体啊什么的,不能保存。只有通过表样式设置的参数才能保存。 今天我发现表属性中的一些属性无法通过代码修改。 AllowEdit AllowAddrow 等。。。 一个表默认的权限是不能增加行的,通过代码设置后: Dim dt As Table = CurrentTable dt.AllowEdit = True dt.AllowAddNew = True dt.AutoAddNew = True dt.EnterKeyActionDown = True 表可以增加数据了,但回车后依然是平着走。 在表属性修改AllowEdit和AllowAddNew属性为False后,依然能够增加行。 不知是不是通过表属性和表样式设置的参数才能保存?通过代码设置的哪些参数不能保存? 表属性中的各种参数难道不是当前表的参数? 希望大家随便说说,到底是怎么回事? |
-- 作者:czy -- 发布时间:2009/12/9 22:34:00 -- 应该是Table和DataTable的区别。 你可以试试。 Dim dt As DataTable = DataTables("表名") dt.AllowEdit = True dt.AllowAddNew = True dt.AutoAddNew = True dt.EnterKeyActionDown = True |
-- 作者:ssqq -- 发布时间:2009/12/10 19:31:00 -- 谢谢,Table和DataTable真是容易出错。 特分享两个代码 打开列属性的代码: CurrentTable.Cols(CurrentTable.ColSel).OpenWindow() 切换风格的代码: \'切换界面风格 If VisualStyle = VisualStyleEnum.Office2007Blue Then VisualStyle = VisualStyleEnum.Office2007Silver ElseIf VisualStyle = VisualStyleEnum.Office2007Silver Then VisualStyle = VisualStyleEnum.Office2007Black Else VisualStyle = VisualStyleEnum.Office2007Blue End If |