Как я могу удалить границу MonthCalendar - PullRequest
Новая
       47

Как я могу удалить границу MonthCalendar

0 голосов
/ 12 февраля 2020

Я разрабатываю с VB2017 в Basi c. Мне интересно, как убрать границу месячного календаря. Файл прикрепляет изображение календаря и код.

enter image description here

    Dim colorFore, colorBack As New Color
    colorFore = Color.FromArgb(181, 202, 146)
    colorBack = Color.FromArgb(20, 20, 20)
    SetWindowTheme(MonthCalendar1.Handle, "", "") 'disable the visual style for the MonthCalandar control
    MonthCalendar1.BackColor = colorBack
    MonthCalendar1.ForeColor = Color.Black
    MonthCalendar1.TitleForeColor = colorFore
    MonthCalendar1.TitleBackColor = colorBack
    MonthCalendar1.TrailingForeColor = colorBack
    MonthCalendar1.Font = New Font(MonthCalendar1.Font.FontFamily, 24, FontStyle.Bold)
...