VB教案－图片框、图像框和时钟.docVIP

[教案] 第九课 　图片框、图像框和时钟 授课方式：讲授法 授课学时：2学时 教学目的： 通过本次课的学习，学生应该掌握图片框、图像框和时钟控件的常用属性、方法和事件，能够区分图片框与图像框的区别，并能够灵活的应用。 教学重点和难点： 1．图片框和图像框的区别； 2．时钟控件的属性和事件。 教学过程： 一、 图片框（PictureBox） 1．用途 介绍图片框的主要用途。 2．属性 图片框的图片加载用到的picture属性，以及loadpicture()函数的使用 3．例题 通过例题讲解图片框的具体应用 二、 图像框（Image） 1．用途 介绍图像框的主要用途。 2．属性 图像框的图片加载用到的picture属性 3．性能对比 把图片框和图像框的性能进行一下对比，以便能更好的应用这两种控件 4．例题 通过例题讲解图像框的strech属性的具体应用。 三、时钟（Timer） 1．用途 介绍时钟控件的主要用途 2．属性 时钟控件的两个主要属性——Enabled属性和Inteval属性 （1）时钟控件的启动 （2）Interval属性的设置 3．事件 时钟控件的主要事件——Timer事件，通过一道日历的例题来讲解Timer事件的具体使用。 学生作业： 上机实验六：图片框、图像框和时钟 [讲稿] （九） 图片框、图像框和时钟 3、事例： 9.2 图像框（Image） 1、作用：用来显示图形 2、与图片框的性能对比 （1）PictureBox可以作为其他控件中的容器，而Image则无此功能； （2）Image有Stretch属性：让图片的显示大小去适应Image的大小；PictureBox有AutoSize属性：PictureBox的大小去适应图片的大小。这也是两个控件的本质区别 （3）Image控件使用的系统资源比PictureBox控件少而且重绘速度快，但它仅支持PictureBox控件的一部分属性，事件和方法。 3、事件 9.3 时钟（Timer） 一个时钟控件能有规律地以一定时间间隔激发计时器事件（Timer）而执行相应的程序代码。 Timer控件在设计时可见，在运行时是不可见的。所以它的位置无关紧要。 1、属性 （1）Enabled属性～指定计时器是否响应Timer事件。启动计时器，设置Enabled值为True,否则为False （2）Interval属性～表示两个计时器事件之间时间间隔其值为ms(0.001s)为单位，最大值为65535ms等于1分多钟 当Interval属性值为0时，表示屏蔽计时器，即时钟控件不工作。 Eg.如果希望每0.5s产生一个计时器事件，那么Interval的值为500。这样，每隔500ms引发一次计时器事件，从而执行相应的Timer事件过程。 两个注意事项：见教材85页 2、事件： 时钟控件只有一个Timer事件。当Enabled属性为True，且Interval属性大于0，则Timer事件以Interval属性指定的时间间隔发生。 例: 设计一个如下图所示的定时程序.用户在Text1和Text2文本框中设置定时时间，然后单击“定时”（Command1）按钮开始定时。两个文本框的MaxLength属性为２，时钟控件名称为Timer1,系统当前时间显示在Label1标签中，“结束”按钮的名称为Command2. 程序代码如下： 　Dim hour , minute Private Sub Form_Load ( ) hour= “**” ’当hour和minute设置为”**”时，定时时间和系统时间不可能相等 minute= “**” End Sub Private Sub Command1_Click ( ) hour=Format (Text1.Text, “00”) minute=Format(Text2.Text,“00”) End Sub Private Sub Timer1_Timer ( ) Label1.Caption=Time$ ( ) If Mid$(Time$,1,5)=hour+ “:”+minute Then hour= “**” minute= “**” MsgBox (“时间到!”) End If End Sub Private Sub Command2_Click ( ) End End Sub 2