建站
咨詢
售后
建站咨詢
新聞中心
VB.NET2008我想要實現(xiàn)如下圖的效果，點擊左邊的菜單，右邊主體內(nèi)容換個了窗口，怎么實現(xiàn)？ 用什么實現(xiàn) 50
可以做一個基窗體作為父窗體，父窗體上有左邊的菜單欄
創(chuàng)新互聯(lián)建站2013年至今，先為鄄城等服務(wù)建站，鄄城等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為鄄城企業(yè)網(wǎng)站制作PC+手機+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
然后所有畫面都繼承這個父窗體，然后所有頁面都會有父窗體左邊菜單欄了，每個頁面內(nèi)容自己加控件就行 就會顯示都右邊的
不知你是否理解 不理解可追問 。。。
vb.net的彈出式菜單怎么做
工具箱里有ContextMenu（.NET2.0以后名字有點變化，大概差不多），你加入窗體后就可以像編輯普通菜單那樣編輯。
編輯好后，選中你要添加菜單的控件。屬性窗口里有個ContextMenu屬性，在里面選你剛才建立的ContextMenu
VB.NET菜單欄控件不見了，怎么解決？
沒有環(huán)境無法準(zhǔn)確幫你找，只能大概說下類似的軟件。如果有視圖（view）之類菜單下，一般都會有狀態(tài)欄信息欄等，勾選出來就能出現(xiàn)快捷菜單了。
vb.net 如何添加菜單快捷鍵
ToolStripMenuItem.ShortcutKeys 屬性
獲取或設(shè)置與 ToolStripMenuItem 關(guān)聯(lián)的快捷鍵。
使用 ShortcutKeys 屬性可以將組合鍵分配給菜單命令，例如，將 Ctrl+C 分配給“復(fù)制”命令。 您可以使用快捷鍵而不使用訪問鍵，也可以同時使用快捷鍵和訪問鍵，訪問鍵是菜單或菜單項中與 Alt 鍵一起使用的帶下劃線的字母。 通過在要用于訪問鍵的字母前面鍵入一個“and”符 ()，可以在代碼中定義訪問鍵。
VB.net如何動態(tài)獲取菜單欄中的菜單名并用樹型表示
添加：（先在加一個contextMenu,再它的添加子菜單的click事件編程）
Try
’使TreeView可以被編輯
TreeView1.LabelEdit = True
‘判斷你是不是選定的是不可編輯的節(jié)點，我這里工種節(jié)點不可以被編輯，只有工種下級的
各個工種名稱可以被編輯
If Trim(TreeView1.SelectedNode.Text) = "工種" Then
‘添加節(jié)點
AddNode = New TreeNode("請輸入新工種名字")
TreeView1.SelectedNode.Nodes.Add(AddNode)
TreeView1.ExpandAll()
AddNode.BeginEdit()
TreeView1.LabelEdit = True
NodeAdded = True
End If
Catch err As Exception
MsgBox(err.ToString)
End Try
刪除與添加類似，只是如果你的節(jié)點名字從其他處（如數(shù)據(jù)庫）得來，那么你還需要更新數(shù)據(jù)庫
編輯：
Private Sub TreeView1_BeforeLabelEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.NodeLabelEditEventArgs) Handles TreeView1.BeforeLabelEdit
TreeView1.LabelEdit = True ‘使可以編輯
AddNode = TreeView1.SelectedNode
End Sub
Private Sub TreeView1_AfterLabelEdit(ByVal sender As Object, ByVal e As System.windows.Forms.NodeLabelEditEventArgs) Handles TreeView1.AfterLabelEdit
Try
‘此時你改完了節(jié)點名字
TreeView1.SelectedNode.EndEdit(True)
If e.Label Is Nothing Then
'do nothing
ElseIf e.Node.Text = "工種" Then ‘工種不能改
e.CancelEdit() = True
‘e.Node.Text ，e.Label.ToString 一個是改前的名字一個是該后的名字，具體哪個對
哪個請查MSDN
ElseIf Trim(e.Node.Text) "工種" And e.Node.Text e.Label.ToString Then
If MsgBox("此操作會導(dǎo)致當(dāng)前工種中的所有人員的工種都被更改，是否確定？", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "警告") = MsgBoxResult.Yes Then
。。。。 ‘我的更改
MsgBox("更改成功！", MsgBoxStyle.OKOnly, "提示")
'Call InitTree() ‘有時要重新把treeview初始化一遍，視需求定
End If
End If
Catch err As Exception
MsgBox(err.ToString)
End Try
End Sub
其他：
擋treeview得到焦點時你可以使用ContextMenu，反之ContextMenu禁用
Private Sub TreeView1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TreeView1.GotFocus
TreeView1.ContextMenu = ContextMenu1
End Sub
Private Sub TreeView1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TreeView1.LostFocus
TreeView1.ContextMenu = Nothing
End Sub
注意：這里沒有在ContextMenu菜單添加“更改”項，而是直接更改：即左鍵單擊節(jié)點表示
選中，再單擊一下就可以編輯了，更改之后單擊他處就完成更改，和你在windows中更改文
件名字相似。
VB.NET 左側(cè)菜單控件
vb.net沒有現(xiàn)成的那種控件
1，可以用標(biāo)簽控件自己來生成
2，用第三方DevComponents.DotNetBar2.dll的ExplorerBar控件能實現(xiàn)類似的效果
標(biāo)題名稱：vb.net側(cè)邊菜單,vb菜單欄
分享路徑：http://fisionsoft.com.cn/article/heiish.html
