自定義菜單
這是一個菜單,讓我們節省時間,行代碼和一個更好的安排,在公開形式方面,因為這個菜單只需要一個開放的形式,。 此外,以減少開放形式的數量也減少了在菜單中打開每個表單的按鈕。
這種類型的菜單,肯定已經存在了一段時間,已經被許多用戶訪問使用。
那麼,這是菜單?
讓我們創建一個組合框,包含了所有的形式,我們計劃通過它打開菜單使用。 從組合框中選擇一個選項當你的申請表將顯示在窗體。 然後,我們開始菜單一步一步。
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,
克勞迪奧