Πώς να προσαρμόσετε μια MonthCalendar σε VB.NET

Ο έλεγχος Microsoft VB.NET MonthCalendar επιτρέπει στους χρήστες για να επιλέξετε μια ημερομηνία με τη χρήση μηνιαία προβολή ημερολογίου . Αν χρειαστεί να προσαρμόσετε την εμφάνιση του ελέγχου MonthCalendar , μπορείτε να αλλάξετε τη γραμματοσειρά του τίτλου , παρασκήνιο και στο προσκήνιο χρώματα του ημερολογίου. Μπορείτε επίσης να περιορίσετε την ημερομηνία και τις ώρες που θα εμφανιστεί με τις MinDate και MaxDate ιδιότητες του στοιχείου ελέγχου . Με τη θέσπιση του " MonthCalendar.BoldedDates " ακίνητο με τη σειρά του έχει επιλεγεί τιμές μπορείτε να ορίσετε ποιες ημερομηνίες θα εμφανίζεται με έντονους χαρακτήρες . Οδηγίες
Η

1 Κάντε κλικ στο κουμπί " Έναρξη " των Windows και στη συνέχεια κάντε κλικ στο " Microsoft Visual Studio . " 2

Κάντε κλικ στο " Αρχείο ", επιλέξτε "Άνοιγμα" και στη συνέχεια κάντε διπλό κλικ σχετικά με το πρόγραμμα VB.NET στην οποία θέλετε να τροποποιήσετε τον έλεγχο MonthCalendar .
εικόνων 3

Εισάγετε τον παρακάτω κωδικό μετά την "Δημόσια Τάξη Main ( ) " γραμμή για να αλλάξετε το χρώμα του ημερολογίου και να ρυθμίσετε το εύρος ημερομηνιών για να εμφανιστεί για τον έλεγχο MonthCalendar :

Εισαγωγές σύστημα

Εισαγωγές System.Windows.Forms

Δημόσια NotInheritable Class Form1

κληρονομεί System.Windows.Forms.Form

Δημόσια Shared Sub Main ( )

System.Windows.Forms.Application.Run ( New Form1 )

End Sub » Main

Public Sub Νέα ( )

MyBase.New ( )

» Δημιουργήστε το ημερολόγιο .

Me.MonthCalendar1 = Νέα

συστήματος . Windows.Forms.MonthCalendar

« Ρυθμίστε τη θέση του ημερολογίου.

Me.MonthCalendar1.Location = Νέα System.Drawing.Point

( 47 , 16 )

' Αλλαγή του χρώματος .

Me.MonthCalendar1.BackColor =

System.Drawing.SystemColors.Info

Me.MonthCalendar1.ForeColor =

System.Drawing.Color.FromArgb ( _

« Προσθήκη ημερομηνίες για να MonthlyBoldedDates πίνακα.

Me.MonthCalendar1.MonthlyBoldedDates = Νέα

System.DateTime ( ) _ { Νέο Σύστημα . DateTime ( 2011 , 9 , 15 , 0 , 0 , 0 , πώληση

0 ) , _ Νέα System.DateTime ( 2002 , 9 , 30 , 0 , 0 , 0 , 0 ) }

" Ορίζει το μέγιστο ορατό ημερομηνία στο ημερολόγιο για 12/31/2011 .

Me.MonthCalendar1.MaxDate = Νέα System.DateTime ( 2011 , πώληση

12 , 31 , 0 , 0 , 0 , 0 )

« Ρυθμίστε την ελάχιστη ορατή ημερομηνία στο ημερολόγιο για 01/01/1999 .

Me.MonthCalendar1.MinDate = Νέα System.DateTime ( 1999 , 1 ,

1 , 0 , 0 , 0 , 0 )

End Sub

» Δείτε τις ημερομηνίες έναρξης και λήξης στο πλαίσιο κειμένου .

Me.TextBox1.Text = " Ημερομηνία Επιλεγμένα : Έναρξη = " + _

e.Start.ToShortDateString ( ) + " : Τέλος = " +

e.End.ToShortDateString ( )

End υπο

End Class
Η 4

Κάντε κλικ στο " Αρχείο" και στη συνέχεια κάντε κλικ στο κουμπί " Αποθήκευση" για να εφαρμόσετε την αλλαγή στον έλεγχο της εφαρμογής σας VB.NET .
Η

Η