以下のように値を割り当てているフォーム (lblIRafr) にラベルがあります。
lblIRafr.Text = irAverageFailureRate & "%"
以下のコードを使用して、このラベルに割り当てる値を生成しています。
Dim irAverageFailureRate As String = (CDbl(irTotalFailureRate / 2).ToString("0.00"))
次に、irAverageFailureRate が 3 を超えるとテキストが太字で赤になり、それ以外の場合はテキストが太字で緑になるようにラベルをフォーマットします。私は以下のようにこれをやっています:
If irAverageFailureRate > "3.00" Then
Dim l As Label = lblIRafr
l.Font.Bold = True
l.ForeColor = Drawing.Color.Red
Else
Dim l As Label = lblIRafr
l.Font.Bold = True
l.ForeColor = Drawing.Color.Green
End If
これは 0 から 9.99 までの数値では問題なく動作しますが、irAverageFailureRate が 10.0 に達するとすぐに、ラベルが赤ではなく太字と緑にフォーマットされます。その理由は完全にはわかりません。
感謝して受け取った助け。ありがとう