㈠ 如何用vb寫一個菜單設計. 具體要求:點擊滑鼠右鍵可以彈出幾個選項。
VB本身就有菜單功能,用菜單編輯器做好你需要的菜單,菜單分為二級,有一個一級菜單名,具體菜單內容「新建、刷新、復制跡搜、粘貼等」是要放在二級菜單里。
如果窗口不顯示該一級菜單,則把可見勾選掉。
然後,就是用程序實現菜單的顯示,比如:你要在某對象姿凱歷中實現右擊顯示菜單孫氏,只需在該對象的MouseDown事件中寫入「If Button = 2 Then PopupMenu 菜單名」就可以了。
至於鏈接資料庫,在你菜單事件中編程就可以了。
㈡ 用VB如何製作右鍵菜單
用菜單編輯器設計菜單,然後在空間的右鍵按下事件中寫入代碼,例如:
Private Sub 控制項名_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = MouseButtonConstants.vbRightButton Then
PopupMenu mymenu, 標志, X, Y, 默認菜單(即加粗的菜單項)
End If
End Sub
如果要隱藏部分菜單項,可以在popupmenu之前設置菜單的屬性胡消,例如
mymenu.visible=false
mymenu.enabled=false
然後在彈飢做緩出菜單後再恢復原爛模屬性
㈢ VB6.0 如何實現點擊按鈕彈出下拉菜單
這個是彈出菜單,菜單在窗體上不顯示,單擊右鍵時彈出,所以需要將所有菜單做成子菜單。
1、先在VB里打開菜單編輯器(在窗體顯示的情況下,在工具菜單里點「菜單編輯器"
2、新建菜單:(1)先做一個總菜單項,標題中填寫」彈出",名稱中銀茄填寫mymenu,該菜單項是不顯示的,用來彈出。(2)做梁搏帆如圖子菜單,標題中填寫菜單中顯示的內容,比如:排列圖標,刷新等等,名稱內輸入你自定義的名稱,比如:排列圖標的名稱mnu_pailie,名稱用來在編寫代碼時識別該菜單。橫線在VB中標題內輸入減號(-),名稱也需要輸入。(3)下級菜單(如排列圖標有下級菜單),用向右的箭頭調整
只要是標題和名稱輸入好了,就是合法的。其它不符合要求可以慢慢修改,不影響你條試驗。
3、編寫代碼:
Private Sub Form_Load()
mymenu.Visible = False『mymenu是要彈出總菜單的名稱,在窗體上禁止顯示,當然,你也可以讓它顯示
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)』窗橡雹體的滑鼠按鍵抬起事件,當滑鼠按鍵向上抬起時發生
If Button = vbRightButton Then『button參數是按鍵,如果抬起的是滑鼠右鍵時
Me.PopupMenu mymenu』彈出mymenu
End If
End Sub
㈣ 利用VB程序怎麼能設計一個飯店點菜系統求過程。。。。
模塊,流程....
然後
依照段型纖規劃,
後台mssql2000或者msaccess做資料庫,建些握仿表,
前台用vb.
窗體如圖
屬性設置:
form1-caption:顧客點菜單
list1:multiselect=2\style=0
list2:multiselect=0\style=1
command1:caption=添加
command2=caption=刪除
lable1:caption=飯店菜譜
lable2:caption=顧客點菜
代碼:
Private
Sub
Form_Load()
List1.AddItem
"*******"
'以下格式相同(*表示菜名)
End
Sub
Private
Sub
Command1_Click()
Dim
i%
'定義循環變數
For
i
=
List1.ListCount
-
1
To
0
Step
-1
If
List1.Selected(i)
Then
'判斷是否被選中
List2.AddItem
List1.List(i)
'在list2中租山添加list1中被選中的
List1.RemoveItem
i
End
If
Next
i
End
Sub
Private
Sub
Command2_Click()
Dim
i%
For
i
=
List2.ListCount
-
1
To
0
Step
-1
If
List2.Selected(i)
Then
List1.AddItem
List2.List(i)
List2.RemoveItem
i
'從List2中刪除此選中項
End
If
Next
i
End
Sub
㈤ 如何在VB中給程序增加一個菜單(如圖,高分懸賞)
第一步,在編程環境的菜單里選「工具」、「菜伏擾單編輯器」,就會彈出一個「菜單編輯器」窗口。
第二步,在窗口裡的最上面一行輸入「查看」,在「快捷鍵」里輸入「Alt-E」,然後「下一個」
第三步,同第二步一樣輸入「編輯」
第四步,同第二步一樣輸鉛廳源入「幫助」
第五步,點「確定」,就會返槐態回到窗體界面,菜單已經加好了。
㈥ 急!!用VB編寫一個點餐程序
㈦ vb彈出菜單怎麼製作
vb彈出菜單怎麼製作啊?1.首先設置好想要用的頁面。這種一般是ios系統的自帶頁面,如果不小心就會被用戶拉偏。但是也不失為一種好的選擇。比含巧如下面的這張圖就是很細致的拉出文字的。2.然後我們來添加一些陰影。可以把其中的一個小的文字設置的大一些,也可以設置的小一些。3.然後我們點擊文字,選擇圖片--調整--色彩。這樣導出談扒鍵來的圖片會比此核較的立體,有一種立體的感覺。4.然後把上面的這個小的文字圖層,換個顏色,放到色彩上面。這樣就會製作出一張具有立體感的效果的圖片背景啦。5.接下來我們在上面的那一層圖層就可以設置圖片的色板或者圖片的圖標。這樣做之後,我們就可以進行一些效果的處理啦。比如圖片部分。
㈧ vb中建立菜單
打開【菜單編輯器】首先輸入一個主菜單,點擊【下一個】,然後點擊【->】箭頭按鈕,是一級子菜單(在菜單名稱前會出現「......」的移位符),在做好一級子菜單後,再點擊【->】箭頭按返正鈕,可以做二級子菜單......
子菜單製作完成後,點擊漏鬧悔【<-】箭頭按鈕,可返回。彎頃