请朋友们帮个忙，解释一下代码！

jbgy　发表于：2012-07-15 09:18:15 　

我想做个自定义的菜单，但是用宏做出来的不理想上面有关闭按钮和文本框，看到这个例子觉得不错但是又不懂vba，所以请教各位朋友，解释一下这些代码，怎么让菜单栏关联到窗体1，附近：

在水一方发表于：2012-07-15 09:43:35

这个例子有两个窗体，主窗体代码意思是打开子窗体，设定子窗体位置、大小和颜色等格式，利用数据词典设置子窗体的数据来源，使用with...end with语句简化代码。

子窗体代码同样使用数据词典展开子目录，使用case语句判断点击的位置展开相应目录。

代码不复杂，难点和重点在数据词典和窗体结构的思路。

在水一方发表于：2012-07-15 09:48:57

补充一点，这个例子的主窗体应该设置为不可移动，因为子窗体展开后不能随子窗体之移动，视觉有错误。如果需要移动，也可以补充代码使子窗体随主窗体一并移动，具体可在站内搜索相关示例文章。

jbgy 发表于：2012-07-15 09:56:42

再请教，现在我要把窗体1添加到菜单栏，该如何设置或者在代码上给个实例，也就是在现有文件我添加窗口怎么连接到菜单，麻烦各位了，谢谢！

在水一方发表于：2012-07-15 12:43:35

窗体不能添加到菜单，可以隐藏Access主程序窗体，然后把主窗体最大化，就实现你需要的视觉效果了。网站内有例子。

总记录：4篇页次：1/1 9 1 :

Access交流中心