如何循环遍历 BackColor 变化？

Question

在这里编码绝对菜鸟。

我正在尝试设置一个从操作或按钮单击打开的表单，该表单使用计时器循环显示 2 种颜色

Private Sub Timer1_Tick(sender As Object, e As EventArgs) 处理 Timer1.Tick

    Me.BackColor = Color.FromArgb(255, 255, 255)

我已将背景颜色设置为红色，我希望它像闹钟一样在红色和白色之间闪烁。

任何帮助深表感谢！

尝试使用 Do while Loop 但它似乎不起作用 或者至少我对声明的理解不够。

Answer 1

你很接近。

在表单中丢一个Timer组件，通过属性编辑器进行配置：

• 已启用 = true。
• 您选择的时间间隔（颜色变化之间的时间间隔）。

然后在 Tick 事件中使用以下内容：

If Me.BackColor = Color.Red Then
    Me.BackColor = Color.White
Else
    Me.BackColor = Color.Red
End if