15电气 齐振昊 实验名称：在VB中制作计时器（运行时时间是停止的）






实验名称：在VB中制作计时器（运行时时间是停止的）

实验步骤：

在桌面中双击VB6.0打开程序。

在工具箱窗口找到计时器timer的图标，单击图标并在窗体中创建计时器。

在窗体中双击计时器图标，在弹出的对话框中输入“屏幕1.caption=time( )”然后关闭窗口。

选定计时器timer，在属性窗口中找到interval并将后面的数值改为1000。

在工具箱窗口找到Label，单击图标并在窗体中创建，在属性窗口中找到“名称”一栏并将后面改为“屏幕1”。在工具栏中单击“启动”即可出现效果。

在工具箱窗口找到command button的图标，单击图标并在窗口中创建，在属性窗口中找到caption并把其后面改为“停止”。

在窗体中找到“停止”并双击，输入“me.timer1.Enable=False”,然后关闭窗口。在工具栏中单击“启动”即可出现效果。

在工具箱窗口找到command button的图标，单击图标并在窗口中创建，在属性窗口中找到caption并把其后面改为“重新开始”。

在窗体中找到“重新开始”并双击，输入“me.timer1.Enable=Ture”,然后关闭窗口。

在form1的空白处双击，在弹出的对话框中Form_Load()下输入Me.Timer1.Enabled
= False

在工具栏中单击“启动”即可出现效果。

2016物理与电子信息学院15电气1班齐振昊15050341022