Imports GrapeCity.Web.Input.IMCalendar
Imports GrapeCity.Web.Input.Core
' 描画スタイルを追加します。
GcDateTime1.DropDownCalendar.Styles.Add("Standard")
Dim aStyle As Style = GcDateTime1.DropDownCalendar.Styles("Standard")
' 描画スタイルの内容を設定します。
aStyle.BackColor = Color.White
aStyle.ForeColor = Color.Blue
aStyle.Font.Name = "ＭＳ ゴシック"
aStyle.Font.Size = FontUnit.Small
aStyle.BorderColor = Color.Black
aStyle.BorderStyle = BorderStyle.Dotted
aStyle.BorderWidth = 1
aStyle.TextHAlign = AlignHorizontal.Center
aStyle.TextVAlign = AlignVertical.Middle
' 描画スタイルを各領域へ適用します。
GcDateTime1.DropDownCalendar.ControlStyle = aStyle
GcDateTime1.DropDownCalendar.UseControlStyle = True
using GrapeCity.Web.Input.IMCalendar;
using GrapeCity.Web.Input.Core;
// 描画スタイルを追加します。
GcDateTime1.DropDownCalendar.Styles.Add("Standard");
Style aStyle = GcDateTime1.DropDownCalendar.Styles["Standard"];
// 描画スタイルの内容を設定します。
aStyle.BackColor = Color.White;
aStyle.ForeColor = Color.Blue;
aStyle.Font.Name = "ＭＳ ゴシック";
aStyle.Font.Size = FontUnit.Small;
aStyle.BorderColor = Color.Black;
aStyle.BorderStyle = BorderStyle.Dotted;
aStyle.BorderWidth = 1;
aStyle.TextHAlign = AlignHorizontal.Center;
aStyle.TextVAlign = AlignVertical.Middle;
// 描画スタイルを各領域へ適用します。
GcDateTime1.DropDownCalendar.ControlStyle = aStyle;
GcDateTime1.DropDownCalendar.UseControlStyle = true;