vb程序实例(三)

创建事件过程
vb应用程序的代码被分为称为过程的小的代码块。事件过程,正如此处正要创建的一样,包含了事件发生(例如单击按钮)时要执行的代码。控件的事件过程由控件的实际名称(Name 属性中所指定的)、下划线 (_) 和事件名组合而成。例如,在单击一个名为 Command1 的命令按钮时调用的 Name 事件过程,可称为 Command1_Click 事件过程。
要创建事件过程,请按照以下步骤执行:
1. 在“对象”列表框中,选定活动窗体中的一个对象名(活动窗体是指当前有焦点的窗体)。在这一例子中,选定命令按钮 Command1。
2. 在“过程”列表框中,选择指定对象的事件名。此时 Click 过程已经被选定,因为它是命令按钮的缺省过程。注意,这时事件过程的模板已经显示在“代码”窗口中。
3. 在 Sub 和 End Sub 语句之间输入下面的代码:
Text1.Text = "Hello, world!"
这个事件过程应该是:
Private Sub Command1_Click ()
Text1.Text = "Hello, world!"
End Sub
值得注意的是,此处代码只简单改变了控件 Text1 的 Text 属性,读入"Hello, world!"。这个例子的语法采用object. property的格式,其中 Text1 是对象,Text 是属性。响应应用程序运行中发生的事件时,可以用这种语法来改变任何窗体或控件的属性设置值。
详细信息 关于创建其它类型过程的详细信息,请参阅第五章“编程基础”中的“过程概述”一节。

运行应用程序
为了运行应用程序,可以从“运行”菜单中选择“启动”,或者单击工具栏中的“启动”按钮,或按 F5 键。单击刚才在窗体上创建的命令按钮,文本框中就会显示 "Hello, world!"。

Firstapp 示例应用程序
由于 vb提供了远比本例应用程序丰富得多的工具,因此马上可以使用许多其的特性来管理和配制应用程序。复习示例应用程序是学习vb的极好方法。下述示例展示了用 vb编制实用的应用程序是多么的轻而易举。
应用程序Firstapp 演示了如何使用 data 控件和 grid 控件显示取自数据库的信息表。vb使得从应用程序内部到数据库的访问非常地容易。数据控件提供了在数据库的记录集中漫游的功能,以及使得在 grid 控件中显示的记录与数据集中的位置同步的能力。
本例包含一个数据控件、一个MSFlexGrid 控件、一个列表框控件和两个命令按钮。网格显示了从Northwind 数据库检索到的产品的信息表。当使用数据控件上的定位按钮选定网格的一项时,被选中的产品名便显示在数据控件上。还可以双击网格中当前选择位置,在列表框控件的“购书单”中添加当前选择的书名。
用 AddItem 方法可以添加列表框的信息。方法是作用于特定对象(本例中为 ListBox 对象)的 vb函数。指定方法的语法 (object.method) 与设置属性的语法 (object.property) 类似。AddItem 方法可以在程序运行时动态地添加列表框的内容。相反,Clear 方法用于清除列表框的全部信息。
详细信息 关于方法的详细内容,请参阅第三章“窗体、控件和菜单”中的“属性、方法和事件概述”一节。

创建工程
创建工程首先要从“文件”菜单中选择“新建工程”,然后从“新建工程”对话框中选定“标准 EXE”(首次启动 vb时将会显示“新建工程”对话框)。vb创建一个新的工程并显示一个新的窗体。用一个数据控件、一个MSFlexGrid 控件、一个列表框控件以及两个命令按钮画出了应用程序的界面。MSFlexGrid 控件不在缺省的工具箱内,因此必须添加:
要添加控件到工具箱,请按照以下步骤执行:
1. 选定工具箱的上下文菜单中的“部件”(可以在工具箱窗口内部单击右键显示上下文菜单。)。“部件”对话框被显示。
2. 找到“控件”列表框中的“MSFlexGrid (Microsoft Flex Grid 6.0)”项,然后选中其左边的复选框。
3. 单击“确定”按钮。在工具箱中有了MSFlexGrid 控件的图标。
使用工具箱在窗体上画出一个数据控件、一个MSFlexGrid 控件、一个列表框控件和两个命令按钮。如果您不记得如何绘制,请参阅本章前面的"Creatingthe Interface"。
设置属性根据下表在属性窗口中设置对象的属性,其余的属性均使用缺省值。

数据控件的 DatabaseName 属性必须包含数据库的实际路径。按照缺省规定,Biblio.mdb 数据库的按钮与 vb安装在同一个目录下。在属性窗口中选择 DatabaseName 属性时,可以单击该属性右侧的按钮显示标准的“打开文件”对话框浏览文件。设置完 DatabaseName 属性后,属性窗口中的 RecordSource 属性将包含选中的数据库中的表或记录集的清单。将DataGrid 控件的 DataSource 属性设置为 Data1,将自动地把网格和数据控制链接起来。

编写事件代码
程序所有的代码包含在 Command1_Click、Command2_Click、Data1_Reposition 和DataGrid1_DblClick 事件过程中。双击窗体或控件显示代码窗口,然后输入各事件过程的代码。
将以下代码添加到 Command1_Click 事件过程中,用于单击按钮时清除列表框:
Private Sub Command1_Click ()
List1.Clear' 清除列表框。
End Sub
以上语句调用了列表框 List1 的 Clear 方法,Clear 方法删除该列表框的内容。
将以下代码添加到 Command2_Click 事件过程中,用于从内存中卸载窗体并终止应用程序:
Private Sub Command2_Click ()
Unload Form1
End' 终止应用程序
End Sub
以上过程的第一条语句调用窗体的 Unload 事件。如果需要在终止程序时执行一个功能(例如保存文件),可以把代码放到窗体的 Unload 事件过程中。第二条语句调用 End 函数终止程序。
将以下代码添加到 Data1_Reposition 事件过程中,用于每当选择一个记录时更新标题:
Private Sub Data1_Reposition ()
Data1.Caption = Data1.Recordset("Title")
End Sub
以上语句将右边的值(数据控件的记录集的 Title 字段)赋给左边的属性(数据控件对象的 Caption 属性)。
将以下代码添加到DataGrid_DblClick 事件过程中,用于当双击一个选定的行时向列表框添加信息。
Private Sub DataGrid1_DblClick ()
List1.AddItem Data1.Recordset("Title")
End Sub
以上语句调用列表框 List1 的 AddItem 方法。添加到列表框中的文本被包含在该方法的参数中(此时为数据控件的记录集的 title 字段)。将一个值传递给参数类似于给属性赋值,与赋值语句不同的是不需要用等号。

保存工程
从“文件”菜单中选取“保存工程”命令来结束本次创建应用程序的工作。vb将分别提示保存窗体和保存工程。可以将工程命名为“书店销售清单” ("Bookstore Shopping List.")。Windows 95 和 Windows NT 都允许使用长达 255 个字符的文件名而且可以包含空格。旧版的 MicrosoftWindows 只允许八个字符的文件名外加三个字符的扩展名。

增强应用程序
这样第一个vb应用程序就完成了:这是一个功能简单却很有用的程序。可以以此为基础在自己的应用程序中添加新的功能,用自己的数据替换 Biblio.mdb。当然,要使本程序真正实用,还要添加基本的保存或打印列表框内容的功能、添加更多的信息,如价格、是否有货,甚至可以收集信用卡的信息和通过 Internet 传送订单。通过继续阅读《程序员指南》的其余部分将找到所有有关这些功能的例子和其它更多的知识。

时间: 2024-11-17 20:55:32

vb程序实例(三)的相关文章

vb程序实例(一)

创建vb应用程序是很简单的事.有多简单?为回答这个问题,试着创建下面的 Hello ,vb和 Firstapp 应用程序. 你好,Visual Basic 创建vb应用程序有三个主要步骤: 1. 创建应用程序界面 2. 设置属性 3. 编写代码 为了说明这一实现过程,按照以下步骤创建一个简单应用程序,该应用程序由一个文本框和一个命令按钮组成.单击命令按钮,文本框中会出现"Hello , world!" 消息. 创建应用程序界面 窗体是创建应用程序的基础.通过使用窗体可将窗口和对话框添加

vb程序实例(二)

3.要调节锁定控件的位置,请:按住 CTRL 键,再用合适的箭头键可"微调"已获焦点的控件的位置.- 或 -也可在"属性"窗口中改变控件的Top和Left属性.现在已生成了"Hello, world!"应用程序的界面,如图2.4所示. 设置属性下一步是给创建的对象设置属性.属性窗口(图 2.5)给出了设置所有的窗体对象属性的简便方法.在"视图"菜单中选择"属性窗口"命令.单击工具栏上的"属性窗口&

操作系统-关于进程间的三种状态的转移 能不能结合具体的程序实例说明一下

问题描述 关于进程间的三种状态的转移 能不能结合具体的程序实例说明一下 running stateready statewaiting state这三种不同的状态之间的相互转换,能不能结合具体的程序实例说明一下 比如编译器等等 解决方案 运行.阻塞.就绪 是进程的3种基本状态,有些划分成更细的则分成4个状态(运行.就绪.睡眠.阻塞)就以楼主分的这3种基本状态来解释:运行态:进程正在执行时的状态阻塞态:进程由于需要进行的IO操作,不得不等待其他进程IO或者某个IO事件完成,此时进入阻塞等待状态就绪

一个完整的Installshield安装程序实例—艾泽拉斯之海洋女神出品(五) --补遗 (已补充第三部分完整版)

原文:一个完整的Installshield安装程序实例-艾泽拉斯之海洋女神出品(五) --补遗 (已补充第三部分完整版) 上一篇:一个完整的安装程序实例-艾泽拉斯之海洋女神出品(四) --高级设置二 转载时请务必保留转载出处和由艾泽拉斯之海洋女神出品的字样:如需刊登,请与作者联系.little_fairycat@126.com. 第三部分:其他 1. 修改显示界面的风格 Installshield 原始安装界面我始终觉得很丑,幸好Installscript 是可以不用写代码就可以改界面风格的.

使用 C# 和 C++.NET 开发的 .NET 应用程序实例列表

c++|程序 概述 本文档列出了 Crystal Decisions 技术支持网站上所有可用的,使用 C# 和 C++.NET 开发的 .NET 应用程序实例列表.本文档还给出了每一个程序的描述和下载链接.随着新程序加入我们的支持站点,本文档将不断更新.---------------------------------- 目录 VISUAL C# .NET 一.数据库连通性 1.csharp_web_simplelogonengine.exe 2.csharp_web_simplelogonvi

有同事看到有人用vs2010编程制作的VB程序可以带二次编译功能?

问题描述 如题有同事看到有人用vs2010编程制作的VB程序可以带二次编译功能?有大神知道这是怎么实现的?是嵌入什么编译器? 解决方案 解决方案二:.netframework本身就提供命令行的编译器啊?!关键是靠不靠谱,而不是有没有.每一个人都能买到手术刀,但是买到手术刀的人未必就能随便给别人做外科手术.解决方案三:你搜索一下vbc.exe就行了.你可以让用户录入一段vb.net源代码,然后给他编译为dll.问题是,假设你需要动态链接一个dll,你一定要给他提供一个源代码编辑器吗?你让他自己按照

源代码-哪位大神可以帮我讲解一下这个vb程序啊 ,感激不尽

问题描述 哪位大神可以帮我讲解一下这个vb程序啊 ,感激不尽 With ActiveDocument.PageSetup .LineNumbering.Active = False .Orientation = wdOrientPortrait .TopMargin = InchesToPoints(0.8) .BottomMargin = InchesToPoints(0.8) .LeftMargin = InchesToPoints(0.8) .RightMargin = InchesToP

控件-急急急!!!!vb程序数据量比较大时VSflexgrid设置数据源假死机怎样解决????

问题描述 急急急!!!!vb程序数据量比较大时VSflexgrid设置数据源假死机怎样解决???? 使用vsflexgrid控件查看数据,当数据量比较大时(超过十万行),设置vsflexgrid数据源时程序假死机,等待一段时间才有响应,求大神指点!!! 解决方案 .Redraw一共有三个取值: flexRDNone --不刷新数据,要手工刷新数据才会显示 flexRDDirect --立即装入所有的数据,你应该是设置成了这个,所以速度慢 flexRDBuffered --显示部分数据,这种速度最

请问谁有winform开发的应用程序实例或教程也行

问题描述 请问谁有winform开发的应用程序实例或教程也行,最好是源码,VS2005+C#,谢谢啦 解决方案 解决方案二:http://download.csdn.net/source/267815csdn下载频道多的是啦解决方案三:这方面的中文书籍不多,你可以去看看外文的书:Manning.Publications.Windows.Forms.in.Action.2nd.Edition.Apr.2006.pdf电驴上有,这本我看过,还是不错的