Le contrôle Microsoft VB.NET MonthCalendar permet aux utilisateurs de sélectionner une date en utilisant une vue mensuelle du calendrier. Si vous avez besoin pour personnaliser l`apparence du contrôle MonthCalendar, vous pouvez modifier le titre de police, couleurs de fond et de premier plan du calendrier. Vous pouvez également limiter la date et l`heure que vous affichez les propriétés MinDate et MaxDate du contrôle. En réglant le "MonthCalendar.BoldedDates" propriété avec le tableau de valeurs choisies, vous pouvez assigner qui date sera affiché en gras.
Cliquez sur "Démarrer" de Windows et puis cliquez sur "Microsoft Visual Studio."
Cliquez sur "Fichier", sélectionnez "Ouvrir", puis double-cliquez sur le programme VB.NET dans lequel vous voulez modifier le contrôle MonthCalendar.
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 à afficher sur le contrôle MonthCalendar:
Imports System
Importations System.Windows.Forms
Public NotInheritable classe Form1
System.Windows.Forms.Form Inherits
Shared 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)
«Changer 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 visible maximale sur le calendrier pour 31/12/2011.
Me.MonthCalendar1.MaxDate = New System.DateTime (2011,
12, 31, 0, 0, 0, 0)
"Régler la date visible minimum 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
Cliquez sur "Fichier" puis cliquez sur "Enregistrer" pour appliquer la modification à la commande dans votre application VB.NET.