自定义菜单
这是一个菜单,让我们节省时间,行代码和一个更好的安排,在公开形式方面,因为这个菜单只需要一个开放的形式,。 此外,以减少开放形式的数量也减少了在菜单中打开每个表单的按钮。
这种类型的菜单,肯定已经存在了一段时间,已经被许多用户访问使用。
那么,这是菜单?
让我们创建一个组合框,包含了所有的形式,我们计划通过它打开菜单使用。 从组合框中选择一个选项当你的申请表将显示在窗体。 然后,我们开始菜单一步一步。
1 - 让我们创建一个表,我们将其中存储的名称,你想给每个形式和名称的形式,将打开。 在这个例子中,我创建表以下领域tblmenu:
字段类型
nomedomenu文本 - >名称将在菜单上看到的(组合框)
形成文字 - >名称的形式,将打开
后的例子介绍了数据:
NomedoMenu表
帐户Form1中
存款Form2的
运动formulario3
帐户盒formulario4
帐户的帐户formulario5
提取formulario6
2 - 然后,我们创建了一个从上表的查询:
tblmenu选择表,然后选择这两个领域中,我们选择了升序排序nomedomenu更容易找到菜单相当几次,当我们要打开的形式。 此查询,我叫'CsMenu“。
3 - 让我们创建“菜单”的形式,即在设计视图中选择新的形式。 然后我们创建一个组合框,并更改以下属性:
- 列数:2
- 列宽1厘米,0厘米;
- 原产地行:csmenu(这是在前段创建查询的名称)
4 - 在相同的形式,我们将创建一个未绑定的主窗体的窗体(在这个例子中,我叫menuquadro)。 正是这种形式,将打开形式,每年选择菜单(组合框)。
5 - 现在创建一个模块,它将使我们能够打开选定的菜单,在子窗体中的组合框。
我们创建一个模块(我称之为“abrirmenu)和粘贴下面的代码:
公共的功能AtivarMenu(Combmenu ComboBox中,subabrir子窗体)
作为字符串暗淡Abrirform
= abrirform Combmenu.Column(1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields =“”
subabrir.LinkMasterFields =“”
函数结束
要形式菜单上的组合框的属性和更新事件后创建的功能:ativarmenu =([菜单],[menuquadro])'菜单'是组合框的名称和“menuquadro”后子窗体的名称。
和最后的菜单已准备就绪。 刚刚尝试和使用。 我希望你喜欢这个技巧。
下载: 菜单
下面的菜单上的图片。































我把Form2上的“取消”按钮,并想通过点击窗体回到原来的位置,即留空白和空以及与组合。 如何建立这个功能呢?
谢谢你,
彼得
你好彼得,
不明白怎么做。 从我的理解,使菜单返回到初始状态的窗体上的按钮,是什么呢?
没错! 操作,窗体返回到初始状态,以及组合后终止。
感谢。
这是可能的,使这个菜单中,但根据先前的菜单使用的快捷键。
设法让好菜单后,这里所描述的步骤,但我的形式组合框,但在形式和相互关联的工作时,一步formulariomenu停止运行。 我能做些什么呢?
我想知道怎么做,我不知道如何去要求更多
访问时间和价格在PROAMA poelomenos trabale的可执行文件faser
曼秀球,就像一个例子或任何提示,而不是一个组合按钮。
拥抱
男子只是他们与按钮的组合,而不是如何使?
我需要帮助,做了一个数据库访问系统的用户需要时,一个特定的人在选择复选框表格编号,照片特派记者开放。
哥们喜欢这个技巧,但我并没有获得成功,可以给我一步一步,我不知道很多有关访问,但我有毅力,如果你能帮助我,我将不胜感激。
这里是我的疑问,我怎么能保存表单与两个不同的名字呢?
3 - 让我们创建“菜单”的形式,即在设计视图中选择新的形式。 然后我们创建一个组合框,并更改以下属性:
- 列数:2
- 列宽1厘米,0厘米;
- 原产地行:csmenu(这是在前段创建查询的名称)
4 - 在相同的形式,我们将创建一个未绑定的主窗体的窗体(在这个例子中,我叫menuquadro)。 正是这种形式,将打开每个
选择菜单(组合框)的形式。
您好!
我发现你的梦幻般的菜单,只是想打开报告,以及当我把我的报告的名称,没有工作,会给人一种暗示?
ABS,
克劳迪奥