| ■89916 / ) |
Re[1]: ある数値を超えるとNumericUpDownが一瞬だけ点滅す |
□投稿者/ 魔界の仮面弁士 (2014回)-(2019/01/16(Wed) 18:38:35)
|
■No89908 (たんこぶ さん) に返信
> NumericUpDownの数値を変化させた時
> ある設定してある数値を超えると一瞬だけコントロールが点滅するような仕組みを作りたいのですが
> うまくいきません。
これでどうでしょう。
Private Sub NumericUpDown1_ValueChanged(sender As System.Object, e As System.EventArgs) Handles NumericUpDown1.ValueChanged
With DirectCast(sender, NumericUpDown)
If .Value > 500 Then
.ForeColor = Color.White
.BackColor = Color.Red
.Update()
BeginInvoke(New MethodInvoker(AddressOf .ResetForeColor))
BeginInvoke(New MethodInvoker(AddressOf .ResetBackColor))
End If
End With
End Sub
|
|
