Ako prispôsobiť MonthCalendar vo VB.NET

Ovládací prvok Microsoft VB.NET MonthCalendar umožňuje užívateľom vybrať dátum pomocou mesačné zobrazenie kalendára . Ak potrebujete prispôsobiť vzhľad ovládacieho prvku MonthCalendar , môžete zmeniť názov písma , farbu popredia a pozadia z kalendára . Môžete tiež obmedziť dátum a čas , ktorý vám zobrazí s MinDate a MaxDate vlastnosti ovládacieho prvku . Stanovením " MonthCalendar.BoldedDates " vlastníctva s radom vybraných hodnôt môžete priradiť ktorý sa datuje budú zobrazené tučne . Pokyny dovolená 1

Kliknite na tlačidlo " Štart " vo Windows a potom kliknite na tlačidlo " Microsoft Visual Studio . "
2

Kliknite na " Súbor " vyberte " Otvoriť " a potom dvakrát kliknite na na programe VB.NET , v ktorej chcete upraviť riadenie MonthCalendar .
3

Zadajte nasledujúci kód po " Public Class Main ) ( " riadku zmeniť farbu kalendára a nastaviť rozsah dát pre zobrazenie na ovládacom prvku MonthCalendar :

Dovoz System

Dovoz System.Windows.Forms

Public Class Form1 NotInheritable

Dedí System.Windows.Forms.Form

Public Shared Sub Main ( )

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

End Sub ' Main

Public Sub New ( )

MyBase.New ( )

" Vytvorenie kalendára .

Me.MonthCalendar1 = New

systému . Windows.Forms.MonthCalendar

" Nastavenie kalendára umiestnenie .

Me.MonthCalendar1.Location = New System.Drawing.Point

( 47 , 16 )

' Zmeniť farbu .

Me.MonthCalendar1.BackColor =

System.Drawing.SystemColors.Info

Me.MonthCalendar1.ForeColor =

System.Drawing.Color.FromArgb ( _

" Pridať dáta MonthlyBoldedDates poľa .

Me.MonthCalendar1.MonthlyBoldedDates = New

System.DateTime ( ) _ { Nový systém . DateTime ( 2011 , 9 , 15 , 0 , 0 , 0 , 0 celým

) , _ New System.DateTime ( 2002 , 9 , 30 , 0 , 0 , 0 , 0 ) } celým

" Nastaví maximálny viditeľnú dátum v kalendári do 12/31/2011 .

Me.MonthCalendar1.MaxDate = New System.DateTime ( 2011 ,

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

" Nastavte minimálnu viditeľnú dátum v kalendári do 01/01/1999 .

Me.MonthCalendar1.MinDate = New System.DateTime ( 1999 , 1 ,

1 , 0 , 0 , 0 , 0 )

End Sub

" Zobraziť počiatočný a koncový dátum do textového poľa sa .

Me.TextBox1.Text = " Dátum Vybraná : Začiatok = " + _

e.Start.ToShortDateString ( ) + " : Koniec = " +

e.End.ToShortDateString ( )

Koniec sub

End Class
4

Kliknite na " Súbor " a potom kliknite na tlačidlo " Uložiť " aplikovať zmeny na ovládací prvok vo vašom VB.NET aplikácie .

• Predchádzajúca strana: Ako do centra okno so správou , v jazyku Visual Basic 
• Ďalšia strana: Ako používať Oracle sekvencií