基本介紹
- 中文名：MonthView控制項
- 作用：能夠讓用戶通過日曆風格的界面
- 屬性：Day
- 日曆控制項：MonthView
簡介,屬性,方法,事件,使用實例,
簡介
MonthView 控制項的 Value 屬性返回當前被選定的日期。
可以允許最終用戶通過將 MultiSelect 屬性設定為 True，並使用MaxSelProperty 指定可選擇的天數來選擇一個連續的日期範圍。SelStart 和SelEnd 屬性返回所選擇的日期範圍的第一個日期和最後一個日期。可以用許多方法自定義一個 MonthView 控制項的外觀。
可以使用各種顏色屬性，例如 MonthBackColor、TitleBackColor、TitleForeColor 和 TrailingForeColor為控制項創建一個唯一的配色方案。
通過設定MonthRows和MonthColumns屬性，可以在一個 MonthView 控制項中一次顯示多個月份（多至12）。MonthRows和MonthColumns 屬性的總數必須小於或等於 12。
屬性
Day屬性，DayOfWeek屬性，DayBold屬性，MaxDate, MinDate屬性，MaxSelCount屬性，Month屬性，MonthBackColor屬性，MultiSelect屬性（MonthView控制項），ShowToday屬性，StartOfWeek屬性，ScrollRate屬性，SelEnd, SelStart屬性（MonthView控制項），ShowWeekNumbers屬性，TitleBackColor，TitleForeColor屬性，TrailingForeColor屬性，Value屬性（MonthView, DatePicker控制項），VisibleDays屬性，Week屬性，Year屬性，MonthColumns,MonthRows屬性，DataMember屬性，DataFormat屬性，DataBindings屬性，Left, Top屬性，TabIndex屬性，Visible屬性，DragIcon屬性，DragMode屬性，CausesValidation屬性，TabStop屬性，Enabled屬性，HelpContextID屬性，Index屬性（控制項矩陣），Name屬性，Parent屬性，Container屬性，Object屬性，ToolTipText屬性，DataChanged屬性，DataField屬性，DataSource屬性，WhatsThisHelpID屬性，OLEDropMode屬性（ActiveX控制項），Height, Width屬性（ActiveX控制項），Tag屬性（ActiveX控制項），Appearance屬性（ActiveX控制項），BackColor, ForeColor屬性（ActiveX控制項），BorderStyle屬性（ActiveX控制項），Enabled屬性（ActiveX控制項），Font屬性（ActiveX控制項），hWnd屬性（ActiveX控制項），MouseIcon屬性（ActiveX控制項），MousePointer屬性（ActiveX控制項）。
方法
HitTest方法（MonthView控制項），ComputeControlSize方法，SetFocus方法，Drag方法，Move方法，ZOrder方法，ShowWhatsThis方法，Refresh方法（ActiveX控制項），OLEDrag方法（ActiveX控制項）Refresh方法，HitTest方法（MonthView控制項），ComputerControlSize方法。
事件
日曆控制項事件，DateDblClick事件，GetDayBold事件，SelChance事件（MonthView控制項），DragDrop事件，DragOver事件，GotFocus事件，LostFocus事件，Validate事件，OLECompleteDrag事件（ActiveX控制項），OLEDragDrop事件（ActiveX控制項），OLEDragOver事件（ActiveX控制項），OLEGiveFeedback事件（ActiveX控制項），OLESetData事件（ActiveX控制項），OLEStartDrag事件（ActiveX控制項），Click事件（ActiveX控制項），DblClick事件（ActiveX控制項），KeyDown, KeyUp事件（ActiveX控制項），KeyPress事件（ActiveX控制項），MouseDown, MouseUp事件（ActiveX控制項），MouseMove事件（ActiveX控制項）。
使用實例
MonthView（日曆控制項），用它可以編寫出具有日曆功能的程式（如圖）。
下面介紹一下MonthView的用法。
1．首先，要在VB中找到MonthView控制項：在“工程”選單中選擇“部件”，然後找到“Microsoft Windows Common Controls 2 －6．0”，選中後按“確定”。此時，在VB的控制項工具列中會多出4個控制項，MonthView就在其中。
以下的幾個屬性需要說明一下：
MinDate?日曆所顯示的最早日期?
MaxDate?日曆所顯示的最晚日期；
StartWeek?日曆顯示時，作為第一列的星期號。
按照我們的習慣，星期一應在首列，所以將它設定為2－mvwMonday。?默認值為1－mvwSunday，也就是把星期日作為首列，這是美國人的習慣。?
MonthRows和MonthColumns分別是用來同時顯示的多個月份時的行和列。在例圖中MonthRows=1，MonthColumns=1，即一行一列。
當把這些屬性設定好之後，一個日曆就誕生了?同時，我們在編程當中還可以得到MonthView幾個有用的屬性的返回值。它們是：Year表示被選中的年份；Month表示被選中的月份；Day表示被選中的日期；DayOfWeek表示被選中日期的星期號。要注意?DayOfWeek的返回值為1～7，1代表星期日，2代表星期一，以此類推。下面我們介紹一個簡單的例子：
′執行下面的代碼將獲得MonthView的返回值
Private Sub MonthView1_DateClick?ByVal DateClicked As Date?
dayn = MonthView1．Day
monthn = MonthView1．Month
yearn = MonthView1．Year
weekdayn = MonthView1．DayOfWeek
′把DayOfWeek的返回值轉換為中文。
Select Case weekdayn
Case 1
Weekdays = ″日″
Case 2
Weekdays = ″一″
Case 3
Weekdays = ″二″
Case 4
Weekdays = ″三″
Case 5
Weekdays = ″四″
Case 6
Weekdays = ″五″
Case 7
Weekdays = ″六″
End Select
Msgbox ″您選擇的日期是?″ & yearn & ″年″ & monthn & ″月″ & dayn & ″日 星期″ & Weekdays
End Sub
