VB时钟

二零零九年五月-i-目录摘要...............................................................................i第1章概述......................................................................11.1引言..........................................................................11.2设计平台......................................................................1第2章开发工具简介..................................................................22.1VisualBasic6.0简介............................................................22.2运用的控件和主要对象..........................................................2第3章设计实现.....................................................................63.1画时钟表盘上的所有直线元素.....................................................63.2修改时针的形状.................................................................63.3计时器的Interval(间距)属性设置................................................63.4软件代码.......................................................................7第4章总结.......................................................................164.1结论.........................................................................164.2心得体会.....................................................................16参考文献.............................................................................17-i-摘要VisualBasic是以结构化Basic语言为基础，以事件驱动作为运行机制的新一代可视化程序设计语言，它继承了Basic语言易学易用的特点，特别适合于初学者学windows系统编程。随着21世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了使用户在繁忙的日程工作中得到放松,于是出现了各种各样的休闲软件,如聊天工具,游戏等等。于是我们小组着手设计开始一个这样的时钟软件。关键词：软件编程；VisualBasic6.0；时钟-1-第1章概述1.1引言visualbasic继承了basic语言易学易用的特点，特别适合于初学者学习windows系统编程。随着21世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了用户更加方便的，更加有舒适的心情，设计出一个比较舒心的时钟显示。1.2设计平台VB全称VisualBasic,它是以Basic语言作为其基本语言的一种可视化编程工具。它继承了basic语言易学易用的特点，特别适合于初学者学习windows系统编程。随着21世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了使用户更加地使用舒心。通过这学期来VisualBasic的学习，我初步掌握了VisualBasic语言的最基本的知识，于是在张老师的指导下动手用VisualBasic编写了这款时钟软件。-2-第2章开发工具简介2.1VisualBasic6.0简介VisualBasic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发Windows环境下的各类应用程序。它简单易学、效率高，且功能强大。在VisualBasic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的广泛应用程序接口（API）函数，动态链接库（DLL）、对象的链接与嵌入（OLE）、开放式数据连接（ODBC）等技术，可以高效、快速地开发Windows环境下功能强大、图形界面丰富的应用软件系统。2.2运用的控件和主要对象我们在设计过程中主要用到的控件有：Form，Commandbutton，MsgBox，Label，Frame，PictureBox等控件。1、窗体（Form）窗体就是平时所说的窗口，它是VB编程中最常见的对象，也是程序设计的基础。各种控件对象必须建立在窗体上，即窗体是所有控件的容器。一个窗体对应一个窗体模块。2、命令按钮(Commandbutton)命令按钮是VB应用程序中使用最多的控件之一，它常常用来接受用户的操作信息，激发相应的事件过程，是用户与程序交互的最简便的方法。3、消息框（MsgBox）在Windows中，如果操作失误，通常会在屏幕上显示一个对话框，提示用户进行选择，然后系统根据选择确定其后的操作。VB提供了MsgBox函数就可以实现此功能，它可以向用户传送信息，并可以接收用户在对话框上的选择，以次作为程序继续执行的依据。4、标签（Label）VB提供的标签控件只能显示文本，而不能对文本进行编辑。标签通常用于标注本身不具有Caption属性的控件。5、框架（Frame）框架主要用做控件的容器，也用于修饰界面。6、图片框（PictureBox）该控件可以用来显示图象，包括位图文件、图标文件、光标文件、元文件、增强的元文件、JPEG文件、GIF文件。7、Timer控件Windows应用程序中常常要用到时间控制的功能，如在程序界面上显示当前时间，或者每隔多长时间触发一个事件，等等。而VisualBasic中的Timer（时间）控制器就是专门解决这方面问题的控件。选中时钟控制器，将鼠标移到界面设计区，在窗体中拖出一-3-个矩形就可以创建一个Timer控件了。跟其他控件不同的是，无论你绘制的矩形有多大，Timer控件的大小都不会变外，Timer控件只有在程序设计过程中看得见，在程序运行时是看不见的Timer事件：当Timer控件设置为有效时，计时总是从其Interval属性的设置值开始，每当计时时间到达时产生Timer事件，可以在该事件过程中编写代码，以高诉VisualBasic在每次计时时间到时该做什么。(1)Timer控件的属性：Timer控件可以使用Name属性与Enabled属性，但最重要的是Interval即时间间隔属性。Interval属性决定了时钟事件之间的间隔，以毫秒为单位，取值范围为0～65535，因此其最大时间间隔不能超过65秒，即一分钟多一点的时间。如果把Interval属性设置为1000，则表示每秒钟触发一个Timer事件。其语法格式：Timer.Interval=X，其中，X代表具体的时间间隔。(2)Timer控件的Timer（定时）事件：当一个Timer控件经过预定的时间间隔，将激发计时器的Timer事件。使用Tim标签控件（Label）的主要事件：所谓的事件，其实就是用户对应用程序的操作，如第一章中用鼠标点击命令按钮触发的Click事件。事件的作用在于触发程序的执行，如第一章中的Click事件改变了标签控件的Caption属性。标签控件的主要作用在于显示文本信息，但也支持一些为数不多的事件。I、Click事件（鼠标单击）：用鼠标点击标签时触发的事件，如改变标签的字体属性：PrivateSubLblShow_Click()LblShow.FontName=隶书EndSubII、DbClick事件（鼠标双击）：鼠标双击引发的事件，如改变标签的可见性：PrivateSubLblShow_DbClick()LblShow.Visible=FalseEndSub(3)文件操作控件在一个应用程序中，对文件的处理是一个比较常用的操作，如打开文件、保存文件，等等。VisualBasic提供了三个控件对磁盘文件夹与文件进行显示与操作，它们分别是：DriveListBox（磁盘列表框）控件、DirListBox（文件夹列表框）控件，以及FileListBox（文件列表框）控件。事件可以完成许多实用功能，如显示系统时钟、制作动画，等等-4-(4)三个控件的连接：DriveListBox（磁盘列表框）控件DirListBox（文件夹列表框）控件FileListBox（文件列表框）控件I、在程序中，它们却是互不关连的，并不是只要在窗体中创建了它们，然后对某个控件（如磁盘列表框）进行操作，其他控件就会自动显示相应的磁盘下的文件，这需要用程序进行实现。将磁盘列表框的操作赋值给文件夹列表框的Path属性，在磁盘列表框的Change事件中输入如下代码：PrivateSubDrive1_Change()Dir1.Path=Drive1.DriveEndSub、II、对文件夹列表框控件进行的操作，直接影响文件列表框所显示的内容：PrivateSubDir1_Change()File1.Path=Dir1.Path8、Label控件任何一个VB程序都是由操作界面及与之相应的程序代码组成，而操作界面则是由诸如“命令按钮控件”、“标签控件”等控件以及窗体共同组成。从本章开始，我们进入控件的学习过程。Label（标签控件）是图形控件，主要作用在于显示文字信息，如大家比较熟悉的程序安装界面：在某个软件安装过程中，常常会显示一些帮助信息或与产品相关的介绍信息，而这些，大多是用标签控件制成的。与以后我们要学到的文本框控件（TextBox）不同的是，标签控件显示的文字不能直接进行修改，要修改的话只能在设计阶段进行；文本框既可以用来显示文本，还能够在文本框中输入文本。在VisualBasic工具箱中，标签控件的图标如图一所示。标签的默认名称（Name）和标题（Caption）为LabelX（X为1、2、3，等等），规范的命名方式为：LblX（X为自己定义的詞，如LblShow、LblRed，等等）(1)标签控件的主要属性：I、Caption（标题）属性：此属性用来设置在标签上显示的文本信息，可以在创建界面时设置，也可以在程序中改变文本信息，如第一章的例子中，通过点击按钮改变标签显示的字样。如果要在程序中修改标题属性，代码规则如下：标签名称.Caption=欲显示的文本LblShow.Caption=跟我来学VB神童教程但是请注意，上面的代码应该写入供触发的控件对应的程序代码区。II、BorderStyle（边框）属性：-5-本属性用来设置标签的边框类型，有两种值可选：0，代表标签无边框；1，代表标签有边框，并且具有三维效果，如图二显示的两个标签：BorderStyle属性可以在设计界面时指定标签名.BorderStyle=0/1（0或1，两者取一）击一下，标签有边框，再点一下，标签边框消除，再点一下，边框又出现，以此类推。回答Ⅲ、Font（字体）属性：本属性用来设置标签显示的字体，既可以在创建界面时设定，也可以在程序中改变。在创建界面时设定在图四的设置界面中，除了可以选择字体，还可以设置显示文字是否为粗体、斜体、下划等。在程