资源预览内容
第1页 / 共18页
第2页 / 共18页
第3页 / 共18页
第4页 / 共18页
第5页 / 共18页
第6页 / 共18页
第7页 / 共18页
第8页 / 共18页
第9页 / 共18页
第10页 / 共18页
亲,该文档总共18页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
- i -目 录摘 要 .i 第 1 章 概 述 .1 1.1 引言 .1 1.2 设计平台 .1 第 2 章 开发工具简介 .2 2.1 VisualBasic6.0 简介 .2 2.2 运用的控件和主要对象 .2 第 3 章 设计实现 .6 3.1 画时钟表盘上的所有直线元素 .6 3.2 修改时针的形状 .6 3.3 计时器的 Interval(间距)属性设置 .6 3.4 软件代码 .7 第 4 章 总 结 .16 4.1 结论 .16 4.2 心得体会 .16 参考文献 .17- 1 -第第 1 1 章章 概概 述述1.11.1 引言引言visual basic 继承了 basic 语言易学易用的特点,特别适合于初学者学习 windows系统编程。随着 21 世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了用户更加方便的,更加有舒适的心情,设计出一个比较舒心的时钟显示。1.21.2 设计平台设计平台VB 全称 Visual Basic,它是以 Basic 语言作为其基本语言的一种可视化编程工具。它继承了 basic 语言易学易用的特点,特别适合于初学者学习 windows 系统编程。随着 21 世纪信息社会的到来,计算机在人们的工作和生活中的深入,要求我们越来越多地与计算机打交道,为了使用户更加地使用舒心。通过这学期来 Visual Basic 的学习,我初步掌握了 Visual Basic 语言的最基本的知识,于是在张老师的指导下动手用 Visual Basic 编写了这款时钟软件。- 2 -第第 2 2 章章 开发工具简介开发工具简介2.12.1 VisualBasic6.0VisualBasic6.0 简介简介Visual Basic 是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言,可用于开发 Windows 环境下的各类应用程序。它简单易学、效率高,且功能强大。在 Visual Basic 环境下,利用事件驱动的编程机制、新颖易用的可视化设计工具,使用 Windows 内部的广泛应用程序接口( API)函数,动态链接库( DLL) 、对象的链接与嵌入( OLE) 、开放式数据连接( ODBC)等技术,可以高效、快速地开发 Windows 环境下功能强大、图形界面丰富的应用软件系统。2.22.2 运用的控件和主要对象运用的控件和主要对象我们在设计过程中主要用到的控件有:Form,Commandbutton,MsgBox,Label,Frame,PictureBox 等控件。1 1、窗体、窗体(FormForm)窗体就是平时所说的窗口,它是 VB 编程中最常见的对象,也是程序设计的基础。各种控件对象必须建立在窗体上,即窗体是所有控件的容器。一个窗体对应一个窗体模块。2 2、 命令按钮命令按钮(Commandbutton)(Commandbutton)命令按钮是 VB 应用程序中使用最多的控件之一,它常常用来接受用户的操作信息,激发相应的事件过程,是用户与程序交互的最简便的方法。3 3、 消息框(消息框(MsgBoxMsgBox)在 Windows 中,如果操作失误,通常会在屏幕上显示一个对话框,提示用户进行选择,然后系统根据选择确定其后的操作。VB 提供了 MsgBox 函数就可以实现此功能,它可以向用户传送信息,并可以接收用户在对话框上的选择,以次作为程序继续执行的依据。4 4、标签(、标签(LabelLabel)VB 提供的标签控件只能显示文本,而不能对文本进行编辑。标签通常用于标注本身不具有 Caption 属性的控件。5 5、框架(、框架(FrameFrame)框架主要用做控件的容器,也用于修饰界面。6 6、图片框(、图片框(PictureBoxPictureBox)该控件可以用来显示图象,包括位图文件、图标文件、光标文件、元文件、增强的元文件、JPEG 文件、GIF 文件。7 7、TimerTimer 控件控件Windows 应用程序中常常要用到时间控制的功能,如在程序界面上显示当前时间,- 3 -或者每隔多长时间触发一个事件,等等。而 Visual Basic 中的 Timer(时间)控制器就是专门解决这方面问题的控件。选中时钟控制器,将鼠标移到界面设计区,在窗体中拖出一个矩形就可以创建一个 Timer 控件了。跟其他控件不同的是,无论你绘制的矩形有多大,Timer 控件的大小都不会变外,Timer 控件只有在程序设计过程中看得见,在程序运行时是看不见的 Timer 事件:当 Timer 控件设置为有效时,计时总是从其Interval 属性的设置值开始,每当计时时间到达时产生 Timer 事件,可以在该事件过程中编写代码,以高诉 Visual Basic 在每次计时时间到时该做什么。(1)Timer(1)Timer 控件的属性:控件的属性:Timer 控件可以使用 Name 属性与 Enabled 属性,但最重要的是 Interval 即时间间隔属性。Interval 属性决定了时钟事件之间的间隔,以毫秒为单位,取值范围为 0 65535 ,因此其最大时间间隔不能超过 65 秒,即一分钟多一点的时间。如果把 Interval 属性设置为 1000 ,则表示每秒钟触发一个 Timer 事件。其语法格式:Timer.Interval = X ,其中,X 代表具体的时间间隔。(2)Timer(2)Timer 控件的控件的 TimerTimer (定时)事件:(定时)事件:当一个 Timer 控件经过预定的时间间隔,将激发计时器的 Timer 事件。使用 Tim标签控件(Label)的主要事件:所谓的事件,其实就是用户对应用程序的操作,如第一章中用鼠标点击命令按钮触发的 Click 事件。事件的作用在于触发程序的执行,如第一章中的 Click 事件改变了标签控件的 Caption 属性。标签控件的主要作用在于显示文本信息,但也支持一些为数不多的事件。I、Click 事件(鼠标单击):用鼠标点击标签时触发的事件,如改变标签的字体属性:Private Sub LblShow_Click() LblShow.FontName = “隶书“End Sub II、DbClick 事件(鼠标双击):鼠标双击引发的事件,如改变标签的可见性:Private Sub LblShow_DbClick()LblShow.Visible = FalseEnd Sub (3)(3)文件操作控件文件操作控件在一个应用程序中,对文件的处理是一个比较常用的操作,如打开文件、保存文件,等等。Visual Basic 提供了三个控件对磁盘文件夹与文件进行显示与操作,它们分别是:- 4 -DriveListBox(磁盘列表框)控件、DirListBox(文件夹列表框)控件,以及 FileListBox(文件列表框)控件 。事件可以完成许多实用功能,如显示系统时钟、制作动画,等等(4)(4)三个控件的连接:三个控件的连接:DriveListBoxDriveListBox(磁盘列表框)控件(磁盘列表框)控件DirListBoxDirListBox(文件夹列表框)控件(文件夹列表框)控件FileListBoxFileListBox(文件列表框)控件(文件列表框)控件I、在程序中,它们却是互不关连的,并不是只要在窗体中创建了它们,然后对某个控件(如磁盘列表框)进行操作,其他控件就会自动显示相应的磁盘下的文件,这需要用程序进行实现。将磁盘列表框的操作赋值给文件夹列表框的 Path 属性,在磁盘列表框的 Change 事件中输入如下代码:Private Sub Drive1_Change()Dir1.Path = Drive1.Drive End Sub、II、对文件夹列表框控件进行的操作,直接影响文件列表框所显示的内容:Private Sub Dir1_Change()File1.Path = Dir1.Path 8 8、LabelLabel 控件控件任何一个 VB 程序都是由操作界面及与之相应的程序代码组成,而操作界面则是由诸如“命令按钮控件” 、 “标签控件”等控件以及窗体共同组成。从本章开始,我们进入控件的学习过程。 Label(标签控件)是图形控件,主要作用在于显示文字信息,如大家比较熟悉的程序安装界面:在某个软件安装过程中,常常会显示一些帮助信息或与产品相关的介绍信息,而这些,大多是用标签控件制成的。与以后我们要学到的文本框控件(TextBox)不同的是,标签控件显示的文字不能直接进行修改,要修改的话只能在设计阶段进行;文本框既可以用来显示文本,还能够在文本框中输入文本。在 Visual Basic 工具箱中,标签控件的图标如图一所示。标签的默认名称(Name)和标题(Caption)为 LabelX(X 为 1、2、3,等等) ,规范的命名方式为:LblX(X 为自己定义的詞,如 LblShow 、LblRed ,等等)(1)标签控件的主要属性:I、Caption(标题)属性:此属性用来设置在标签上显示的文本信息,可以在创建界面时设置,也可以在程序中改变文本信息,如第一章的例子中,通过点击按钮改变标签显示的字样。如果要在程序中修改标题属性,代码规则如下:标签
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号