私は 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