MonthCalendar格式的粗体数据库日期

Question

当有事件保存到该特定日期时，我会尝试将我的日历数字设置为粗体。我已经找过并试过了，但我做不到。

当我将事件保存到所选日期时，如何将日期设置为粗体？

这是我试图做的，但它不能转换为一维数组的日期。

mydbcon = New MySqlConnection
    mydbcon.ConnectionString = "server=localhost;userid=root;password=root;database=database"
    Dim reader As MySqlDataReader
    Dim bold = Form4.MonthCalendar1.SelectionRange.Start.Month
    Try
        mydbcon.Open()
        Dim Query As String
        Query = "Insert into database.calendar (eventname,Date,Time,Description) Values ('" & TextBox2.Text & "','" & Form4.MonthCalendar1.SelectionRange.Start & "','" & ComboBox1.SelectedItem & "','" & TextBox1.Text & "')"
        COMMAND = New MySqlCommand(Query, mydbcon)
        reader = COMMAND.ExecuteReader
        MessageBox.Show("Event Succesfully Saved")

        Form4.MonthCalendar1.BoldedDates = bold
        mydbcon.Close()
    Catch ex As MySqlException
        MessageBox.Show(ex.Message)
    Finally
        mydbcon.Dispose()
    End Try

Answer 1

向日历添加粗体日期-示例：

    MonthCalendar1.AddBoldedDate(CDate("03-12-2015"))
    MonthCalendar1.UpdateBoldedDates()

从数据库读取日期-示例：

    mydbcon = New MySqlConnection
    mydbcon.ConnectionString = "server=localhost;userid=root;password=root;database=database"
    Dim reader As MySqlDataReader

    Try
        mydbcon.Open()
        Dim Query As New MySql.Data.MySqlClient.MySqlCommand
        Dim eventDate As String
        Query.Connection = mydbcon
        Query.CommandText = "SELECT Date FROM database ORDER BY Date"
        reader = Query.ExecuteReader

        If reader.HasRows = True Then
            While reader.Read
                eventDate = reader.GetValue(reader.GetOrdinal("Date")).ToShortDateString
                MonthCalendar1.AddBoldedDate(CDate(eventDate))
            End While
            reader.Close()
            MonthCalendar1.UpdateBoldedDates()
        End If

        mydbcon.Close()
    Catch ex As MySqlException
        MessageBox.Show(ex.Message)
    Finally
        mydbcon.Dispose()
    End Try