;?? Visual Studio NET提供的MonthCalendar控件允許你選擇日期和一組日期 這個(gè)控件允許用戶方便地選擇日期 它類似于讓你選擇一個(gè)特定日期的DataTimePicker控件 不過(guò)MonthCalendar控件還可以幫助你選擇一個(gè)時(shí)間
創(chuàng)新互聯(lián)堅(jiān)持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:成都網(wǎng)站設(shè)計(jì)、網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時(shí)代的合山網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
使用MonthCalendar 控件
下面的例子說(shuō)明如何使用MonthCalendar控件
在常用控件(Common Controls)下的工具箱(Toolbox)中找到MonthCalendar控件并將它添加到窗口表單(Window Form)中 設(shè)置以下屬性
·Name mcDateSelection
·TodayDate 空
·MaxSelectionCount
·Selection Range Start 空
·Selection Range End 空
在Form Load事件中添加以下代碼
mcDateSelection TodayDate = Now
然后建立列表A中的事件 在這個(gè)例子中 我設(shè)置MaxSelectionCount屬性為 這意味著你只能在MonthCalendar控件中選擇一個(gè) 而不是一組日期 在MonthView控件中選擇一個(gè)日期 屏幕即類似于圖A
圖A
列表A Private Sub mcDateSelection_DateSelected(ByVal sender As Object ByVal e As System Windows Forms DateRangeEventArgs) Handles mcDateSelection DateSelected??????? MessageBox Show( Calendar Today s Date: mcDateSelection TodayDate vbCrLf _??????????????? Calendar Selected Start Date: mcDateSelection SelectionStart() vbCrLf _??????????????? Calendar Selected End Date: mcDateSelection SelectionEnd())??? End Sub???? 既然你只能選擇一個(gè)月中的某個(gè)特定的日期 而不是一組日期 那么 Selected Start Date和Selected End Date的值相同
現(xiàn)在 將MaxSelectionCount屬性設(shè)為 然后重新運(yùn)行代碼 這次 你就可以選擇一組日期(在這個(gè)例子中最多為 天) 而且 一旦你選擇一組日期后 你將看到如圖B所示的結(jié)果
圖B
控件的其它用法
你可以利用MonthCalendar控件的許多其它屬性和方法 使其滿足你的需要 MSDN提供使用MonthCalendar控件的更多細(xì)節(jié)
lishixinzhi/Article/program/net/201311/11787
體是Windows應(yīng)用程序的基礎(chǔ) 新一代的開(kāi)發(fā)工具Visual Basic Net為設(shè)計(jì)制作窗體提供了更多簡(jiǎn)單而豐富的方法 無(wú)需再求助于復(fù)雜而易錯(cuò)的API函數(shù) 我們就可以輕松制作多種特效窗體 輕松制作透明窗體VB NET可以輕松制作出任一透明度的窗體 我們只要在窗體的 屬性 窗口中 將 Opacity 屬性設(shè)置為一個(gè)介于 (完全透明)與 (完全不透明)之間的值就可以了 Dim frm As FrmTrans = New FrmTrans()frm Opacity = frm ShowDialog() 輕松制作始終位于最上層的窗體在VB 中 要制作一個(gè)始終位于最上層的窗體我們只能求助于令人頭痛的API函數(shù) 然而在 NET 中 我們只要簡(jiǎn)單設(shè)置窗體的 TopMost 屬性就可實(shí)現(xiàn)同樣效果了!例如 Dim frm As frmTopMost = New frmTopMost()frm TopMost = Truefrm Show() 輕松制作不可見(jiàn)的窗體如果要編寫一個(gè)不讓別人發(fā)現(xiàn)的隱藏程序 制作不可見(jiàn)的窗體就是必須實(shí)現(xiàn)的第一步 窗體的可見(jiàn)性通常由 Visible 屬性控制 但是 如果希望 Windows 應(yīng)用程序的主窗體在應(yīng)用程序啟動(dòng)時(shí)不可見(jiàn) 您將會(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)不可見(jiàn)的窗體 在下面這個(gè)例子中 窗體在特定的時(shí)間內(nèi)自動(dòng)隱藏 ( )在 Visual Basic 中 右擊項(xiàng)目并選擇 添加模塊 以將模塊添加到 Windows 應(yīng)用程序 ( )在已添加的模塊(或類)內(nèi) 創(chuàng)建可作為項(xiàng)目啟動(dòng)對(duì)象的 Main 函數(shù) Sub main()Dim f As New Form ()f Visible = FalseWhile Hour(Date Now) 如果當(dāng)前時(shí)間早于 點(diǎn) 窗體自動(dòng)隱藏Application DoEvents()End Whilef ShowDialog()End Sub 輕松編寫托盤程序托盤程序作為一類特殊的窗體 其快捷圖標(biāo)顯示在系統(tǒng)托盤中 窗體本身則隱藏不可見(jiàn) 在 NET之前版本的VB中編寫托盤程序是十分困難的 但是VB NET提供的新的NotifyIcon組件卻使VB初學(xué)者也能輕松編寫一個(gè)這樣的程序 新建 Windows應(yīng)用程序 設(shè)置主窗體Opacity屬性為 FormBorderStyle屬性為None ShowInTaskbar屬性為False 這樣窗體將在啟動(dòng)后隱藏 在窗體上放置一個(gè)NotifyIcon組件NotifyIcon 一個(gè)ContextMenu(彈出菜單)組件ContextMenu 并根據(jù)需要為ContextMenu 添加菜單項(xiàng) 設(shè)置NotifyIcon 的ICON屬性 這個(gè)圖標(biāo)就是應(yīng)用程序出現(xiàn)在系統(tǒng)托盤中的快捷圖標(biāo) 設(shè)置NotifyIcon 的Text屬性為 VB NET托盤程序 這就是鼠標(biāo)移動(dòng)到托盤圖標(biāo)時(shí)彈出的文字說(shuō)明 設(shè)置NotifyIcon 的ContextMenu屬性為ContextMenu 也就是右鍵單擊快捷圖標(biāo)時(shí)的彈出菜單為ContextMenu OK 按F 運(yùn)行!幾乎不用編寫代碼 一個(gè)托盤程序就這樣輕松實(shí)現(xiàn)了 lishixinzhi/Article/program/net/201311/13831
只是picturebox支持而已...
把gif每幀都單獨(dú)存成一張圖片,加個(gè)timer不斷更換treeview節(jié)點(diǎn)顯示的圖片,用來(lái)實(shí)現(xiàn)簡(jiǎn)單的動(dòng)畫是夠了。
本文名稱:vb.net特效控件 vb 控件
瀏覽路徑:http://chinadenli.net/article28/hgddjp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App開(kāi)發(fā)、手機(jī)網(wǎng)站建設(shè)、網(wǎng)站策劃、自適應(yīng)網(wǎng)站、微信小程序、商城網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)