Visual Basic程序设计项目化教程 管小清 项目10 制作简单时钟新.pptVIP

Visual Basic 程序设计项目化教程 主编 管小清 郭贺彬 项目十 制作简单时钟 项目目标： 本项目是制作一个带有时针、分针和秒针功能的简单时钟；利用计时器Timer控件控制时针、分针和秒针的转动；实现时钟的基本功能。掌握Timer控件的使用；掌握Now（）函数的使用；掌握VB的图形画法等。 项目主要知识点： 1、Shape控件的使用方法 基本属性 特有属性 2、Line控件的使用方法 3、Timer控件的使用 重要属性 重要事件 项目十 制作简单时钟 4、日期、时间函数的使用 5、VB的图形画法 Circle方法 PSet方法 6、程序的模块化设计 项目实施步骤： 掌握相关基础知识 界面设计 窗体设计 控件属性设置 程序设计 编程初步 程序代码 程序调试，功能完善 保存项目工程 10.1 第1步：基础知识 10.1.1 Shape控件的使用方法 使用形状控件(Shape)可在窗体或其他控件容器中画出矩形、正方形、圆、椭圆、圆角矩形或圆角正方形。形状控件的Shape属性决定了它的图形样式，这个属性的所有可能取值都有对应的形状样式。 1、形状控件的常用属性 Left、Top、Width、Height、BorderWidth、BorderColor、BackColor、FillColor、BorderStyle。 ①Left、Top、Width和Height属性决定形状控件的位置和大小，也可以用Move方法改变它的大小和位置。 ②BorderWidth属性设置图形边界宽度。它的值是以像素为单位的边线宽度。 ③BorderColor属性设置图形边界颜色。 ④BorderStyle属性设置边界线的类型。 ⑤FillColor属性设置图形的前景颜色。 如果要为图形填充颜色(背景)时,首先应该将属性FillStyle(填充方式)设置成1(透明),否则FillColor(前景色)的颜色会遮盖了背景色,达不到预期的目的。 10.1 第1步：基础知识 2、形状控件的特有属性 ①Shape属性 该属性用来设置图形的形状。 0——Rectangle 矩形 1——Square 正方形 2——Oval 椭圆形 3——Circle 圆形 4——Rounded Rectangle 圆角矩形 5——Rounded Square 圆角正方形 Shape属性的缺省值为0(矩形)。若选择3,则用Shape控件画出的矩形中画出一个圆(圆的直径是矩形的短边)。 ②BackStyle属性 该属性用来设置图形背景的风格 0——Transparent(透明) 1——Opaque(不透明) 缺省值为0。如果着色,显然要将BackStyle属性设置为“不透明”。 ③FillStyle属性 该属性用来设置图形填充的线形(风格或样式)。 10.1.2 Line控件的使用方法 格式:［对象.］Line［Step］(x1,y1)-［Step］(x2,y2)［,颜色］［，B［F］］ 功能:在窗体或图片框上画出一条直线或一个矩形。对象缺省时,为窗体。 说明: (1)Step:可选项,第一个Step表示它后面的一对坐标是相对于当前坐标的偏移量,第二个Step表示它后面的一对坐标是相对于第一对坐标的偏移量。 (2)如果没有参数B，则是画一条直线。(x1,y1)与(x2,y2)是所画直线的左上角和右下角的坐标。 (3)如果有参数B，画一个矩形，指定参数F，表示要画的是一个实心的矩形。(x1,y1)与(x2,y2)是所画矩形的左上角和右下角的坐标。 10.1.3 Timer控件的使用 10.1.2 Line控件的使用方法 1、重要属性 Interval属性：该属性用来设置计时器事件之间的间隔，以毫秒为单位，其取值范围为0～65536毫秒，因此最大的时间间隔不能超过65秒。60000毫秒为1分钟。如果把Interval属性值设为1000，则表明每秒钟发生一个计时器事件；如果希望每秒产生n个事件，则Interval属性的值设置为1000／n。 计时器使用Interval属性以外，还可以使用Name属性和Enabled属性。 2、重要事件 Timer事件：是VB模拟实时计时器的事件。 使用计时器控件的操作步骤： ①设置Timer控件的Interval属性值，这个属性决定了产生定时事件的时间间隔。该属性的单位是千分之一秒。例如，把Interval属性设置为500，则计时器将每隔0.5秒将产生一次Timer事件。 ②编写响应计时器的Timer事件的事件过程，即在事件过程中编写需要定时执行的代码，完成各种定时任务。 ③