VB.NET菜單欄控件不見了，怎么解決？

沒有環(huán)境無法準(zhǔn)確幫你找，只能大概說下類似的軟件。如果有視圖（view）之類菜單下，一般都會有狀態(tài)欄信息欄等，勾選出來就能出現(xiàn)快捷菜單了。

你所需要的網(wǎng)站建設(shè)服務(wù)，我們均能行業(yè)靠前的水平為你提供.標(biāo)準(zhǔn)是產(chǎn)品質(zhì)量的保證，主要從事做網(wǎng)站、成都網(wǎng)站設(shè)計、企業(yè)網(wǎng)站建設(shè)、成都手機網(wǎng)站制作、網(wǎng)頁設(shè)計、成都品牌網(wǎng)站建設(shè)、網(wǎng)頁制作、做網(wǎng)站、建網(wǎng)站。創(chuàng)新互聯(lián)建站擁有實力堅強的技術(shù)研發(fā)團隊及素養(yǎng)的視覺設(shè)計專才。

vb.net外接程序不顯示菜單

系統(tǒng)bug，網(wǎng)絡(luò)問題。

1、系統(tǒng)bug是vb.net外接軟件系統(tǒng)出現(xiàn)了問題導(dǎo)致程序不顯示菜單，等待官方修復(fù)即可。

2、網(wǎng)絡(luò)問題是自身設(shè)備連接的網(wǎng)絡(luò)出現(xiàn)較大波動，導(dǎo)致vb.net外接程序不顯示菜單，更換網(wǎng)絡(luò)重新打開即可。

vb.net加載主窗體時,菜單欄有顏色，像亂碼怎么回事，加載完了就沒有了，就瞬間，求解決，真的很難受看著

Public?Class?Form1

Dim?I?As?Integer

Private?Sub?Timer1_Tick(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Timer1.Tick

I?=?I?+?1

If?I?=?10?Then?Me.Show()

End?Sub

Private?Sub?Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load

Me.Hide()

End?Sub

End?Class

你可以先隱藏窗體 讓他加載完 再顯示出來 如上代碼 如果還不夠時間 可以適當(dāng)增加

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中更改文

件名字相似。