下一课学习目标：学会使用定时器控件；

注意事项：定时器的 interval 属性别忘了；

1、绘制控件

1）打开一个标准EXE，绘制两个标签，一个文本框，一个定时器

Label1的Caption属性改为“时间：”，另一个标签改为“You and I must have”

定时器的 interval 属性设为1000，它的单位是毫秒；

2）设置好控件的字体和颜色；

3）进入代码窗口，点击对象下拉列表，依次选择“通用、Text1、Timer1”，在出来的代码段中分别输入；

'通用

dim i, k as integer

'文本框

i = len(text1.text)

'定时器

k = k + 1

label1.caption = str(k) + str(i)

4）保存为“第七课”，点菜单“运行－启动”，在文本框中输入内容；

板书设计：第7课 定时器（时钟）

1.窗体、标签（2个）、文本框

2.选中画一个定时器，0 改成1000

3.进入代码窗口：通用，Text1，Timer1

课后记 2011-10-7 17:43：

带笔记本，把代码抄一下

把编辑器的字体调大一些

--

用Arial Black字体，l和I分不清

复制到记事本里改成小写的，vb里面自动变成大写

--

代码容易输错，放错位置到别的对象里了

单词错的少了，抄一遍还是好些

--

用屏幕广播来抄代码，用写字板来书写加颜色

分成三段，这样抄起来也好

-- 后两个班分成两段，先做界面再做编程 讲两回也就是，这样可以降低一些难度

本节学习了定时器（时钟）的基础知识，如果你成功地完成了练习，请继续学习下一课内容；