建站
咨詢
售后
建站咨詢
新聞中心
VB.NET菜單欄控件不見(jiàn)了，怎么解決？
沒(méi)有環(huán)境無(wú)法準(zhǔn)確幫你找，只能大概說(shuō)下類似的軟件。如果有視圖（view）之類菜單下，一般都會(huì)有狀態(tài)欄信息欄等，勾選出來(lái)就能出現(xiàn)快捷菜單了。
你所需要的網(wǎng)站建設(shè)服務(wù)，我們均能行業(yè)靠前的水平為你提供.標(biāo)準(zhǔn)是產(chǎn)品質(zhì)量的保證，主要從事做網(wǎng)站、成都網(wǎng)站設(shè)計(jì)、企業(yè)網(wǎng)站建設(shè)、成都手機(jī)網(wǎng)站制作、網(wǎng)頁(yè)設(shè)計(jì)、成都品牌網(wǎng)站建設(shè)、網(wǎng)頁(yè)制作、做網(wǎng)站、建網(wǎng)站。創(chuàng)新互聯(lián)建站擁有實(shí)力堅(jiān)強(qiáng)的技術(shù)研發(fā)團(tuán)隊(duì)及素養(yǎng)的視覺(jué)設(shè)計(jì)專才。
vb.net外接程序不顯示菜單
系統(tǒng)bug，網(wǎng)絡(luò)問(wèn)題。
1、系統(tǒng)bug是vb.net外接軟件系統(tǒng)出現(xiàn)了問(wèn)題導(dǎo)致程序不顯示菜單，等待官方修復(fù)即可。
2、網(wǎng)絡(luò)問(wèn)題是自身設(shè)備連接的網(wǎng)絡(luò)出現(xiàn)較大波動(dòng)，導(dǎo)致vb.net外接程序不顯示菜單，更換網(wǎng)絡(luò)重新打開(kāi)即可。
vb.net加載主窗體時(shí),菜單欄有顏色，像亂碼怎么回事，加載完了就沒(méi)有了，就瞬間，求解決，真的很難受看著
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
你可以先隱藏窗體 讓他加載完 再顯示出來(lái) 如上代碼 如果還不夠時(shí)間 可以適當(dāng)增加
VB.net如何動(dòng)態(tài)獲取菜單欄中的菜單名并用樹(shù)型表示
添加：（先在加一個(gè)contextMenu,再它的添加子菜單的click事件編程）
Try
’使TreeView可以被編輯
TreeView1.LabelEdit = True
‘判斷你是不是選定的是不可編輯的節(jié)點(diǎn)，我這里工種節(jié)點(diǎn)不可以被編輯，只有工種下級(jí)的
各個(gè)工種名稱可以被編輯
If Trim(TreeView1.SelectedNode.Text) = "工種" Then
‘添加節(jié)點(diǎn)
AddNode = New TreeNode("請(qǐng)輸入新工種名字")
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é)點(diǎn)名字從其他處（如數(shù)據(jù)庫(kù)）得來(lái)，那么你還需要更新數(shù)據(jù)庫(kù)
編輯：
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
‘此時(shí)你改完了節(jié)點(diǎn)名字
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 一個(gè)是改前的名字一個(gè)是該后的名字，具體哪個(gè)對(duì)
哪個(gè)請(qǐng)查MSDN
ElseIf Trim(e.Node.Text) "工種" And e.Node.Text e.Label.ToString Then
If MsgBox("此操作會(huì)導(dǎo)致當(dāng)前工種中的所有人員的工種都被更改，是否確定？", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "警告") = MsgBoxResult.Yes Then
。。。。 ‘我的更改
MsgBox("更改成功！", MsgBoxStyle.OKOnly, "提示")
'Call InitTree() ‘有時(shí)要重新把treeview初始化一遍，視需求定
End If
End If
Catch err As Exception
MsgBox(err.ToString)
End Try
End Sub
其他：
擋treeview得到焦點(diǎn)時(shí)你可以使用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
注意：這里沒(méi)有在ContextMenu菜單添加“更改”項(xiàng)，而是直接更改：即左鍵單擊節(jié)點(diǎn)表示
選中，再單擊一下就可以編輯了，更改之后單擊他處就完成更改，和你在windows中更改文
件名字相似。
網(wǎng)頁(yè)標(biāo)題：vbnet菜單欄 vb制作菜單欄
當(dāng)前地址：http://fisionsoft.com.cn/article/doshhds.html
