Получить цвет из записи базы данных и применить его к фону метки

Question

У меня возникают проблемы с получением цвета, который выбирает пользователь, и сохранением его в базе данных, чтобы при перезагрузке программы он автоматически применялся к фону меток.

У меня есть это, чтобы позволить пользователю выбрать цвет

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
    If ColorDialog1.ShowDialog = DialogResult.OK Then
        Quiz.LTitle.BackColor = ColorDialog1.Color
    End If
End Sub

Тогда у меня есть кнопка, чтобы сохранить его с кодом, насколько

Private Sub BTitleSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTitleSave.Click
    BackGroundWork.Title_SettingsBindingSource.AddNew()
    BackGroundWork.Title_BColorTextBox.Text = Quiz.LTitle.BackColor.ToArgb

    BackGroundWork.Title_SettingsBindingSource.EndEdit()
    BackGroundWork.Title_SettingsTableAdapter.Update(BackGroundWork.QuizSettingsDataSet)
End Sub

BackGroundWork - это форма, в которой все мои базы данных работают, Quiz - это форма, которую увидят все.

любая помощь будет оценена

Answer 1

Вы можете попробовать ColorInHex ...

Private Sub BTitleSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTitleSave.Click
    BackGroundWork.Title_SettingsBindingSource.AddNew()
    BackGroundWork.Title_BColorTextBox.Text = Quiz.LTitle.BackColor.ToArgb.ToString("X")

    BackGroundWork.Title_SettingsBindingSource.EndEdit()
    BackGroundWork.Title_SettingsTableAdapter.Update(BackGroundWork.QuizSettingsDataSet)
End Sub

Когда ты назвал это..

Dim sColor as String = ... -> this retrieve from database

Quiz.LTitle.BackColor = System.Drawing.ColorTranslator.FromHtml(sColor)

Надеюсь, что это работает для вас!