Изменение цвета фона для Form2

У меня два RadioButtons один для Light Blue а другой для Ghost White и button показать следующую форму (Form2) я хочу иметь возможность проверить на Radio Button и backcolor of form2 изменения в проверенном Radio Buttonэто то, что у меня есть на моем коде до сих пор

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
    SecondForm.Show()
    End Sub

Private Sub rbLightBlue_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbLightBlue.CheckedChanged
    If rbLightBlue.Checked Then
        SecondForm.BackColor = (Color.LightBlue)
    End If
End Sub

Private Sub rbGhostWhite_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbGhostWhite.CheckedChanged
    If rbGhostWhite.Checked Then
        SecondForm.BackColor = (Color.GhostWhite)
    End If
End Sub

У меня проблема с изменением цвета фона в Form2. Любой ответ на этот вопрос будет очень полезным.

1 ответ

Решение

Я не уверен, что вы делаете, это, вероятно, связано с тем, как вы создаете свой SecondForm, этот код работает, посмотрите, поможет ли он сузить его.

Public Class Form1
    Dim SecondForm As Form2 = New Form2
    Private Sub rbLightBlue_CheckedChanged(sender As Object, e As EventArgs) Handles rbLightBlue.CheckedChanged
        If DirectCast(sender, RadioButton).Checked Then
            SecondForm.BackColor = Color.LightBlue
        End If
    End Sub

    Private Sub rbGhostWhite_CheckedChanged(sender As Object, e As EventArgs) Handles rbGhostWhite.CheckedChanged
        If DirectCast(sender, RadioButton).Checked Then
            SecondForm.BackColor = Color.GhostWhite
        End If
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        SecondForm.Show()
    End Sub
End Class
Другие вопросы по тегам