[精品论文]VB编程毕业设计

毕业设计课程定做 QQ1714879127第一章 绪论现代社会是一个信息化的社会。在政治、经济、军事、文化、教育、科学、艺术等各种活动中都会产生大量的信息，这些信息通过各种物理符号及其组合表示出来，从而产生大量的数据。人们将收集到的各种数据经过加工处理（如数据的收集、记载、分类、排序、存储、计算、加工、传输、制表等），使信息资源得到合理的、充分的使用。随着科学技术的发展和进步，计算机作为信息处理的工具，其优越性也越来越明显。计算机数据管理技术发展大致经过三个阶段。第一阶段是人工管理阶段。数据处理的性质是计算机代替人的手工劳动。如计算分数等处理运算，其特点是数据不长期保存，没有软件系统对数据进行管理，没有文件的概念，一组数据对应一个程序。第二阶段是采用文件管理方式。其特点是数据不再是程序的组成部分，而是有组织、有结构地构成文件形式形成数据文件，文件管理系统就是应用程序与数据文件的接口。第三阶段为数据库管理方式。其主要特征是对所有数据实行统一、集中、独立管理。 再说，现在有不少的人拿到钱不知道怎么样合理的使用，没有经过合理的、系统的想过该怎样用才算合理，更没有人设计自己的小帐本，实际上设计自己的小帐本是很重要的。它一方面可以作为自己的一个小秘密、小隐私，另一方面可以给自己做一个记录，可以看看到底那些钱用的合理，那些钱是可以不用花的；那些钱是在计划内的，那些钱是在计划外的；如果有这样一个小帐本，我想以后用钱就不会盲目，而且用的每一笔钱自己绝对都是应该用的钱，再不会像以前那样没有计划。第二章 课题使用的工具2.1 Visual Basic的概述Visual Basic中的”Visual”是指开发图形用户界面(GUI,Graphical User Interface)方法.Visual的意思是”可视的”,也就是直观的编程方法.在VB中引入了控件的概念,各种各样的按钮,文本框,选择框等.VB把这些控件模式化,并且每个控件都由若干属性来控制其外观,工作方法.这样,采用Visual方法无需编写大量代码去描述界面元素的外观和位置,而只要把预先建立的控件加到屏幕上即可.就像使用画图之类的绘图程序,通过选择画图工具来画图一样。“Basic”是指BASIC(Beginners All-purpose Symbolic Instruction Code)语言,一种在计算机发展史上应用得最为广泛的语言.Visual Basic在原有BASIC语言的基础上进一步发展,至今包含了数百条语句,函数及关键词,其中很多和Windows GUI有直接关系.2.2 Visual Basic的特点Visual Basic是从BASIC发展而来的,对于开发Windows应用程序而言,VB是目前所有开发语言中最简单,最容易使用的语言.总的来说,Visual Basic有以下主要特点. 可视化的设计平台用传统程序设计语言编程时,需要通过编写程序代码设计用户界面,在设计过程中看不到界面的实际显示效果,必须在运行程序时才能观察到.如果对界面的效果不满意,还要回到程序中修改,这一过程常常需要反复多次,大大影响了软件开发效率.Visual Basic提供的可视化设计平台,把Windows界面设计的复杂性”封装”起来,开发人员不必为界面的设计而编写大量程序代码,只需要按照设计的要求,用系统提供的工具在屏幕上画出各种对象即可.Visual Basic自动产生界面设计代码,程序员只需要编写实现程序功能的那部分代码,从而大大提高了程序设计的效率. 面向对象的设计方法面向对象的设计方法(OOP,Object Oriented Programming)从应用领域内的问题着手,以直观自然的方式描述客观世界的实体.Visual Basic作为一种面向对象的编程方法,把程序和数据封装起来作为余割对象,并为每一个对象赋予相应的属性.在设计对象时,不必编写建立和描述每一个对象的程序代码,而是用工具画在界面上,由Visual Basic自动生成对象的程序代码并封装起来. 结构化的设计语言Visual Basic是在BASIC语言基础上发展起来的,具有高级程序设计语言的语句结构,接近于自然语言和人类的逻辑思维方式,其语句简单易懂.其编辑器支持彩色代码,可自动进行语法错误检查,具有功能强且使用灵活的调试器和编译器.在设计Visual Basic程序的过程中,随时可以运行程序,而在整个应用程序设计好之后,可以编译生成 .exe 可执行文件, .exe文件可脱离Visual Basic环境直接在Windows环境下运行. 事件驱动的编程机制Visual Basic通过事件来执行对象的操作,例如命令是一个对象,当用户单击该按时,将产生一个单击事件,而在产生该事件时执行一段程序,用来实现指定的操作.在用Visual Basic设计应用程序时,不必建立具有明显开始和结束的程序,而是编写若干个微小的子程序,即过程.这些过程分别面向不同的对象,由用户操作引发某个事件来驱动完成某种特定功能,或由事件驱动程序调用通过过程执行指定的操作. 充分利用Windows资源Visual Basic提供的动态数据交换(DDE,Dynamic Data Exchange)编程技术,可以在应用程序中实现与其他Windows应用程序建立动态数据交换,在不同的应用程序之间进行通信.对象连接与嵌入(OLE,Object Linking and Embedding)技术将程序都看作一个对象,把不同的对象链接起来,嵌入到某个应用程序中,从而可以得到具有声音,影像,图象,动画,文字各种信息的集合式文件.动态链接库(DLL,Dynamic Link Librares)技术将C/C+或汇编语言编写的程序加入到Visual Basic的应用程序中,或是调用Windows应用程序接口(API,Application Programming Interface)函数,实现SDK(Software Development Kit)所具有的功能. 开放的数据库功能与网络支持Visual Basic具有很强的数据库管理功能,不仅可以管理MS Access格式的数据库,还能访问其他如FoxPro等格式的数据库.同时VB还提供了开放式数据连接(ODBC,Open DataBase Connectivity)功能,可以通过直接访问或建立连接的方式使用并操作后台大型网络数据库,如SQL Server等.在应用程序中,可以使用结构化查询语言(SQL , Structured Query Language)直接访问Server上的数据库,并提供简单的面向对象的库操作命令,多用户数据库的加锁机制和网络数据库的编程技术,为单机上运行的数据库提供SQL网络接口,以便在分布式环境中快速而有效地实现客户/服务器(Client/Server)方案。VB中的过程和模块所谓的“过程”，就是具有特定的书写格式，包含若干可被作为一个整体执行的代码行的一个代码组。过程可分为事件过程和通用过程。模块是VB用于将不同类型过程代码组织到一起而提供的一种结构。VB中有三种模块：窗体模块、标准模块和类模块。注意：窗体模块是一个窗体，标准模块是多个窗体共享，而类模块是用于创建新的对象类的属性、方法的定义等。 第三章 系统的功能分析课题确定以后，我就进行了一些必要的调查研究。先了解一下同学们的情况，他们对这个个人的收支管理都有一种无所谓的态度，我发现搞这个系统是非常的重要，也是非搞不可的。接下来我就让我的几个同学把每个月的用钱的去向记录下来。再根据我的自己的情况，考虑到各种特殊情况的设置像有一些钱是必须要事先准备好的，因为这个是你在计划内要花的钱。还有一些对待突发事情，需要用钱的，都要考虑进去。这是非常重要的，因为如果遇到什么没有考虑的到的到时候就又要添加模块。3.1 本系统应具有如下功能：年度。此项功能包括查询年度，年终处理数据的录入、添加、更新和修改等。记录。主要功能有：新增收支、修改收支、上一记录、下一记录、月结算、按时间排序等工具。支出的查询、预定、用折线式图表反映支出的、收支的详情和每月的结算。关于。这是一个辅助的模块。它的功能有：帮助、关于这个系统、和退出这个系统。3.2本系统的性能要求：由于这个系统牵涉到个人的隐私，在开始的窗体中一定要有设置密码的功能并且还要可以修改和存储修改后的密码的功能。设计系统时难免会出现一些问题，如果有问题就没有办法，所以在设计时，要把自己的联系方式告诉用户。以便能够及时处理好问题，并且可以发现该设计的漏洞。第四章 详细设计4.1系统的开始界面如下图所示：图4.1 身份验证界面由于这个系统牵涉到个人的隐私，在开始的窗体中一定要有设置密码的功能并且还要可以修改和存储修改后的密码的功能。如果你想改变密码,就用鼠标点击更改密码,就可以显示如下，然后在新密码的文本框中填写新密码，为了确定期间，请再“再输入一次”的文本框中再输入一次新密码，最后按“确定”按钮便可以了，系统会自动记录该密码。如果你又不想改变密码了，你可以按“取消”按钮，系统也会自动不记录该密码。密码输入好以后，用鼠标点击确定就可以进入主窗口。密码输入三次如果还不对，系统就会警告你别侵犯别人的隐私权。图4.2身份验证界面该界面中的“更改密码”的Lable1的程序代码如下：Private Sub Label2_Click()If Module1.mw Text1.Text Then MsgBox 请先输入正确的密码！ Text1.SelStart = 0 Text1.SelLength = 8 Text1.SetFocusElse Label3.Visible = True Label4.Visible = True Label5.Visible = False Text2.Visible = True Text3.Visible = True Text2.SetFocusEnd IfEnd SubPrivate Sub Label2_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 ThenLine2.BorderColor = &H80000009Line1.BorderColor = &H80000008Line4.BorderColor = &H80000008Line3.BorderColor = &H80000009End IfEnd SubPrivate Sub Label2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Line1.Visible = TrueLine2.Visible = TrueLine3.Visible = TrueLine4.Visible = TrueEnd Sub系统的主界面如下图所示：图4.3 小小收支薄界面大多数Windows应用程序都有一个菜单栏，它总是处在窗体标题栏的。下面，并包含一个或多个菜单标题。单击每个菜单标题都会弹出一个下拉菜单，在下拉菜单中包含有菜单项、分隔条和菜单标题。有的菜单项可以直接执行，有的菜单项执行时则会弹出一个对话框。所有的Windows应用程序都遵循以下三个约定：凡是菜单名称后有一个省略号的，均表示在单击该选项后会弹出一个相应的对话框，在用户作出相应的回答后，该项功能就以用户所给予的信息去执行。例如单击“预定选项”，则弹出“预定”对话框，用户可以从中选择要打开的文件。凡是菜单名称后面有一个小三角形的，则表示它是一个子菜单标题，子菜单标题并不能直接执行，仅仅扮演一个“容器”的角色。当鼠标指针移动到子菜单标题上时，会自动弹出子菜单。例如，将指针移动到“数据导出”选项，就会弹出如图所示的子菜单。菜单名称后不包含上述两种符号者，表明该菜单项所代表的命令可直接执行。例如，单击“关闭”选项，则关闭当前打开的文档。4.2 编辑菜单需要用到菜单编辑器菜单编辑器是VB提供的一个用于设计菜单的工具。打开“工具”菜单，执行“菜单编辑器”的命令，将出现以下的图：图4.5菜单编辑器界面该主窗体有四个菜单，分别是年度、记录、工具和关于。这四个菜单下面还有一些子菜单。系统的菜单如下图所示：菜单栏工具年度查询年度查询预定年终处理折线式图表记录数据导出新增收支收支详情修改收支每月结算上一记录关于下一记录帮助月结算关于按时间排序退出表4.1主窗体还设计了主菜单的按钮形式，例如主菜单中的“记录”中的几个子菜单：新增收支、修改收支、上一记录、下一记录、月结算、按时间排序都有按钮形式。它们的功能跟点击子菜单是一样的。只是它们比点击子菜单来的快、形像。还有主菜单中的“工具”，“关于”都有按钮的表示形式。点击菜单栏中的“年度”，再点击它的下拉菜单“查询其他年度”就会出现如下图所示的窗体。图4.6设计本窗体是把Data控件和DBGrid控件放置在窗体上各对象的属性如下表所示：对象属性值窗体Caption年度选择Data控件名称Data1DatabaseNameD：新文件夹RecordSourceTelTableDBGrid控件Caption年度情况DataSourceData1AllowAddNewTrueAllowDeleteTrue表4.2其中DBGrid控件的程序代码为： Private Sub DBGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)Label2.Caption = Data1.Recordset.Fields(0)End Sub 运行该程序,可见年度的情况出现在DBGrid控件中通过拖动滚动条即可以浏览年度情况上所有记录。将鼠标指针移动到DBGrid控件的列或行上，当鼠标指针变成双向箭头后，拖动鼠标可以改变列或行的宽。记录的最后一行以星号（*）开头，表示在该行可以输入新的记录。在某行的左边单击可选中该行（选中的行以高亮度显示）按Del键即可将该条记录删除。接下来再按“年度”下的另一个子菜单“年终处理”，按过以后，系统会提示还没有到12月31号不好进行年度处理，如果现在就进行统计数据将会不准。以后的数据当年度将查不到（除非在元旦之前不输入数据），那就可以进行统计。下面就选择菜单的“记录”，在选择它的子菜单“新增收支”下面的按钮就会显示的如下图所示：然后在其中的的收支金额后面的文本框中输入金额，在收支类别的文本框中选择类别，最后考虑是保存还是放弃。点保存系统会自动记录在下面的DBGrid控件中。上图中的按钮的意思分别为：保存、放弃、帮助等。保存是保存新输入的记录，而放弃是不保存所新输入的记录。接下来按主菜单的“工具”，再选择下面的子菜单的“查询”如下图所示：图4.7该界面使用了DBGrid控件，复选框，文本框，标签和按钮。DBGrid控件是用来存储你输入的数据，标签则是用于说明，复选框是用来多项选择的，而按钮是单击执行命令。从该图表中可以看到你以前输入收支的日期，收支的金额、类别、备注。在这张窗口上你可以输入你要浏览收支的开始日和末日、收支金额的多少。数据输入以后，系统就会自动的算出收入的总额和支付的总额如。信息看完后，点击“刷新列表”系统就会清除记录，然后点击“返回”。就可以回到主窗口。其中“全选收支”按钮的程序代码为：Private Sub Comsl_Click()Static t As ByteDim i As IntegerIf t = 0 Thent = 1For i = 0 To 4Check1(i).Value = 1Next iComsl.Caption = 不选收入Elset = 0For i = 0 To 4Check1(i).Value = 0Next iComsl.Caption = 全选收入End IfEnd Sub下面就选“工具”的子菜单“预定”。设置这个的目的是想考虑到个别现象。例如，在这个月的月末你突然想买什么东西，但是又因为到月末了，钱用的也差不多了，所以这个时候你就可以在下一个月里预定这一笔钱。还比如说每月要交手机费，你要每月约定100-200元来交手机费所以你也要约定这一笔钱。该窗体如下图所示：图4.8该窗体中有Date数据控件，Label标签，Combox组合框，按钮。Date数据控件输入数据后，以后还可以按要求自动添加，如果不需要的数据还可以删除当前的预定。本界面可以填写约定的金额，而且还可以按每月、每年、每天、每季、每周预定，因为在时间间隔的组合框中可以选择。还可以从不同的金额类别中预定，金额和时间可以单击下面“更改”按钮来修改，修改以后系统都是进行自动的记录。下面选中主菜单的“关于”，这个菜单的功能是关于作者、帮助和退出该系统。该界面的设计很简单，只需要拖三个Label标签和一个命令按钮。在第一个标签属性的caption中写上：您若对我的程序有任何意见。请与我联系。也可以写信到江苏省淮安铁路左猛收。邮编是223001。在第二个标签属性的caption中写上：小小收支簿V0.2版.在第三个标签中输入:作者的Email:.命令按钮执行返回到主界面.该按钮的程序代码是:Private Sub Command1_Click()Unload MeEnd Sub在主菜单下面的命令按钮中有一个上面有问号的它的功能是“并非帮助”它的界面如下图：图4.9该界面将用到两个Lable标签和一个命令按钮在第一个标签中写上：欢迎使用小小收支薄，这还是v0.2版，一定有不少BUG，请帮忙多抓点并MAIL TO : 谢谢！小小收支薄是用来记录使用者每天的现金收入及支出情况，并自动进行每月、每年的结算，使现金使用情况一目了然，这个版本比上一版本多了年终处理和文本导出这些简单但很实用的功能我介绍下小小收支薄的各种功能各操作方法: 程序第一次启动时会要求你输入开始计账的年月和当时所有的现金数，输入后进入主界面,里面已有一条收支为0的记录了,您可以改掉它新增、删除、前一记录、后一记录这些是常规性功能，不用我多说了吧！Lable2的程序代码如下：（Lable2实现单击字幕滚动）Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1.Top = Label1.Top - 2200If Label1.Top + Label1.Height 10 Then A = A + 1 : B = B + A : C = C + B在块形式中，If块必须以一个End If语句结束。根据单一表达式来执行多种可能的动作时，Select Case更为有用。依照“附件”中的计算器，自己编一个计算器。本实验要求：可以使用数字按钮输入数值（整数）。将十个数字按钮组成一个按钮数组，统一编程；使用函数CStr(表达式)可以使数值转化成字符串。第五章 调试的过程在程序设计的过程中，由于开始时对VB.环境不很熟悉，走了不少的弯路，尤其是在功能设计过程中，运行和调试的时候，总是不能够出现我所设计的欲想的效果。在编写所设计的程序代码时，编写时是会出现错误，因此，进展很慢。后来，随着上机多次调试，加上不断查阅有相关的资料，使我对VB的环境也越来越熟悉了，使用起来也越来越得心应手。同时，也增加了我对学VB的兴趣。在不断的摸索过程中，逐步掌握了VB调试器的使用方法，和如何调用查询，并在调试器的跟踪下找出错误据，使我所编的程序代码，能够在程序中正确运行。这也使得程序不断正确，不断完善。但调试器也有不能确定出错位置的时候，如：我在设计主菜单的进修，有些功能不太好，经这详细分析后，对先前已建立起来的菜单又进行了修改，增加了一些新的功能项。再发出运行命令后，系统仍然给出了修改前的菜 ，经过了下于几十次修改运行后，在我几乎对VB6.0绝望而准备放弃选用别的程序设计