添加托盤圖標(biāo)控件,并設(shè)置好其Icon屬性,然后添加如下代碼:
網(wǎng)站建設(shè)公司,為您提供網(wǎng)站建設(shè),網(wǎng)站制作,網(wǎng)頁設(shè)計(jì)及定制網(wǎng)站建設(shè)服務(wù),專注于成都定制網(wǎng)站,高端網(wǎng)頁制作,對成都圍欄護(hù)欄等多個(gè)行業(yè)擁有豐富的網(wǎng)站建設(shè)經(jīng)驗(yàn)的網(wǎng)站建設(shè)公司。專業(yè)網(wǎng)站設(shè)計(jì),網(wǎng)站優(yōu)化推廣哪家好,專業(yè)網(wǎng)站推廣優(yōu)化,H5建站,響應(yīng)式網(wǎng)站。
Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
Me.Hide()
End Sub
所謂靜態(tài)托盤程序是指程序運(yùn)行后,在系統(tǒng)托盤區(qū)的圖標(biāo)處于靜止?fàn)顟B(tài)的托盤程序。動(dòng)態(tài)托盤程序正好與之相反,它是指在系統(tǒng)托盤區(qū)圖標(biāo)呈現(xiàn)動(dòng)畫效果的一類托盤程序。下面就來探討一下VB.NET是如何實(shí)現(xiàn)靜態(tài)托盤程序。
添加托盤圖標(biāo)控件,并設(shè)置好其Icon屬性,然后添加如下代碼:
Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
Me.Hide()
End Sub
這樣實(shí)現(xiàn)了點(diǎn)關(guān)閉,進(jìn)入托盤,如果點(diǎn)最小化進(jìn)入托盤:
'窗體最小化時(shí)候隱藏窗體,
Private Sub MainForm_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged
If Me.WindowState = FormWindowState.Minimized Then
Me.Hide()
Me.ShowInTaskbar = False
End If
End Sub
我記在彈出菜單的時(shí)候可以指定位置的吧?依稀記得有個(gè)x和y的參數(shù)吧?你試試修改一下,把y值再減少一點(diǎn)呢?
找了個(gè)以前的代碼:
mnuPrize.Show(lblMenu, New Point(0, lblMenu.Height))
我這個(gè)是在Label的下面彈出來,你可以改一下Point的賦值,提高菜單顯示位置