第7VBET程序设计基础

1、 数据库技术及应用数据库技术及应用db1第第7章章 vb.net程序设计基础程序设计基础本章主要内容：本章主要内容： 介绍介绍vb.net的集成开发环境；的集成开发环境； 常用控件常用控件(主要属性主要属性,方法和事件方法和事件)的使用；的使用； vb.net程序设计的基础知识（数据类型、程序设计的基础知识（数据类型、 表达式、程序控制结构等）。（表达式、程序控制结构等）。（重点重点） 27.1 vb.net基本概念基本概念7.1.1 vb.net简介简介.net开发平台：如图所示。开发平台：如图所示。37.1.1 vb.net简介简介vs .net开发平台开发平台中间语言程序中间语言程序(e

2、xe)在不同的在不同的cpu上运行上运行基础类库基础类库clr第第1次编译次编译第第2次编译次编译vs.netvb.net vc+.netvc#.net vj#.netwindows应用程序应用程序asp.net程序程序数据和数据和xml类类(ado.net,sql,xml,xslt etc.)47.1.1 vb.net简介简介1. .net开发平台的特点开发平台的特点支持多种语言编程环境支持多种语言编程环境。vs.net是一个是一个集成开发环境，集成集成开发环境，集成vb、vc、c#、j#。 允许它们共享工具并有助于创建混合语言允许它们共享工具并有助于创建混合语言解决方案。解决方案。可以开发

3、多种应用程序可以开发多种应用程序。如。如windows应用应用程序、程序、asp web 应用程序、应用程序、xml web services、移动、移动(mobile)应用程序等等应用程序等等 。57.1.1 vs.net简介简介使用同一个基础类库使用同一个基础类库。在传统的语言编程。在传统的语言编程环境中，不同的语言有不同的函数库，而环境中，不同的语言有不同的函数库，而且调用方式也不同，不同语言的函数库是且调用方式也不同，不同语言的函数库是不能通用的。在不能通用的。在vs.net中，大家使用同中，大家使用同一个基础类库。一个基础类库。67.1.1 vs.net简介简介 公共语言运行时库公共

4、语言运行时库。 运行时库运行时库提供了执行程序的服务，实现了提供了执行程序的服务，实现了编程语言的统一。编程语言的统一。 .net.net程序需要程序需要2 2次编译才能在次编译才能在cpucpu上运行。上运行。首先编译生成与首先编译生成与cpucpu无关的中间语言，然无关的中间语言，然后在公共语言运行时库后在公共语言运行时库(clr)(clr)的支持下，的支持下，中间语言程序被编译成本地中间语言程序被编译成本地cpucpu指令程序。指令程序。实现了实现了.net.net跨平台运行的目标。跨平台运行的目标。72. vs.net和和.net框架框架.net框架是与框架是与vs.net紧密相联紧密

5、相联, vs.net依依赖于赖于.net框架提供的服务。框架提供的服务。7.1.1 vs.net简介简介. vs.net和和.net框架的关系如下图所示。框架的关系如下图所示。8调用调用.net框架服务框架服务调用编译器的服务调用编译器的服务运行时调试支持运行时调试支持工具窗口工具窗口代码编辑器代码编辑器可视化设计器可视化设计器集成开发环境集成开发环境vs.net公共类型系统公共类型系统公共语言规范公共语言规范just in time编译器编译器执行管理执行管理.net框架类库框架类库公共语言运行库公共语言运行库第方语言第方语言+c#vb.netvj#编译器编译器.net框架框架9. vb.n

6、et和和vs.netvb.net是是vs.net支持的多种语言之一。是微软支持的多种语言之一。是微软推出的第个基于推出的第个基于.net框架的开发工具，是完全框架的开发工具，是完全面向对象的编程语言，支持继承、重载、构造等面向对象的编程语言，支持继承、重载、构造等面向对象方法。面向对象方法。7.1.1 vs.net简介简介107.1.2 vb.net集成开发环境集成开发环境1. 进入进入vb.net2. 主要窗口介绍主要窗口介绍vb.net主窗口主窗口 窗体设计器窗口窗体设计器窗口代码设计代码设计 属性窗口属性窗口解决方案资源管理器窗口解决方案资源管理器窗口工具箱窗口工具箱窗口 其它窗口（在其

7、它窗口（在“视图视图”菜单中选择）菜单中选择）一个应用程序由项目构成，一个项目对应一个项目一个应用程序由项目构成，一个项目对应一个项目文件夹，其中包括项目涉及的所有文件。文件夹，其中包括项目涉及的所有文件。117.1.3 建立简单的应用程序建立简单的应用程序本节我们通过本节我们通过2个简单例子说明完整个简单例子说明完整vb.net应用程序的建立过程。应用程序的建立过程。建立一个应用程序分以下几步进行建立一个应用程序分以下几步进行: 建立用户界面的各个对象建立用户界面的各个对象; 对象属性的可视化设置对象属性的可视化设置; 对象事件过程编码对象事件过程编码; 保存、调试和运行程序。保存、调试和运

8、行程序。127.1.3 建立简单的应用程序建立简单的应用程序例例7.1 界面见下页图所示。界面见下页图所示。137.1.3 建立简单的应用程序建立简单的应用程序例例7.2 界面见下页。通过按钮操作让界面见下页。通过按钮操作让“欢欢迎使用迎使用vb.net”在窗口中移动。步骤：在窗口中移动。步骤：设计用户界面并设置控件属性设计用户界面并设置控件属性编写事件过程编写事件过程147.1.3 建立简单的应用程序建立简单的应用程序 private sub timer1_tick(byval sender , byval e as ) if label1.left me.width then label1

9、.left = -200 else label1.left = label1.left + 8 end if end sub private sub button2_click( ) . 手动移动手动移动 timer1.enabled = false timer1_tick(sender, e) 调用一次调用一次timer1_ticktimer1_tick end sub private sub button1_click( ) . 自动移动自动移动 timer1.enabled = trueend sub157.1.4 如何使用帮助系统如何使用帮助系统 vs.net中联机帮助系统是基于中联机

10、帮助系统是基于msdn library。vs.net的的msdn library可以随可以随其安装时一起安装，也可以以后安装。其安装时一起安装，也可以以后安装。 帮助有下面常用的四种方式。帮助有下面常用的四种方式。1. 动态帮助动态帮助 动态帮助跟踪用户的动作，并自动地显示动态帮助跟踪用户的动作，并自动地显示一系列帮助主题。一系列帮助主题。选择选择“帮助帮助/动态帮助动态帮助”菜单项，打开动态帮助窗口。菜单项，打开动态帮助窗口。16 鼠标指向哪，帮助就到哪！鼠标指向哪，帮助就到哪！7.1.4 如何使用帮助系统如何使用帮助系统172. 索引索引 选择选择“帮助帮助/索引索引”菜单项，打开索引帮菜

11、单项，打开索引帮助窗口。助窗口。7.1.4 如何使用帮助系统如何使用帮助系统183. 使用上下文相关帮助使用上下文相关帮助 按按“f1”键使用上下文相关帮助。键使用上下文相关帮助。它可以它可以根据当前选定的内容直接定位帮助内容。根据当前选定的内容直接定位帮助内容。（电脑操作演示电脑操作演示）4. 网络资源网络资源 可通过可通过http:/www.microsoft.con/china/msdn网址，获得最新、最及时的有关帮助信息。网址，获得最新、最及时的有关帮助信息。7.1.4 如何使用帮助系统如何使用帮助系统197.2 vb.net可视界面设计可视界面设计本节主要分以下几方面内容本节主要分以

12、下几方面内容： 面向对象设计的基本概念。面向对象设计的基本概念。 介绍若干常用控件的使用。介绍若干常用控件的使用。207.2 .1 vb.net对象概念对象概念1. 对象和类对象和类对象对象：是对客观世界中的事物的抽象。用事是对客观世界中的事物的抽象。用事物的特征物的特征( (属性属性) )和行为和行为( (方法方法) )来描述。来描述。 例如例如: :一个人一个人, ,一扇一扇窗口窗口, ,一个按钮等都是一个按钮等都是对象。对象。 对象是面向对象编程的基本元素对象是面向对象编程的基本元素. .21 类：类：是对一组相似对象的抽象描述，这些是对一组相似对象的抽象描述，这些对象具有相同种类的属性

13、和方法。对象具有相同种类的属性和方法。 类与对象的关系：类与对象的关系：类是抽象的，对象是具类是抽象的，对象是具体的。类是对象的抽象，对象是类的实例体的。类是对象的抽象，对象是类的实例。类是创建对象实例的模板。类是创建对象实例的模板。 例如例如：“桥梁桥梁”是抽象的类，则具体的桥是抽象的类，则具体的桥梁，如杨浦大桥、南京长江大桥等则是对梁，如杨浦大桥、南京长江大桥等则是对象。象。 7.2 .1 vb.net对象概念对象概念22 在在vb.net中，工具箱中的各种图标就是中，工具箱中的各种图标就是系统设计好的标准控件类。系统设计好的标准控件类。 当我们把所要的控件从工具箱中拿到窗体当我们把所要的

14、控件从工具箱中拿到窗体中时，就是创建了这个控件类的一个对象。中时，就是创建了这个控件类的一个对象。该对象继承了类的所有属性和方法，当然该对象继承了类的所有属性和方法，当然用户可根据需要修改属性的值。用户可根据需要修改属性的值。7.2 .1 vb.net对象概念对象概念232. 2. 对象的属性、事件和方法对象的属性、事件和方法 vb.net的控件对象具有自己的属性、方的控件对象具有自己的属性、方法和事件。法和事件。(1)(1)属性属性: : 标识了对象的特征。标识了对象的特征。例如例如: :一个一个”按钮按钮”对象对象, ,有属性有属性: : 字体字体( (font)、前景颜色、前景颜色(fo

15、recolor)、背、背景颜色景颜色(backcolor)、文本、文本(text)、是否、是否可操作可操作(enabled)等等。等等。7.2 .1 vb.net对象概念对象概念24(2)(2)方法方法: : 附属于对象的行为和动作附属于对象的行为和动作。 例如例如: :一个一个“窗体窗体”(form)对象，方法有：对象，方法有： add( (往窗体中加入控件对象往窗体中加入控件对象) )、close(窗窗口关闭口关闭) )等等。等等。 “ “方法方法”是指使对象行动的命令，它是通过是指使对象行动的命令，它是通过调用来使用的。调用来使用的。 对象方法的调用格式：对象方法的调用格式： 对象名对象

16、名. .方法方法(参数参数)例如：例如：textbox1.focus() textbox1.focus() textbox1textbox1获得焦点获得焦点7.2 .1 vb.net对象概念对象概念25(3)(3)事件事件事件事件即发生的事情。即发生的事情。是指对象可以识别和是指对象可以识别和响应的操作响应的操作。事件是触发执行的。事件是触发执行的。如：如：单击鼠标左键单击鼠标左键(click),双击鼠标左键双击鼠标左键(doubleclick)等等.事件可以由用户操作触发事件可以由用户操作触发, ,也可以由系统也可以由系统自动触发自动触发( (例如例如, ,出错出错).).当事件发生之后当事

17、件发生之后, ,需要触发一些操作需要触发一些操作, ,这就需要这就需要用户编写相用户编写相应的代码对此进行响应应的代码对此进行响应。这些代码就构成。这些代码就构成了了“事件过程事件过程”。7.2 .1 vb.net对象概念对象概念26vb.net是采用是采用事件驱动程序设计方法。事件驱动程序设计方法。程序执行后系统等待某个事件的发生，程序执行后系统等待某个事件的发生，然后去执行处理此事件的事件过程，待然后去执行处理此事件的事件过程，待事件过程执行完后，系统又处于等待某事件过程执行完后，系统又处于等待某事件发生状态，这就是事件驱动程序设事件发生状态，这就是事件驱动程序设计方法。计方法。7.2 .

18、1 vb.net对象概念对象概念对象、事件和事件过程之间的关系如下图。对象、事件和事件过程之间的关系如下图。对象对象事件过程事件过程触发触发执行执行事件事件27.对象的通用属性对象的通用属性1. 主要属性：主要属性：(1) name(对象名称对象名称)：每个对象都有一个唯一每个对象都有一个唯一标识标识名字。对象创建时，系统自动给它名字。对象创建时，系统自动给它默认名，如默认名，如form1、textbox1等，但用户等，但用户可修改。可修改。(2) text(对象显示文本对象显示文本):form, textbox, button, label等大多数控件都有此属性等大多数控件都有此属性.7.2

19、 .1 vb.net对象概念对象概念28(3) location(控件对象的位置控件对象的位置)： 控件左上角相对容器的位置，由一对整数控件左上角相对容器的位置，由一对整数表示，单位为像素。表示，单位为像素。 （可以用（可以用left和和top表示）表示） 例如：例如：button1.location=new point(88,48)注：注：newnew表示创建一个新的表示创建一个新的pointpoint类的对象。类的对象。等价于等价于： button1.left=88, button1.top=48 7.2.1 vb.net对象概念对象概念884829(4) size(控件对象的大小控件对象

20、的大小)： 也由一对整数表示，单位为像素。也由一对整数表示，单位为像素。 （可（可以用以用width和和height表示）表示） 例如：例如：button1.size=new size(80,32)等价于：等价于： button1.width=80 button1.height=32 7.2.2 窗体和常用控件窗体和常用控件 8032point, size, colorpoint, size, color都是结构都是结构30(5) font(字体字体)：设置对象显示文字的字体。设置对象显示文字的字体。 label1.font=new font(“隶书隶书”, 14)(6) forecolor、

21、backcolor(前景颜色和背景颜前景颜色和背景颜色色):设置对象显示文字的颜色和背景颜色设置对象显示文字的颜色和背景颜色 label1. forecolor=color.blue(7) cursor(光标光标)：给出鼠标位于对象上时显：给出鼠标位于对象上时显示的光标。示的光标。 button1.cursor=new cursor(“光标文件名光标文件名”)7.2.2 窗体和常用控件窗体和常用控件 31(8) enabled:设置对象是否可操作设置对象是否可操作true或或false。(9) visible：设置对象是否可见：设置对象是否可见true或或false。(10) tabindex

22、:决定程序运行时，按决定程序运行时，按tab键，键，焦点在控件移动的顺序。焦点在控件移动的顺序。7.2.2 窗体和常用控件窗体和常用控件 32窗体对象就是窗体对象就是form对象。对象。1.主要属性：主要属性：controlbox(窗体控制框窗体控制框true或或false)、backgroundimage(背景图片背景图片)7.2.2 窗体窗体windowsstate：设置程序运行时：设置程序运行时, 窗体是正窗体是正 常常(normal)、最大化、最小化、最大化、最小化maximizebox(最大化按钮要否？默认最大化按钮要否？默认true)minimizebox (最小化按钮要否？默认最

23、小化按钮要否？默认true)332. 常用事件：常用事件：load事件事件:当窗体被装入工作区时触发。当窗体被装入工作区时触发。一般该事件代码中，对变量或对象的属一般该事件代码中，对变量或对象的属性设初值。性设初值。click(单击鼠标事件单击鼠标事件)、dblclick(双击鼠标事件双击鼠标事件)、activated(窗口被激活时触发窗口被激活时触发)7.2.2 窗体和常用控件窗体和常用控件 34例例7.2：见见p172。7.2.2 窗体和常用控件窗体和常用控件 单击窗体双击窗体357.2.2 窗体和常用控件窗体和常用控件 private sub form1_load() me.formbo

24、rderstyle = formborderstyle.fixed3d me.text = 例例7.3 me.maximizebox = false me.minimizebox = false me.backgroundimage = nothing 去掉背景图片去掉背景图片end sub 36 private sub form1_click() me.text = 单击窗体单击窗体 me.backgroundimage = _ image.fromfile(“tongji2.jpg) me.windowstate = _ formwindowstate.maximizedend sub 7

25、.2.2 窗体和常用控件窗体和常用控件 37 private sub form1_doubleclick() me.text = “双击窗体双击窗体” me.windowstate = _ formwindowstate.normal me.size = new size(264, 256) me.backgroundimage = _image.fromfile(“tongji1.gif)end sub7.2.2 窗体和常用控件窗体和常用控件 383. 常用方法常用方法 show(显示显示)、 hide(隐藏隐藏)、 showdialog (以对话框模式显示窗体，即控制以对话框模式显示窗体，

26、即控制用户只能对该窗体操作，对窗体之外的东西用户只能对该窗体操作，对窗体之外的东西无法操作，直到用户关闭该窗体无法操作，直到用户关闭该窗体)。7.2.2 窗体和常用控件窗体和常用控件 394. 多重窗体多重窗体 对于较复杂应用程序，往往需要多个窗对于较复杂应用程序，往往需要多个窗体来实现。在多重窗体中，每个窗体可体来实现。在多重窗体中，每个窗体可以有自己的界面和程序代码，完成各自以有自己的界面和程序代码，完成各自的功能。的功能。7.2.2 窗体和常用控件窗体和常用控件 vb.netvb.net创建的窗体是类，必须通过创建的窗体是类，必须通过newnew实例实例化为对象。化为对象。40添加窗体添

27、加窗体 选择选择“项目项目/添加添加windows窗体窗体”命令命令.在对在对话框中选择话框中选择“windows窗体窗体”即可即可.启动窗体的设置启动窗体的设置 系统默认系统默认form1为程序运行时的启动窗体，为程序运行时的启动窗体，可以修改设置，将其他窗体（如可以修改设置，将其他窗体（如form2）设置为启动窗体。设置为启动窗体。7.2.2 窗体和常用控件窗体和常用控件 417.2.2 窗体和常用控件窗体和常用控件 (2) 窗体实例化和显示窗体实例化和显示 在多重窗体程序中在多重窗体程序中,只有启动窗体只有启动窗体(假定为假定为form1)的实例化是的实例化是自动完成的自动完成的. 其他

28、所有窗体都是通过代码实例化并显示其他所有窗体都是通过代码实例化并显示的的. 例如显示窗体例如显示窗体form2要使用下列语句要使用下列语句: dim f2 as new form2 定义定义f2f2为类为类form2form2的对象的对象 f2.show( ) 或或 f2.showdialog()42(3). 不同窗体间数据的访问不同窗体间数据的访问 两个窗体之间数据的访问有下列两个窗体之间数据的访问有下列2 2种形式种形式. . a. 窗体实例化后，窗体数据的互访窗体实例化后，窗体数据的互访 窗体窗体form1访问窗体访问窗体form2上的数据上的数据. form1中代码形式如下中代码形式如

29、下: 7.2.2 窗体和常用控件窗体和常用控件 dim frm2 as new from2 frm2.showdialog() 显示窗体显示窗体frm2frm2 me.textbox1.text=frm2.textbox1.text注意写法注意写法: 不能写为不能写为form2437.2.2 窗体和常用控件窗体和常用控件 窗体窗体form2访问窗体访问窗体form1上的数据上的数据. form2中某事件代码形式如下中某事件代码形式如下: dim frm1 as new from1 me.textbox1.text=frm1.textbox1.text frm1.show() 显示窗体显示窗体f

30、rm1form2中中, text1box1.text=form1.textbox.text错误错误44b. 通过在模块中定义公共变量实现相互访问通过在模块中定义公共变量实现相互访问.如：建立一个模块如：建立一个模块module1。在其中定义公共。在其中定义公共变量：变量： public x as imteger7.2.2 窗体和常用控件窗体和常用控件 例例7.3(p175)：多重窗体应用多重窗体应用示例。示例。45 标签控件用于显示文本信息，不能输入文标签控件用于显示文本信息，不能输入文本信息（输入用文本框）。本信息（输入用文本框）。 1. label（标签控件）（标签控件）(1) (1) 主

31、要属性主要属性name、text、 location、forecolor、size 、backcolor 、visible 、font(字体字体)、borderstyle(边框风格边框风格) 、7.2.3 常用控件常用控件 46(2) (2) 主要事件主要事件click、doubleclick、change（改变）（改变）contextmenu(快捷菜单快捷菜单),textalign(文字在标签中的对齐方式文字在标签中的对齐方式)、 image(背景图片背景图片)、autosize(自动大小自动大小)7.2.3 常用控件常用控件 47 文本框是一个文本编辑框，用户可以在该文本框是一个文本编辑框

32、，用户可以在该框中输入、编辑、修改和显示文本内容。框中输入、编辑、修改和显示文本内容。 2. textbox（文本框）（文本框）(1) (1) 主要属性主要属性name、location、forecolor、size 、backcolor 、visible 、 font(字体字体)、borderstyle(边框风格边框风格) 其他属性见下页其他属性见下页7.2.3 常用控件常用控件 48属性属性类型类型意义意义text字符串字符串框中编辑内容框中编辑内容maxlength整型整型允许输入最多字符数允许输入最多字符数multiline逻辑逻辑允许多行输入否，允许多行输入否，falsescroll

33、bars枚举枚举选择滚动条选择滚动条,multiline为为true时时passwordchar字符字符文本框用于输入口令时，显示的文本框用于输入口令时，显示的字符字符readonly逻辑逻辑只读，只读，falseselectionstart整型整型选定的正文开始的位置，第选定的正文开始的位置，第1个字个字符位置为符位置为0selectionlength 整型整型选定的正文长度选定的正文长度selectedtext字符串字符串选定的正文内容选定的正文内容7.2.3 常用控件常用控件 49(2) (2) 主要事件主要事件textchanged:文本框中内容改变时触发文本框中内容改变时触发. ke

34、ypress/keydown：当焦点在文本框上时，用户：当焦点在文本框上时，用户按了键时触发。按了键时触发。lostfocus：当文本框失去焦点时触发：当文本框失去焦点时触发.gotfocus: 当文本框得到焦点时触发当文本框得到焦点时触发.(3) (3) 主要方法主要方法focus: 将光标移到文本框上将光标移到文本框上. 例如例如: textbox1.focus() 7.2.3 常用控件常用控件 507.2.2 窗体和常用控件窗体和常用控件 例如例如: :sub textbox1_sub textbox1_keypresskeypress( (,byval e ,byval e ) ) i

35、f asc(e.keychar)=13 then if asc(e.keychar)=13 then endif endifend subend sub或或 if e.keychar=chr(13) then .513. button（命令按钮）（命令按钮）(1) (1) 主要属性主要属性name、text、 location、forecolor、size 、backcolor 、visible 、font(字体字体)、enabled、borderstyle(边框风格边框风格)、 textalign image(图片图片, 建图形按钮时用建图形按钮时用)、7.2.3 常用控件常用控件 52例例

36、7.4 按钮应用。界面、功能如下图所示。按钮应用。界面、功能如下图所示。textbox1.font = new font(隶书隶书, 16, fontstyle.italic)7.2.2 窗体和常用控件窗体和常用控件 演示演示收集收集3 3个图片，个图片，存放在项目的存放在项目的binbin文件夹下。文件夹下。534. 单选单选按钮、复选框和分组框按钮、复选框和分组框 单选单选按钮按钮(radiobutton) 与复选框与复选框(chekbox)的区别的区别： 单选单选按钮任何时候最多只能选择一项按钮任何时候最多只能选择一项, 一一般利用般利用panel(面板面板)或或groupbox(分组框

37、分组框)将将相同性质按钮归类在一组；复选框列出多相同性质按钮归类在一组；复选框列出多项，用户可从中选择一项或多项。项，用户可从中选择一项或多项。见下页见下页图所示图所示。7.2.2 窗体和常用控件窗体和常用控件 547.2.2 窗体和常用控件窗体和常用控件 单选按钮复选框55(1) (1) 主要属性主要属性 name、font(字体字体)、forecolor、 visible 、enabled、 text、 checked: 逻辑值，表示单选按钮或复选框逻辑值，表示单选按钮或复选框选中否。选中否。(2) 主要事件主要事件 click、 checkedchanged(对象值改变时对象值改变时触发

38、触发)7.2.3 常用控件常用控件 56panel(面板面板)与与groupbox(分组框分组框) 都是用于都是用于将相同性质的对象归类。当我们移动分组将相同性质的对象归类。当我们移动分组框或面板时，其中的对象也会跟着移动。框或面板时，其中的对象也会跟着移动。分组框的主要属性分组框的主要属性： text, backgroundimage , font面板的主要属性面板的主要属性: borderstyle , backcolor, backgroundimage7.2.3 常用控件常用控件 575. 列表框和组合框列表框和组合框 列表框列表框(listbox)：在框中提供若干选项供用户选择。：在

39、框中提供若干选项供用户选择。只允许用户选择，不能输入。只允许用户选择，不能输入。 组合框组合框(combobox)：由文本框和下拉列表框组合：由文本框和下拉列表框组合而成。用户即可以在文本框中输入又可在下拉列表而成。用户即可以在文本框中输入又可在下拉列表中选择。中选择。7.2.3 常用控件常用控件 列表框组合框58(1) 主要属性主要属性items: 集合。存储列表框或组合框中的所有选项。集合。存储列表框或组合框中的所有选项。selectedindex: 整型。程序运行时被选定的项的序整型。程序运行时被选定的项的序号。第号。第1项的序号为项的序号为0。selecteditem:字符。被选定的项

40、的内容。字符。被选定的项的内容。text：用户输入或：用户输入或选择的值。选择的值。 items.count: 整型。程序中引用，值为列表框或组整型。程序中引用，值为列表框或组合框中的项数。合框中的项数。sorted:逻辑。列表框或组合框的选项是否按字母逻辑。列表框或组合框的选项是否按字母表顺序排序表顺序排序.7.2.3 常用控件常用控件 59dropdownstyle: 设置组合框外观和功能。设置组合框外观和功能。当当combobox1.dropdownstyle= comboboxstyle. dropdownlist时时组合框只能通过选择得到文本。组合框只能通过选择得到文本。当当comb

41、obox1.dropdownstyle= comboboxstyle. dropdown时时组合框即可通过输入又可选择得到文本。组合框即可通过输入又可选择得到文本。 组合框专有属性：组合框专有属性：7.2.3 常用控件常用控件 60当当combobox1.dropdownstyle= comboboxstyle. simple时时组合框即可输入也可选择得到文本。但外观有改变。组合框即可输入也可选择得到文本。但外观有改变。下拉列表将不折起。如下图所示。下拉列表将不折起。如下图所示。7.2.3 常用控件常用控件 simple61(2) 常用方法常用方法items.add: 把一个选项加入到列表框或

42、组合框。把一个选项加入到列表框或组合框。 listbox1.items.add(“computer”)items.remove : 从列表框或组合框中删除指定从列表框或组合框中删除指定的选项。的选项。listbox1.items.remove(“computer”)items.removeat(index):删除列表框或组合框删除列表框或组合框中指定位置上的选项。中指定位置上的选项。 listbox1.items.removeat(1)items.clear:清除列表框或组合框中的所有选项。清除列表框或组合框中的所有选项。7.2.3 常用控件常用控件 62(3) 常用事件常用事件click、d

43、oubleclick、selectedindexchanged(selectedindex属性值属性值改变后触发改变后触发)例例7.5 列表框控件程序列表框控件程序。界面如图。界面如图。7.2.3 常用控件常用控件 636. 滚动条和进度条滚动条和进度条 滚动条滚动条(scrollbar)：通常附在窗体上协助：通常附在窗体上协助观察数据或确定位置，也可用来作为数据观察数据或确定位置，也可用来作为数据的输入工具。的输入工具。 滚动条有垂直滚动条滚动条有垂直滚动条(vscrollbar)和水平和水平滚动条滚动条(hscrollbar) 2种。种。 进度条进度条(progressbar)：通常指示事

44、务处理：通常指示事务处理的进度。的进度。7.2.3 常用控件常用控件 64(1) 主要属性主要属性value:滑块当前位置所代表的值，缺省值为滑块当前位置所代表的值，缺省值为0。minimun、maximun :滚动条可以调整的最小值和滚动条可以调整的最小值和最大值。最大值。smallchange:滚动条两端的箭头为微调箭头，用户滚动条两端的箭头为微调箭头，用户单击微调箭头时，单击微调箭头时，value属性增加或减少的值。属性增加或减少的值。(相当于步长相当于步长)largechange:按下中间快卷区域时的移动量。按下中间快卷区域时的移动量。7.2.3 常用控件常用控件 65(2) 主要事件

45、主要事件scroll、valuechange:当滚动条内滑块位置发生变当滚动条内滑块位置发生变化时，化时，valuechange的值随之改变时，触发这的值随之改变时，触发这两个事件。两个事件。例例滚动条程序滚动条程序。三个滚动条分别控制。三个滚动条分别控制picturebox1的背景颜色（的背景颜色（red、green、 blue）。）。minimun=0, maximun=255, largechange=10,smallchange=1 . 见下图。见下图。7.2.2 窗体和常用控件窗体和常用控件 66 private sub hscrollbar1_scroll()picturebox1

46、.backcolor = color.fromargb(hscrollbar1.value, hscrollbar2.value, hscrollbar3.value)end sub7.2.3 常用控件常用控件 677. 定时器定时器 timer(1) 主要属性主要属性enabled: 为为false 时，定时器不起作用。时，定时器不起作用。interval: 两次触发两次触发tick事件的时间间隔。事件的时间间隔。其值以其值以ms（0.001s）为单位。即）为单位。即1000为为1秒。秒。(2) 主要事件主要事件tick: 时间间隔一到触发该事件。时间间隔一到触发该事件。7.2.3 常用控件

47、常用控件 68例例7.6 ：用定时器控制蝴蝶在窗体内飞舞。：用定时器控制蝴蝶在窗体内飞舞。 窗体中放三个窗体中放三个picturebox控件。设计时，只控件。设计时，只有有picturebox1的的visible=true。通过定时器。通过定时器控制在控制在picturebox1中装入中装入picturebox2 和和picturebox3的图像来实现。的图像来实现。7.2.2 窗体和常用控件窗体和常用控件 697.2.2 窗体和常用控件窗体和常用控件 事先收集事先收集2 2个不同蝴蝶图片，存放在项目的个不同蝴蝶图片，存放在项目的binbin文件夹下。文件夹下。708、日期挑选控件、日期挑选控

48、件 datetimepicker控件控件: 用户不想输入日期（或时用户不想输入日期（或时间），可以通过该控件选择一个日期（时间）。间），可以通过该控件选择一个日期（时间）。7.2.3 常用控件常用控件 71(1) 主要属性：主要属性： value: 对象的当前值。对象的当前值。 format：显示日期的格式。：显示日期的格式。 long(2008年年2月月25日日) short(2008/2/25) time(仅显示时间仅显示时间) custom(用户所给格式用户所给格式) showupdown：控制显示的样式：控制显示的样式 flase/trueflasetrue7.2.3 常用控件常用控件

49、 72例例7.7 程序界面如图所示。程序界面如图所示。private sub datetimepicker1_valuechanged () messagebox.show( datetimepicker1.value.date.tostring）end sub7.2.3 常用控件常用控件 73richtextbox控件用于显示、输入和操作控件用于显示、输入和操作格式化的格式化的文本文本。控件除了做。控件除了做 textbox 控件所做的每件事控件所做的每件事外，还可以显示字体、颜色和链接，从文件加外，还可以显示字体、颜色和链接，从文件加载文本和加载嵌入的图像，以及查找指定的字载文本和加载嵌入

50、的图像，以及查找指定的字符符(find方法方法)。richtextbox 控件通常用于提供控件通常用于提供类似字处理应用程序（如类似字处理应用程序（如 microsoft word）的）的文本操作和显示功能。文本操作和显示功能。7.2.3 常用控件常用控件 9. richtextbox控件控件74richtextbox没有没有passwordchar属性，但比属性，但比textbox功能强大，主要有：功能强大，主要有：(1) 文本的长度没有文本的长度没有64k限制；限制；(2) 可对选中的文本设置格式，如可对选中的文本设置格式，如selectionbackcolor、selectioncolo

51、r、selectionfont等等(3) 可方便用可方便用loadfile和和savefile直接读写文件。直接读写文件。7.2.3 常用控件常用控件 757.2.3 常用控件常用控件 richtextbox常用的常用的2个方法：个方法： savefile: 将将richtextbox 控件中内容保存到文件中控件中内容保存到文件中 loadfile:将文件内容加载到将文件内容加载到 richtextbox 控件中控件中 用法：用法：richtextbox1. loadfile(路径文件名路径文件名,流类型流类型) richtextbox1. savefile(路径文件名路径文件名,流类型流类型

52、) 功能功能：将将 rtf 格式文件或标准格式文件或标准 ascii 文本文件加载到文本文件加载到richtextbox 控件中控件中(或或 反之反之)。767.2.3 常用控件常用控件 if openfiledialog1.showdialog() = dialogresult.ok then richtextbox1.loadfile(openfiledialog1.filename, richtextboxstreamtype.plaintext ) end if if savefiledialog1.showdialog() = dialogresult.ok then richtex

53、tbox1.savefile(savefiledialog1.filename,richtextboxstreamtype.plaintext) end if 路径和文件名路径和文件名77. 菜单设计菜单设计 有种形式的菜单：有种形式的菜单：mainmenu（主菜单）和（主菜单）和contextmenu（弹出式菜单，或称快捷菜单）。（弹出式菜单，或称快捷菜单）。7.2.4 菜单和对话框菜单和对话框 (1) 菜单建菜单建立：立： 选择工具箱中的选择工具箱中的“mainmenu”控件，并在窗口控件，并在窗口中拖曳出合适的大小；中拖曳出合适的大小； 此时此时mainmenu对象出现在窗体外的区域对象

54、出现在窗体外的区域 直接在直接在“请在此处输入请在此处输入”的虚框中输入所要的菜的虚框中输入所要的菜单数据。单数据。 见下图。见下图。787.2.4 菜单和对话框菜单和对话框 797.2.4 菜单和对话框菜单和对话框 (2) 主要属性主要属性name: 菜单或菜单项名。菜单或菜单项名。text：菜单显示的文本。字母前有表示该字母是：菜单显示的文本。字母前有表示该字母是热键，热键，“-”显示菜单项分割线。显示菜单项分割线。shortcut：快捷键。：快捷键。checked：文本前有：文本前有“”，表示被选中。，表示被选中。(3) 菜单项事件菜单项事件: 主要是主要是click事件事件807.2.

55、4 菜单和对话框菜单和对话框 (4) 弹出菜单弹出菜单设计方法类似设计方法类似mainmenu。为某个对象的为某个对象的contextmenu属性指定快捷菜单属性指定快捷菜单contextmenu 1。当鼠标移到对象上，按鼠标右键打。当鼠标移到对象上，按鼠标右键打开此菜单。开此菜单。81. 输入和显示对话框输入和显示对话框7.2.4 菜单和对话框菜单和对话框 输入和输出对话框不是控件，是由系统提供的函数输入和输出对话框不是控件，是由系统提供的函数实现。实现。(1) inputbox输入函数输入函数： inputbox(提示提示,标题标题,默认值默认值,xpos,ypos ) 函数返回用户输入的

56、值，函数值类型是字符串。函数返回用户输入的值，函数值类型是字符串。82提示提示默认值默认值标题标题x,y坐标坐标取消，则返回长度为取消，则返回长度为0的字符串的字符串7.2.4 菜单和对话框菜单和对话框 inputbox对话框对话框83例如：例如：dim an as string, gz as decimal =0an=inputbox(“请输入工资请输入工资:”,“计算工资计算工资”,0)if an.trim.length0 then gz=cdec(an) textbox1.text=gzend if注：注： inputboxinputbox函数值是字符串型，上例中系统会函数值是字符串型，

57、上例中系统会将字符串型强制转换为将字符串型强制转换为decimal.decimal.7.2.4 菜单和对话框菜单和对话框 84(2) msgbox输出函数输出函数功能功能：打开一个信息窗口，等待用户选择一个按打开一个信息窗口，等待用户选择一个按钮钮。函数返回值是一个整数，不同整数代表用户。函数返回值是一个整数，不同整数代表用户按了不同按钮。按了不同按钮。 若不需要返回值，可作为一个独立的语句使用。若不需要返回值，可作为一个独立的语句使用。 格式：格式： msgbox(“提示提示”，按钮，按钮，“标题标题”) messagebox.show(“提示提示”, “标题标题”, 按钮按钮)7.2.4

58、菜单和对话框菜单和对话框 85msgbox(“提示提示”，按钮，按钮，“标题标题”)例例：msgbox(“真的要删除吗真的要删除吗?”, msgboxstyle.yesno + msgboxstyle.question , “信息提示信息提示”)或或 msgbox(“真的要删除吗真的要删除吗?”, 4+32 , “信息提示信息提示”)7.2.4 菜单和对话框菜单和对话框 86分组分组枚举值枚举值按钮值按钮值对话框中心是的按钮对话框中心是的按钮按钮按钮个数个数okonly0“确定确定” okcancel1“确定确定”、“取消取消”abortretryignore2“终止终止”、“重试重试”、“忽

59、忽略略”yesnocancel3“是是”、“否否”、“取消取消”yesno4“是是”、“否否”retrycancel5“重试重试”、 “取消取消”图标图标类型类型critical16关键信息图标关键信息图标question32问号图标问号图标exclamation48警告图标警告图标 information64信息图标信息图标按钮设置值及其意义按钮设置值及其意义7.2.4 菜单和对话框菜单和对话框 87枚举值枚举值内部常数内部常数返回值返回值被单击的按钮按钮被单击的按钮按钮okvbok1“确定确定” cancelvbcancel2“取消取消”abortvbabort3“终止终止”retryvb

60、retry4“重试重试”ignorevbignore5 “忽略忽略”yesvbyes6“是是”novbno7“否否”函数返回与所选按钮的关系函数返回与所选按钮的关系7.2.4 菜单和对话框菜单和对话框 88例例7.8编写一个账号和密码输入检查程序。编写一个账号和密码输入检查程序。p186msgbox(密码错误密码错误, msgboxstyle.retrycancel + msgboxstyle.exclamation, 警告警告)7.2.4 菜单和对话框菜单和对话框 89. 通用对话框通用对话框 通用对话框控件包括：通用对话框控件包括： 打开文件对话框打开文件对话框(openfiledialog) 保