如何應(yīng)用VB.NET MonthCalendar控件

;?? Visual Studio NET提供的MonthCalendar控件允許你選擇日期和一組日期 這個控件允許用戶方便地選擇日期 它類似于讓你選擇一個特定日期的DataTimePicker控件 不過MonthCalendar控件還可以幫助你選擇一個時間

創(chuàng)新互聯(lián)堅持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：成都網(wǎng)站設(shè)計、網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時代的合山網(wǎng)站設(shè)計、移動媒體設(shè)計的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

使用MonthCalendar 控件

下面的例子說明如何使用MonthCalendar控件

在常用控件（Common Controls）下的工具箱（Toolbox）中找到MonthCalendar控件并將它添加到窗口表單（Window Form）中 設(shè)置以下屬性

·Name mcDateSelection

·TodayDate 空

·MaxSelectionCount

·Selection Range Start 空

·Selection Range End 空

在Form Load事件中添加以下代碼

mcDateSelection TodayDate = Now

然后建立列表A中的事件 在這個例子中 我設(shè)置MaxSelectionCount屬性為 這意味著你只能在MonthCalendar控件中選擇一個 而不是一組日期 在MonthView控件中選擇一個日期 屏幕即類似于圖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???? 既然你只能選擇一個月中的某個特定的日期 而不是一組日期 那么 Selected Start Date和Selected End Date的值相同

現(xiàn)在 將MaxSelectionCount屬性設(shè)為 然后重新運(yùn)行代碼 這次 你就可以選擇一組日期（在這個例子中最多為 天） 而且 一旦你選擇一組日期后 你將看到如圖B所示的結(jié)果

圖B

控件的其它用法

你可以利用MonthCalendar控件的許多其它屬性和方法 使其滿足你的需要 MSDN提供使用MonthCalendar控件的更多細(xì)節(jié)

lishixinzhi/Article/program/net/201311/11787

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

體是Windows應(yīng)用程序的基礎(chǔ) 新一代的開發(fā)工具Visual Basic Net為設(shè)計制作窗體提供了更多簡單而豐富的方法 無需再求助于復(fù)雜而易錯的API函數(shù) 我們就可以輕松制作多種特效窗體 輕松制作透明窗體VB NET可以輕松制作出任一透明度的窗體 我們只要在窗體的 屬性 窗口中 將 Opacity 屬性設(shè)置為一個介于 （完全透明）與 （完全不透明）之間的值就可以了 Dim frm As FrmTrans = New FrmTrans()frm Opacity = frm ShowDialog() 輕松制作始終位于最上層的窗體在VB 中 要制作一個始終位于最上層的窗體我們只能求助于令人頭痛的API函數(shù) 然而在 NET 中 我們只要簡單設(shè)置窗體的 TopMost 屬性就可實現(xiàn)同樣效果了！例如 Dim frm As frmTopMost = New frmTopMost()frm TopMost = Truefrm Show() 輕松制作不可見的窗體如果要編寫一個不讓別人發(fā)現(xiàn)的隱藏程序 制作不可見的窗體就是必須實現(xiàn)的第一步 窗體的可見性通常由 Visible 屬性控制 但是 如果希望 Windows 應(yīng)用程序的主窗體在應(yīng)用程序啟動時不可見 您將會發(fā)現(xiàn)將它的 Visible 屬性設(shè)置為 False 的方法無效 窗體總會自己顯示出來（這是因為 啟動窗體的生存期決定了應(yīng)用程序的生存期） 雖然如此 我們還是可以通過簡單將應(yīng)用程序的啟動設(shè)置為一個模塊 從而從窗體的生存期分出應(yīng)用程序的生存期 輕松實現(xiàn)不可見的窗體 在下面這個例子中 窗體在特定的時間內(nèi)自動隱藏 （ ）在 Visual Basic 中 右擊項目并選擇 添加模塊 以將模塊添加到 Windows 應(yīng)用程序 （ ）在已添加的模塊（或類）內(nèi) 創(chuàng)建可作為項目啟動對象的 Main 函數(shù) Sub main()Dim f As New Form ()f Visible = FalseWhile Hour(Date Now) 如果當(dāng)前時間早于 點(diǎn) 窗體自動隱藏Application DoEvents()End Whilef ShowDialog()End Sub 輕松編寫托盤程序托盤程序作為一類特殊的窗體 其快捷圖標(biāo)顯示在系統(tǒng)托盤中 窗體本身則隱藏不可見 在 NET之前版本的VB中編寫托盤程序是十分困難的 但是VB NET提供的新的NotifyIcon組件卻使VB初學(xué)者也能輕松編寫一個這樣的程序 新建 Windows應(yīng)用程序 設(shè)置主窗體Opacity屬性為 FormBorderStyle屬性為None ShowInTaskbar屬性為False 這樣窗體將在啟動后隱藏 在窗體上放置一個NotifyIcon組件NotifyIcon 一個ContextMenu（彈出菜單）組件ContextMenu 并根據(jù)需要為ContextMenu 添加菜單項 設(shè)置NotifyIcon 的ICON屬性 這個圖標(biāo)就是應(yīng)用程序出現(xiàn)在系統(tǒng)托盤中的快捷圖標(biāo) 設(shè)置NotifyIcon 的Text屬性為 VB NET托盤程序 這就是鼠標(biāo)移動到托盤圖標(biāo)時彈出的文字說明 設(shè)置NotifyIcon 的ContextMenu屬性為ContextMenu 也就是右鍵單擊快捷圖標(biāo)時的彈出菜單為ContextMenu OK 按F 運(yùn)行！幾乎不用編寫代碼 一個托盤程序就這樣輕松實現(xiàn)了 lishixinzhi/Article/program/net/201311/13831

VB.NET怎么制作帶有動畫效果的控件

只是picturebox支持而已...

把gif每幀都單獨(dú)存成一張圖片，加個timer不斷更換treeview節(jié)點(diǎn)顯示的圖片，用來實現(xiàn)簡單的動畫是夠了。