熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

用VB.NET輕松制作特效窗體

2013-11-13 10:30:05  來源: .NET編程 
體是Windows應用程序的基礎新一代的開發工具Visual BasicNet為設計制作窗體提供了更多簡單而豐富的方法無需再求助於復雜而易錯的API函數我們就可以輕松制作多種特效窗體


輕松制作透明窗體

VBNET可以輕松制作出任一透明度的窗體我們只要在窗體的屬性窗口中將 Opacity 屬性設置為一個介於 (完全透明)與 (完全不透明)之間的值就可以了

Dim frm As FrmTrans = New FrmTrans()

frmOpacity =

frmShowDialog()




輕松制作始終位於最上層的窗體

在VB要制作一個始終位於最上層的窗體我們只能求助於令人頭痛的API函數然而在 NET 中我們只要簡單設置窗體的 TopMost 屬性就可實現同樣效果了!例如

Dim frm As frmTopMost = New frmTopMost()

frmTopMost = True

frmShow()

輕松制作不可見的窗體

如果要編寫一個不讓別人發現的隱藏程序制作不可見的窗體就是必須實現的第一步窗體的可見性通常由 Visible 屬性控制但是如果希望 Windows 應用程序的主窗體在應用程序啟動時不可見您將會發現將它的 Visible 屬性設置為 False 的方法無效窗體總會自己顯示出來(這是因為啟動窗體的生存期決定了應用程序的生存期)雖然如此我們還是可以通過簡單將應用程序的啟動設置為一個模塊從而從窗體的生存期分出應用程序的生存期輕松實現不可見的窗體在下面這個例子中窗體在特定的時間內自動隱藏

)在 Visual Basic 中右擊項目並選擇添加模塊以將模塊添加到 Windows 應用程序

)在已添加的模塊(或類)內創建可作為項目啟動對象的 Main 函數

Sub main()

Dim f As New Form()

fVisible = False

While Hour(DateNow) < 如果當前時間早於窗體自動隱藏

ApplicationDoEvents()

End While

fShowDialog()

End Sub

輕松編寫托盤程序

托盤程序作為一類特殊的窗體其快捷圖標顯示在系統托盤中窗體本身則隱藏不可見NET之前版本的VB中編寫托盤程序是十分困難的但是VBNET提供的新的NotifyIcon組件卻使VB初學者也能輕松編寫一個這樣的程序

新建Windows應用程序設置主窗體Opacity屬性為FormBorderStyle屬性為NoneShowInTaskbar屬性為False這樣窗體將在啟動後隱藏在窗體上放置一個NotifyIcon組件NotifyIcon一個ContextMenu(彈出菜單)組件ContextMenu並根據需要為ContextMenu添加菜單項

設置NotifyIcon的ICON屬性這個圖標就是應用程序出現在系統托盤中的快捷圖標設置NotifyIcon的Text屬性為VBNET托盤程序這就是鼠標移動到托盤圖標時彈出的文字說明設置NotifyIcon的ContextMenu屬性為ContextMenu也就是右鍵單擊快捷圖標時的彈出菜單為ContextMenuOK按F運行!

幾乎不用編寫代碼一個托盤程序就這樣輕松實現了
From:http://tw.wingwit.com/Article/program/net/201311/13831.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.