Question

新建一数据库，并在该数据库中创建一个标题为“变换颜色”窗体，窗体上有一个标签，两个命令按钮。设置标

Answer 1

自己建一个窗体，三个控件分别是：
文本框text0，开始按钮Cmd_Start，停止按钮Cmd_End，
代码如下：
Private Sub Cmd_End_Click()
Me.OnTimer = ""
End Sub
'--------------------
Private Sub Cmd_Start_Click()
Me.OnTimer = "[事件过程]"
Me.TimerInterval = 500
End Sub
'--------------------
Private Sub Form_Load()
With Me.Text0
.Value = "色彩缤纷"
.FontSize = 36
.FontWeight = 700
.FontItalic = True
End With
End Sub
'--------------------
Private Sub Form_Timer()
Me.Text0.ForeColor = RGB(Rnd() * 256, Rnd() * 256, Rnd() * 256)
End Sub

祝你成功！