日本综合一区二区|亚洲中文天堂综合|日韩欧美自拍一区|男女精品天堂一区|欧美自拍第6页亚洲成人精品一区|亚洲黄色天堂一区二区成人|超碰91偷拍第一页|日韩av夜夜嗨中文字幕|久久蜜综合视频官网|精美人妻一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間:8:30-17:00
你可能遇到了下面的問(wèn)題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
百寶箱之VB.NET設(shè)計(jì)制作窗體

經(jīng)過(guò)長(zhǎng)時(shí)間學(xué)習(xí)VB.NET設(shè)計(jì)制作窗體,以前介紹過(guò)VB.NET窗體編程模式,于是今天和大家分享一下,看完本文你肯定有不少收獲,希望本文能教會(huì)你更多東西。新一代的開發(fā)工具VB.NET設(shè)計(jì)制作窗體提供了更多簡(jiǎn)單而豐富的方法,無(wú)需再求助于復(fù)雜而易錯(cuò)的API函數(shù),我們就可以輕松制作多種特效窗體:

1、輕松制作透明窗體

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設(shè)計(jì)制作窗體:不可見的窗體

如果要編寫一個(gè)不讓別人發(fā)現(xiàn)的隱藏程序,制作不可見的窗體就是必須實(shí)現(xià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)用程序的生存期,輕松實(shí)現(xiàn)不可見的窗體。在下面這個(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. Dim f1 As New Form1()
  2. f1.Visible = False
  3. While Hour(Date.Now) < 15 
  4. ‘如果當(dāng)前時(shí)間早于15點(diǎn),窗體自動(dòng)隱藏
  5. Application.DoEvents()
  6. End While
  7. f1.ShowDialog()
  8. End Sub

新聞標(biāo)題:百寶箱之VB.NET設(shè)計(jì)制作窗體
分享網(wǎng)址:http://www.dlmjj.cn/article/dhgspcd.html