各位老师，我用Access做的数据库，表格太多，就在项目事件里指定打开项目不加载，把帮助的代码复制过来套上去了，
在BeforloadOuterTable事件里加了下面的代码，会不会很累赘（新手只会这样搬,不知道咋精简代码，这样也可以实现这个功能,嘿嘿...)
Select Case e.DataTableName Case "公司人员资料","物料信息表","往来单位","往来单位明细" ,"销售主表","销售明细表","国外销售主表","国外销售明细表","价格信息","采购主表","采购明细表","盘点表","发货主表","发货明细表","收货主表"'初始不加载这些个表
e.Cancel = True
End Select
后面的问题也来了，
我做了个国内销售的窗口，然后在窗口的AfterLoad里加入了下面的事件
If DataTables.Contains("销售主表") = False Then
DataTables.Load("销售主表|销售明细表")
MainTable = Tables("销售主表")
End If
If User.Group = "审核组" Then
DataTables("销售主表").LoadFilter = ""
Else
DataTables("销售主表").LoadFilter = "业务员编码 = '" & User.Name & "'"
End If
在窗口里放了两个table控件，分别绑定了销售主表和销售明细表
再又在菜单功能区做了个 国内销售录入的按钮，加入Forms("国内窗口").open这个代码，
设计好了，再打开项目，点菜单上的国内销售按钮，进不到窗口，只能看到加载进来的主表
[此贴子已经被作者于2014-11-9 15:20:30编辑过]
加好友 
发短信
Post By：2014/11/9 15:10:00 [只看该作者]
