成人免费xxxxx在线视频软件_久久精品久久久_亚洲国产精品久久久_天天色天天色_亚洲人成一区_欧美一级欧美三级在线观看

講述VB.NET制作透明窗體

開(kāi)發(fā) 后端
這里介紹VB.NET制作透明窗體,窗體是Windows應(yīng)用程序的基礎(chǔ)。新一代的開(kāi)發(fā)工具Visual Basic.Net為設(shè)計(jì)制作窗體提供了更多簡(jiǎn)單而豐富的方法,無(wú)需再求助于復(fù)雜而易錯(cuò)的API函數(shù),我們就可以輕松制作多種特效窗體。

VB.NET有很多值得學(xué)習(xí)的地方,這里我們主要介紹VB.NET制作透明窗體,包括介紹輕松編寫(xiě)托盤(pán)程序托盤(pán)程序作為一類特殊的窗體等方面。

窗體是Windows應(yīng)用程序的基礎(chǔ)。新一代的開(kāi)發(fā)工具Visual Basic.Net為設(shè)計(jì)制作窗體提供了更多簡(jiǎn)單而豐富的方法,無(wú)需再求助于復(fù)雜而易錯(cuò)的API函數(shù),我們就可以輕松制作多種特效窗體。

1、VB.NET制作透明窗體,VB.NET可以輕松制作出任一透明度的窗體:我們只要在窗體的“屬性”窗口中,將 Opacity 屬性設(shè)置為一個(gè)介于 0.0(完全透明)與 1.0(完全不透明)之間的值就可以了:

  1. Dim frm As FrmTrans = New FrmTrans()  
  2. frm.Opacity = 0.5  
  3. frm.ShowDialog() 

2、輕松制作始終位于最上層的窗體在VB6中,要制作一個(gè)始終位于最上層的窗體我們只能求助于令人頭痛的API函數(shù)。然而在 .NET 中,我們只要簡(jiǎn)單設(shè)置窗體的 TopMost 屬性就可實(shí)現(xiàn)同樣效果了!例如:

  1. Dim frm As frmTopMost = New frmTopMost()  
  2. frm.TopMost = True 
  3. frm.Show() 

3、VB.NET制作透明窗體,如果要編寫(xiě)一個(gè)不讓別人發(fā)現(xiàn)的隱藏程序,制作透明窗體就是必須實(shí)現(xiàn)的***步。窗體的可見(jiàn)性通常由 Visible 屬性控制。但是,如果希望 Windows 應(yīng)用程序的主窗體在應(yīng)用程序啟動(dòng)時(shí)透明窗體,您將會(huì)發(fā)現(xiàn)將它的 Visible 屬性設(shè)置為 False 的方法無(wú)效,窗體總會(huì)自己顯示出來(lái)(這是因?yàn)?,啟?dòng)窗體的生存期決定了應(yīng)用程序的生存期)。雖然如此,我們還是可以通過(guò)簡(jiǎn)單將應(yīng)用程序的啟動(dòng)設(shè)置為一個(gè)模塊,從而從窗體的生存期分出應(yīng)用程序的生存期,VB.NET制作透明窗體。在下面這個(gè)例子中,窗體在特定的時(shí)間內(nèi)自動(dòng)隱藏:
1).在 Visual Basic 中,右擊項(xiàng)目并選擇“添加模塊”以將模塊添加到 Windows 應(yīng)用程序。
2).在已添加的模塊(或類)內(nèi),創(chuàng)建可作為項(xiàng)目啟動(dòng)對(duì)象的 Main 函數(shù):

  1. Sub main()  
  2. Dim f1 As New Form1()  
  3. f1.Visible = False 
  4. While Hour(Date.Now) < 15   
  5. ‘如果當(dāng)前時(shí)間早于15點(diǎn),窗體自動(dòng)隱藏  
  6. Application.DoEvents()  
  7. End While  
  8. f1.ShowDialog()  
  9. End Sub 

4、輕松編寫(xiě)托盤(pán)程序托盤(pán)程序作為一類特殊的窗體,其快捷圖標(biāo)顯示在系統(tǒng)托盤(pán)中,窗體本身則隱藏透明窗體。在.NET之前版本的VB中編寫(xiě)托盤(pán)程序是十分困難的,但是VB.NET提供的新的NotifyIcon組件卻使VB初學(xué)者也能輕松編寫(xiě)一個(gè)這樣的程序:新建“Windows應(yīng)用程序”,設(shè)置主窗體 Opacity屬性為0,F(xiàn)ormBorderStyle屬性為None,ShowInTaskbar屬性為False,這樣窗體將在啟動(dòng)后隱藏。在窗體上放置一個(gè)NotifyIcon組件NotifyIcon1,一個(gè)ContextMenu(彈出菜單)組件ContextMenu1,并根據(jù)需要為 ContextMenu1添加菜單項(xiàng)。

設(shè)置NotifyIcon1的ICON屬性,這個(gè)圖標(biāo)就是應(yīng)用程序出現(xiàn)在系統(tǒng)托盤(pán)中的快捷圖標(biāo);設(shè)置NotifyIcon1的Text屬性為“VB.NET托盤(pán)程序”,這就是鼠標(biāo)移動(dòng)到托盤(pán)圖標(biāo)時(shí)彈出的文字說(shuō)明;設(shè)置NotifyIcon1的 ContextMenu屬性為ContextMenu1,也就是右鍵單擊快捷圖標(biāo)時(shí)的彈出菜單為ContextMenu1.OK,按F5運(yùn)行!

【編輯推薦】

  1. 淺析VB.NET開(kāi)發(fā)自動(dòng)分頁(yè)
  2. VB.NET ListView控件經(jīng)驗(yàn)總結(jié)
  3. 簡(jiǎn)單講述VB.NET讀取INI
  4. 簡(jiǎn)要介紹VB System.Array類及其成員
  5. 概括VB.NET獲取網(wǎng)卡地址的步驟
責(zé)任編輯:佚名 來(lái)源: IT168
相關(guān)推薦

2009-11-03 17:31:01

VB.NET窗體

2009-11-03 17:35:05

VB.NET窗體透明度

2009-10-21 10:45:50

VB.NET Quic

2009-10-14 17:08:44

VB.NET使用Fil

2009-10-16 13:26:53

VB.NET Exce

2009-10-15 11:11:08

VB.NET Text

2009-10-15 16:39:00

VB.NET讀取INI

2009-10-14 11:15:06

VB.NET Grou

2009-10-23 13:22:25

VB.NET實(shí)現(xiàn)拖動(dòng)圖

2009-10-10 16:44:52

VB.NET開(kāi)發(fā)控件

2009-10-13 17:03:55

VB.NET面向?qū)ο?/a>

2009-11-02 15:45:03

VB.NET IEnu

2009-10-12 16:39:59

OracleTransVB.NET使用

2009-10-19 08:55:22

VB.NET多重繼承

2009-10-26 18:11:47

VB.NET調(diào)用Exc

2009-10-21 18:28:48

VB.NET表間拖放

2009-10-29 09:57:16

VB.NET實(shí)現(xiàn)數(shù)據(jù)綁

2009-10-22 09:20:46

VB.NET Proc

2010-01-11 15:12:30

VB.NET特殊窗體

2009-10-09 16:54:03

VB.NET窗體
點(diǎn)贊
收藏

51CTO技術(shù)棧公眾號(hào)

主站蜘蛛池模板: 成人精品视频在线观看 | 久久精品视频9 | 日韩欧美在线视频观看 | 国产精品久久一区二区三区 | 国产区免费视频 | 99re在线| 国产精品久久久久久久久久妞妞 | 国产中文字幕在线观看 | 中文字幕日韩在线 | 午夜影院 | 日韩成人av在线 | 天天综合成人网 | 国产免费一区二区 | 一区二区中文字幕 | 最新日韩在线 | 波波电影院一区二区三区 | 一区二区三区高清 | 96久久久久久 | 激情影院久久 | 欧美精品一区二区免费视频 | 狠狠干影院 | 日韩欧美理论片 | 成人免费福利视频 | 成人免费视频一区二区 | 黄色片视频 | 亚洲黄色国产 | 日韩欧美成人一区二区三区 | 亚洲一区精品视频 | 99re6在线视频 | 久久国产99 | 精品欧美色视频网站在线观看 | 91亚洲精品久久久电影 | 不卡一区二区三区四区 | 国产草草视频 | 久久久.com | 欧美成人a∨高清免费观看 欧美日韩中 | 欧美成人h版在线观看 | 久久99网| 亚洲高清免费观看 | 久久久www成人免费无遮挡大片 | 国产一区二区三区久久久久久久久 |