Question

编写一个vb的计时程序

界面要求：
* 使用标签、命令按钮、时钟控件完成。
* 运行要求：
* 1、点击“开始”按钮，标签显示“你好”并且字体大小为30，每隔一秒，标签中字符的字体大小增2；
* 2、当字体大小为50时，使用MsgBox显示“显示完毕”，并停止增加字体大小。

我们马上要考试了，结果这个题怎么都做不对，关键是字号一直在增大，希望大家能帮我解决谢谢了啊

Answer 1

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
i = Label1.FontSize
i = i + 1
Label1.FontSize = i
If i = 50 Then Timer1.Enabled = False

End Sub

(timer1.interval=1000)