Vb.net更改其相应的复选框的图片框的背景色。checked= true

Question

我有20个复选框，上方有20个图片框。 我想更改那些图片框的背景色，这些图片框的相应复选框在表单加载中设置为checked = true。

我用过代码：

CheckBox1.CheckedChanged 
PictureBox1.BackColor = Color.brown

对于20个复选框，如果有任何更短的解决方案，将是一个漫长的过程，因此，它仅更改表单加载中相应复选框为checked = true的那些图片框的颜色

Answer 1

您只希望在表单加载中对此进行检查，以使其更简单。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    For i = 1 To 20
        Dim cbx As CheckBox = Me.Controls.Find("CheckBox" & i, True).FirstOrDefault
        Dim pbx As PictureBox = Me.Controls.Find("PictureBox" & i, True).FirstOrDefault
        If cbx.Checked = True Then
            pbx.BackColor = Color.Brown
        End If
    Next

End Sub