标题：[求助]通过菜单代码设置的参数不能保存

记得帮助文件中说通过菜单设置的表的颜色啊，字体啊什么的，不能保存。只有通过表样式设置的参数才能保存。
今天我发现表属性中的一些属性无法通过代码修改。
AllowEdit
AllowAddrow
等。。。
一个表默认的权限是不能增加行的，通过代码设置后：
Dim dt As Table = CurrentTable
   dt.AllowEdit = True
   dt.AllowAddNew = True
   dt.AutoAddNew = True
   dt.EnterKeyActionDown = True
表可以增加数据了，但回车后依然是平着走。
在表属性修改AllowEdit和AllowAddNew属性为False后，依然能够增加行。

不知是不是通过表属性和表样式设置的参数才能保存？通过代码设置的哪些参数不能保存？
表属性中的各种参数难道不是当前表的参数？

希望大家随便说说，到底是怎么回事？

应该是Table和DataTable的区别。
你可以试试。

Dim dt As DataTable = DataTables("表名")
dt.AllowEdit = True
dt.AllowAddNew = True
dt.AutoAddNew = True
dt.EnterKeyActionDown = True

谢谢，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