Entrez le code suivant après la ligne "Public Class Main ()" pour changer la couleur du calendrier et de définir la plage de dates pour afficher sur le contrôle MonthCalendar:
Système Importations
Importations System.Windows.Forms
Public NotInheritable classe Form1
System.Windows.Forms.Form InheritsShared Public Sub Main ()
System.Windows.Forms.Application.Run (New Form1)
End Sub 'Main
Public Sub New ()
MyBase.New ()
«Créer le calendrier.
Me.MonthCalendar1 = Nouveau
System.Windows.Forms.MonthCalendar
"Définir l'emplacement de calendrier.
Me.MonthCalendar1.Location = New System.Drawing.Point
(47, 16)
«Changez la couleur.
Me.MonthCalendar1.BackColor =
System.Drawing.SystemColors.Info
Me.MonthCalendar1.ForeColor =
System.Drawing.Color.FromArgb (_
«Ajouter des dates pour tableau MonthlyBoldedDates.
Me.MonthCalendar1.MonthlyBoldedDates = Nouveau
System.DateTime () _ {New System.DateTime (2011, 9, 15, 0, 0, 0,
0), _ New System.DateTime (2002, 9, 30, 0, 0, 0, 0)}
'Définit la date maximale visible sur le calendrier pour 12/31/2011.
Me.MonthCalendar1.MaxDate = New System.DateTime (2011,
12, 31, 0, 0, 0, 0)
"Régler la date minimal visible sur le calendrier pour 01/01/1999.
Me.MonthCalendar1.MinDate = New System.DateTime (1999, 1,
1, 0, 0, 0, 0)
End Sub
'Afficher les dates de début et de fin dans la zone de texte.
Me.TextBox1.Text = "date sélectionnée: Démarrer =" _ +
e.Start.ToShortDateString () + ": Fin =" +
e.End.ToShortDateString ()
End Sub
End Class