1

私は vb.net コーディングに比較的慣れていません。

いくつかの基準に基づいて、ラベル (計算結果の出力) の色を変更するコードを作成しようとしています。ダストとメタルの 2 つのオプションを含むドロップダウン メニューがあります。

色が変わらず、原因がわかりません。

これがコードです。

Dim concentrationcheck As String = Form8.materialType.SelectedIndex
        Select Case concentrationcheck
            Case "Dust"
                If Val(concentrationValue.Text) < 4 Then
                    concentrationValue.BackColor = Color.Red
                    MsgBox("Add more suppressant or contact factory")
                Else
                    concentrationValue.BackColor = Color.Green
                End If
            Case "Metal"
                If Val(concentrationValue.Text) < 20 Then
                    concentrationValue.BackColor = Color.Red
                    MsgBox("Add more suppressant, or contact factory")
                Else
                    concentrationValue.BackColor = Color.Green
                End If
        End Select
4

3 に答える 3