第7部分VBNET程序设计方案基础ppt课件

1、 数据库技术及应用数据库技术及应用DB第第7章章 VB.NET程序设计根底程序设计根底本章主要内容：本章主要内容： 引见引见VB.NET的集成开发环境；的集成开发环境； 常用控件常用控件(主要属性主要属性,方法和事件方法和事件)的运用；的运用； VB.NET程序设计的根底知识数据类型、程序设计的根底知识数据类型、 表达式、程序控制构造等。重点表达式、程序控制构造等。重点 7.1 VB.NET根本概念根本概念7.1.1 VB.NET简介简介.NET开发平台：如下图。开发平台：如下图。7.1.1 VB.NET简介简介VS .NET开发平台开发平台中间言语程序中间言语程序(EXE)在不同的在不同的C

2、PU上运转上运转根底类库根底类库CLR第第1次编译次编译第第2次编译次编译VS.NETVB.NET VC+.NETVC#.NET VJ#.NETWindows运用程序运用程序ASP.NET程序程序数据和数据和XML类类(ADO.NET,SQL,XML,XSLT etc.)7.1.1 VB.NET简介简介1. .NET开发平台的特点开发平台的特点支持多种言语编程环境。支持多种言语编程环境。VS.NET是一个是一个集成开发环境，集成集成开发环境，集成VB、VC、C#、J#。 允许它们共享工具并有助于创建混合言语允许它们共享工具并有助于创建混合言语处理方案。处理方案。可以开发多种运用程序。如可以开发

3、多种运用程序。如Windows运用运用程序、程序、ASP Web 运用程序、运用程序、XML Web services、挪动、挪动(Mobile)运用程序等等运用程序等等 。7.1.1 VS.NET简介简介运用同一个根底类库。在传统的言语编程运用同一个根底类库。在传统的言语编程环境中，不同的言语有不同的函数库，而环境中，不同的言语有不同的函数库，而且调用方式也不同，不同言语的函数库是且调用方式也不同，不同言语的函数库是不能通用的。在不能通用的。在VS.NET中，大家运用同中，大家运用同一个根底类库。一个根底类库。7.1.1 VS.NET简介简介 公共言语运转时库。公共言语运转时库。 运转时库提

4、供了执行程序的效力，实现了运转时库提供了执行程序的效力，实现了编程言语的一致。编程言语的一致。 .NET程序需求程序需求2次编译才干在次编译才干在CPU上运转。上运转。首先编译生成与首先编译生成与CPU无关的中间言语，然无关的中间言语，然后在公共言语运转时库后在公共言语运转时库(CLR)的支持下，的支持下，中间言语程序被编译本钱地中间言语程序被编译本钱地CPU指令程序。指令程序。实现了实现了.NET跨平台运转的目的。跨平台运转的目的。2. VS.NET和和.NET框架框架.NET框架是与框架是与VS.NET严密相联严密相联, VS.NET依依赖于赖于.NET框架提供的效力。框架提供的效力。7.

5、1.1 VS.NET简介简介. VS.NET和和.NET框架的关系如以下图所示。框架的关系如以下图所示。调用调用.NET框架效力框架效力调用编译器的效力调用编译器的效力运转时调试支持运转时调试支持工具窗口工具窗口代码编辑器代码编辑器可视化设计器可视化设计器集成开发环境集成开发环境VS.NET公共类型系统公共类型系统公共言语规范公共言语规范Just In Time编译器编译器执行管理执行管理.NET框架类库框架类库公共言语运转库公共言语运转库第方言语第方言语+C#VB.NETVJ#编译器编译器.NET框架框架. VB.NET和和VS.NETVB.NET是是VS.NET支持的多种言语之一。是微软支

6、持的多种言语之一。是微软推出的第个基于推出的第个基于.NET框架的开发工具，是完全框架的开发工具，是完全面向对象的编程言语，支持承继、重载、构造等面向对象的编程言语，支持承继、重载、构造等面向对象方法。面向对象方法。7.1.1 VS.NET简介简介7.1.2 VB.NET集成开发环境集成开发环境进入进入VB.NET主要窗口引见主要窗口引见VB.NET主窗口主窗口 窗体设计器窗窗体设计器窗口口代码设计代码设计 属性窗口属性窗口处理方案资源管理器窗口处理方案资源管理器窗口工具箱窗口工具箱窗口 其它窗口在其它窗口在“视图菜单中选择视图菜单中选择一个运用程序由工程构成，一个工程对应一个工程一个运用程序

7、由工程构成，一个工程对应一个工程文件夹，其中包括工程涉及的一切文件。文件夹，其中包括工程涉及的一切文件。7.1.3 建立简单的运用程序建立简单的运用程序本节我们经过本节我们经过2个简单例子阐明完好个简单例子阐明完好VB.NET运用程序的建立过程。运用程序的建立过程。建立一个运用程序分以下几步进展建立一个运用程序分以下几步进展: 建立用户界面的各个对象建立用户界面的各个对象; 对象属性的可视化设置对象属性的可视化设置; 对象事件过程编码对象事件过程编码; 保管、调试和运转程序。保管、调试和运转程序。7.1.3 建立简单的运用程序建立简单的运用程序例例7.1 界面见下页图所示。界面见下页图所示。7

8、.1.3 建立简单的运用程序建立简单的运用程序例例7.2 界面见下页。经过按钮操作让界面见下页。经过按钮操作让“欢欢迎运用迎运用VB.NET在窗口中挪动。步骤：在窗口中挪动。步骤：设计用户界面并设置控件属性设计用户界面并设置控件属性编写事件过程编写事件过程7.1.3 建立简单的运用程序建立简单的运用程序 Private Sub Timer1_Tick(ByVal sender , ByVal e As ) If Label1.Left Me.Width Then Label1.Left = -200 Else Label1.Left = Label1.Left + 8 End If End S

9、ub Private Sub Button2_Click( ) . 手动挪动手动挪动 Timer1.Enabled = False Timer1_Tick(sender, e) 调用一次调用一次Timer1_Tick End Sub Private Sub Button1_Click( ) . 自动挪动自动挪动 Timer1.Enabled = TrueEnd Sub7.1.4 如何运用协助系统如何运用协助系统 VS.NET中联机协助系统是基于中联机协助系统是基于MSDN library。VS.NET的的MSDN library可以随可以随其安装时一同安装，也可以以后安装。其安装时一同安装，也

10、可以以后安装。 协助有下面常用的四种方式。协助有下面常用的四种方式。 1. 动态协助动态协助 动态协助跟踪用户的动作，并自动地显示动态协助跟踪用户的动作，并自动地显示一系列协助主题。选择一系列协助主题。选择“协助协助/动态协助动态协助菜单项，翻开动态协助窗口。菜单项，翻开动态协助窗口。 鼠标指向哪，协助就到哪！鼠标指向哪，协助就到哪！7.1.4 如何运用协助系统如何运用协助系统2. 索引索引选择选择“协助协助/索引菜单项，翻开索引协助索引菜单项，翻开索引协助窗口。窗口。7.1.4 如何运用协助系统如何运用协助系统3. 运用上下文相关协助运用上下文相关协助按按“F1键运用上下文相关协助。它可以键

11、运用上下文相关协助。它可以根据当前选定的内容直接定位协助内容。根据当前选定的内容直接定位协助内容。电脑操作演示电脑操作演示4. 网络资源网络资源可经过可经过Microsoft.con/China/msdn网址，获网址，获得最新、最及时的有关协助信息。得最新、最及时的有关协助信息。7.1.4 如何运用协助系统如何运用协助系统7.2 VB.NET可视界面设计可视界面设计本节主要分以下几方面内容：本节主要分以下几方面内容：面向对象设计的根本概念。面向对象设计的根本概念。引见假设干常用控件的运用。引见假设干常用控件的运用。7.2 .1 VB.NET对象概念对象概念1. 对象和类对象和类对象：是对客观世

12、界中的事物的笼统。用事对象：是对客观世界中的事物的笼统。用事物的特征物的特征(属性属性)和行为和行为(方法方法)来描画。来描画。例如例如:一个人一个人,一扇窗口一扇窗口,一个按钮等都是对象。一个按钮等都是对象。对象是面向对象编程的根本元素对象是面向对象编程的根本元素. 类：是对一组类似对象的笼统描画，这些类：是对一组类似对象的笼统描画，这些对象具有一样种类的属性和方法。对象具有一样种类的属性和方法。 类与对象的关系：类是笼统的，对象是详类与对象的关系：类是笼统的，对象是详细的。类是对象的笼统，对象是类的实例。细的。类是对象的笼统，对象是类的实例。类是创建对象实例的模板。类是创建对象实例的模板。

13、 例如：例如：“桥梁是笼统的类，那么详细的桥梁是笼统的类，那么详细的桥梁，如杨浦大桥、南京长江大桥等那么桥梁，如杨浦大桥、南京长江大桥等那么是对象。是对象。 7.2 .1 VB.NET对象概念对象概念 在在VB.NETVB.NET中，工具箱中的各种图标就是系中，工具箱中的各种图标就是系统设计好的规范控件类。统设计好的规范控件类。 当我们把所要的控件从工具箱中拿到窗当我们把所要的控件从工具箱中拿到窗体中时，就是创建了这个控件类的一个对体中时，就是创建了这个控件类的一个对象。该对象承继了类的一切属性和方法，象。该对象承继了类的一切属性和方法，当然用户可根据需求修正属性的值。当然用户可根据需求修正属

14、性的值。7.2 .1 VB.NET对象概念对象概念2. 2. 对象的属性、事件和方法对象的属性、事件和方法VB.NETVB.NET的控件对象具有本人的属性、方法和的控件对象具有本人的属性、方法和事件。事件。(1)(1)属性属性: : 标识了对象的特征。标识了对象的特征。例如例如: :一个按钮对象一个按钮对象, ,有属性有属性: :字体字体(Font)(Font)、前景颜色、前景颜色(Forecolor)(Forecolor)、背景、背景颜色颜色(Backcolor)(Backcolor)、文本、文本(Text)(Text)、能否可、能否可操作操作(Enabled)(Enabled)等等。等等。

15、7.2 .1 VB.NET对象概念对象概念(2)(2)方法方法: : 附属于对象的行为和动作。附属于对象的行为和动作。 例如例如: :一个一个“窗体窗体(form)(form)对象，方法有：对象，方法有： Add(Add(往窗体中参与控件对象往窗体中参与控件对象) )、Close(Close(窗窗口封锁口封锁) )等等。等等。 “ “方法是指使对象行动的命令，它是经过方法是指使对象行动的命令，它是经过调用来运用的。调用来运用的。 对象方法的调用格式：对象方法的调用格式： 对象名对象名. .方法方法(参数参数)例如：例如：Textbox1.Focus() Textbox1Textbox1.Foc

16、us() Textbox1获得焦获得焦点点7.2 .1 VB.NET对象概念对象概念(3)(3)事件事件事件即发生的事情。是指对象可以识别和呼事件即发生的事情。是指对象可以识别和呼应的操作。事件是触发执行的。应的操作。事件是触发执行的。如：单击鼠标左键如：单击鼠标左键(Click),(Click),双击鼠标左键双击鼠标左键(DoubleClick)(DoubleClick)等等. .事件可以由用户操作触发事件可以由用户操作触发, ,也可以由系统自动也可以由系统自动触发触发( (例如例如, ,出错出错).).当事件发生之后当事件发生之后, ,需求需求触发一些操作触发一些操作, ,这就需求用户编写

17、相应的这就需求用户编写相应的代码对此进展呼应。这些代码就构成了代码对此进展呼应。这些代码就构成了“事件过程。事件过程。7.2 .1 VB.NET对象概念对象概念VB.NET是采用事件驱动程序设计方法。是采用事件驱动程序设计方法。程序执行后系统等待某个事件的发生，程序执行后系统等待某个事件的发生，然后去执行处置此事件的事件过程，待然后去执行处置此事件的事件过程，待事件过程执行完后，系统又处于等待某事件过程执行完后，系统又处于等待某事件发生形状，这就是事件驱动程序设事件发生形状，这就是事件驱动程序设计方法。计方法。7.2 .1 VB.NET对象概念对象概念对象、事件和事件过程之间的关系如以下图。对

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

19、件对象的位置)： 控件左上角相对容器的位置，由一对整数控件左上角相对容器的位置，由一对整数表示，单位为像素。表示，单位为像素。 可以用可以用left和和top表示表示 例如：例如：button1.location=new point(88,48)注：注：New表示创建一个新的表示创建一个新的point类的对象。类的对象。等价于：等价于： button1.left=88, button1=48 7.2.1 VB.NET对象概念对象概念8848(4) size(控件对象的大小控件对象的大小)： 也由一对整数表示，单位为像素。也由一对整数表示，单位为像素。 可可以用以用width和和height表示

20、表示 例如：例如：button1.Size=new Size(80,32)等价于：等价于： button1.width=80 button1.height=32 7.2.2 窗体和常用控件窗体和常用控件 8032Point, size, colorPoint, size, color都是构造都是构造(5) font(字体字体)：设置对象显示文字的字体。：设置对象显示文字的字体。 Label1.Font=New Font(“隶书隶书, 14)(6) ForeColor、BackColor(前景颜色和背景颜前景颜色和背景颜色色):设置对象显示文字的颜色和背景颜色设置对象显示文字的颜色和背景颜色 L

21、abel1. ForeColor=Color.Blue(7) Cursor(光标光标)：给出鼠标位于对象上时显：给出鼠标位于对象上时显示的光标。示的光标。 Button1.Cursor=new Cursor(“光标文件名光标文件名)7.2.2 窗体和常用控件窗体和常用控件 (8) Enabled:设置对象能否可操作设置对象能否可操作true或或false。(9) Visible：设置对象能否可见：设置对象能否可见true或或false。(10) TabIndex:决议程序运转时，按决议程序运转时，按Tab键，键，焦点在控件挪动的顺序。焦点在控件挪动的顺序。7.2.2 窗体和常用控件窗体和常用控

22、件 窗体对象就是窗体对象就是Form对象。对象。主要属性：主要属性：ControlBox(窗体控制框窗体控制框true或或false)、BackgroundImage(背景图片背景图片)7.2.2 窗体窗体WindowsState：设置程序运转时：设置程序运转时, 窗体是正窗体是正 常常(Normal)、最大化、最小化、最大化、最小化MaximizeBox(最大化按钮要否？默许最大化按钮要否？默许true)MinimizeBox (最小化按钮要否？默许最小化按钮要否？默许true)2. 常用事件：常用事件：Load事件事件:当窗体被装入任务区时触发。普当窗体被装入任务区时触发。普通该事件代码中

23、，对变量或对象的属性通该事件代码中，对变量或对象的属性设初值。设初值。Click(单击鼠标事件单击鼠标事件)、DblClick(双击鼠标事件双击鼠标事件)、Activated(窗口被激活时触发窗口被激活时触发)7.2.2 窗体和常用控件窗体和常用控件 例例7.2：见：见P172。7.2.2 窗体和常用控件窗体和常用控件 单击窗体双击窗体7.2.2 窗体和常用控件窗体和常用控件 Private Sub Form1_Load() Me.FormBorderStyle = FormBorderStyle.Fixed3D Me.Text = 例例7.3 Me.MaximizeBox = False M

24、e.MinimizeBox = False Me.BackgroundImage = nothing 去掉背景图片去掉背景图片End Sub Private Sub form1_Click() Me.Text = 单击窗体单击窗体 Me.BackgroundImage = _ Image.FromFile(“tongji2.jpg) Me.WindowState = _ FormWindowState.MaximizedEnd Sub 7.2.2 窗体和常用控件窗体和常用控件 Private Sub form1_DoubleClick() Me.Text = “双击窗体双击窗体 Me.Wind

25、owState = _ FormWindowState.Normal Me.Size = New Size(264, 256) Me.BackgroundImage = _Image.FromFile(“tongji1.gif)End Sub7.2.2 窗体和常用控件窗体和常用控件 3. 常用方法常用方法 Show(显示显示)、 Hide(隐藏隐藏)、 ShowDialog (以对话框方式显示窗体，即以对话框方式显示窗体，即控制用户只能对该窗体操作，对窗体之控制用户只能对该窗体操作，对窗体之外的东西无法操作，直到用户封锁该窗外的东西无法操作，直到用户封锁该窗体体)。7.2.2 窗体和常用控件窗

26、体和常用控件 4. 多重窗体多重窗体 对于较复杂运用程序，往往需求多个窗对于较复杂运用程序，往往需求多个窗体来实现。在多重窗体中，每个窗体可体来实现。在多重窗体中，每个窗体可以有本人的界面和程序代码，完成各自以有本人的界面和程序代码，完成各自的功能。的功能。7.2.2 窗体和常用控件窗体和常用控件 VB.NETVB.NET创建的窗体是类，必需经过创建的窗体是类，必需经过NewNew实例实例化为对象。化为对象。添加窗体添加窗体 选择选择“工程工程/添加添加Windows窗体命令窗体命令.在对话框中选择在对话框中选择“Windows窗体即可窗体即可.启动窗体的设置启动窗体的设置 系统默许系统默许f

27、orm1为程序运转时的启动窗为程序运转时的启动窗体，可以修正设置，将其他窗体如体，可以修正设置，将其他窗体如form2设置为启动窗体。设置为启动窗体。7.2.2 窗体和常用控件窗体和常用控件 7.2.2 窗体和常用控件窗体和常用控件 (2) 窗体实例化和显示窗体实例化和显示 在多重窗体程序中在多重窗体程序中,只需启动窗体只需启动窗体(假定为假定为Form1)的实例化是的实例化是vb自动完成的自动完成的. 其他一切窗体都是经过代码实例化并显示其他一切窗体都是经过代码实例化并显示的的. 例如显示窗体例如显示窗体form2要运用以下语句要运用以下语句: dim f2 as new form2 定义定

28、义f2为类为类form2的对象的对象 f2.show( ) 或或 f2.showDialog()(3). 不同窗体间数据的访问不同窗体间数据的访问两个窗体之间数据的访问有以下两个窗体之间数据的访问有以下2种方式种方式. a. 窗体实例化后，窗体数据的互访窗体实例化后，窗体数据的互访 窗体窗体form1访问窗体访问窗体form2上的数据上的数据. Form1中代码方式如下中代码方式如下: 7.2.2 窗体和常用控件窗体和常用控件 Dim frm2 as new from2 Frm2.showdialog() 显示窗体显示窗体frm2 me.textbox1.text=frm2.textbox1.

29、text留意写法留意写法: 不能写为不能写为form27.2.2 窗体和常用控件窗体和常用控件 窗体窗体form2访问窗体访问窗体form1上的数据上的数据. Form2中某事件代码方式如下中某事件代码方式如下: Dim frm1 as new from1 me.textbox1.text=frm1.textbox1.text Frm1.show() 显示窗体显示窗体frm1Form2中中, text1box1.text=form1.textbox.text错误错误b. 经过在模块中定义公共变量实现相互访问经过在模块中定义公共变量实现相互访问.如：建立一个模块如：建立一个模块Module1。在

30、其中定义公共。在其中定义公共变量：变量： Public x as Imteger7.2.2 窗体和常用控件窗体和常用控件 例例7.3(P175)：多重窗体运用：多重窗体运用例如。例如。 标签控件用于显示文本信息，不能输入文标签控件用于显示文本信息，不能输入文本信息输入用文本框。本信息输入用文本框。 1. label标签控件标签控件(1) (1) 主要属性主要属性NameName、texttext、 locationlocation、forecolorforecolor、size size 、backcolor backcolor 、visible visible 、Font(Font(字体字体

31、) )、BorderStyle(BorderStyle(边框风格边框风格) ) 、7.2.3 常用控件常用控件 (2) (2) 主要事件主要事件ClickClick、DoubleClickDoubleClick、ChangeChange改动改动Contextmenu(快捷菜单快捷菜单),TextAlign(文字在标签中的对齐方式文字在标签中的对齐方式)、 image(背景图片背景图片)、AutoSize(自动大小自动大小)7.2.3 常用控件常用控件 文本框是一个文本编辑框，用户可以在该文本框是一个文本编辑框，用户可以在该框中输入、编辑、修正和显示文本内容。框中输入、编辑、修正和显示文本内容。

32、 2. TextBox文本框文本框(1) (1) 主要属性主要属性NameName、locationlocation、forecolorforecolor、size size 、backcolor backcolor 、visible visible 、 Font(Font(字体字体) )、BorderStyle(BorderStyle(边框风格边框风格) ) 其他属性见下页其他属性见下页7.2.3 常用控件常用控件 属性类型意义Text字符串框中编辑内容MaxLength整型允许输入最多字符数MultiLine逻辑允许多行输入否，falseScrollBars枚举选择滚动条,MultiLin

33、e为true时PassWordChar字符文本框用于输入口令时，显示的字符ReadOnly逻辑只读，FalseSelectionStart整型选定的正文开场的位置，第1个字符位置为0SelectionLength整型选定的正文长度SelectedText字符串选定的正文内容7.2.3 常用控件常用控件 (2) (2) 主要事件主要事件TextChanged:TextChanged:文本框中内容改动时触发文本框中内容改动时触发. . KeyPress/KeyDown KeyPress/KeyDown：当焦点在文本框上时，：当焦点在文本框上时，用户按了键时触发。用户按了键时触发。LostFocus

34、LostFocus：当文本框失去焦点时触发：当文本框失去焦点时触发. .Gotfocus: Gotfocus: 当文本框得到焦点时触发当文本框得到焦点时触发. .(3) (3) 主要方法主要方法Focus: Focus: 将光标移到文本框上将光标移到文本框上. . 例如例如: : TextBox1.Focus() TextBox1.Focus() 7.2.3 常用控件常用控件 7.2.2 窗体和常用控件窗体和常用控件 例如例如: :Sub textbox1_keypress(,ByVal e )Sub textbox1_keypress(,ByVal e ) If asc(e.keychar)

35、=13 then If asc(e.keychar)=13 then endif endifEnd SubEnd Sub或或 If e.keychar=chr(13) then .3. Button命令按钮命令按钮(1) (1) 主要属性主要属性NameName、texttext、 locationlocation、forecolorforecolor、size size 、backcolor backcolor 、visible visible 、Font(Font(字体字体) )、EnabledEnabled、BorderStyle(BorderStyle(边框风格边框风格) )、 Tex

36、tAlignTextAlign image( image(图片图片, , 建图形按钮时用建图形按钮时用) )、7.2.3 常用控件常用控件 例例7.4 按钮运用。界面、功能如以下图所示。按钮运用。界面、功能如以下图所示。TextBox1.Font = New Font(隶书隶书, 16, FontStyle.Italic)7.2.2 窗体和常用控件窗体和常用控件 演示演示搜集搜集3 3个图片，个图片，存放在工程的存放在工程的binbin文件夹下。文件夹下。4. 单项选择按钮、复选框和分组框单项选择按钮、复选框和分组框 单项选择按钮单项选择按钮(RadioButton) 与复选框与复选框(Che

37、kBox)的区别：的区别： 单项选择按钮任何时候最多只能选择一项单项选择按钮任何时候最多只能选择一项, 普通利用普通利用Panel(面板面板)或或GroupBox(分组分组框框)将一样性质按钮归类在一组；复选框将一样性质按钮归类在一组；复选框列出多项，用户可从中选择一项或多项。列出多项，用户可从中选择一项或多项。见下页图所示。见下页图所示。7.2.2 窗体和常用控件窗体和常用控件 7.2.2 窗体和常用控件窗体和常用控件 单项选择按钮复选框(1) (1) 主要属性主要属性 NameName、Font(Font(字体字体) )、forecolorforecolor、 visible visibl

38、e 、EnabledEnabled、 texttext、 Checked: Checked: 逻辑值，表示单项选择按钮或复逻辑值，表示单项选择按钮或复选框选中否。选框选中否。(2) (2) 主要事件主要事件 ClickClick、 CheckedChanged(CheckedChanged(对象值改动时触对象值改动时触发发) )7.2.3 常用控件常用控件 Panel(面板面板)与与GroupBox(分组框分组框) 都是用于都是用于将一样性质的对象归类。当我们挪动分组将一样性质的对象归类。当我们挪动分组框或面板时，其中的对象也会跟着挪动。框或面板时，其中的对象也会跟着挪动。分组框的主要属性：分

39、组框的主要属性： text, BackgroundImage , font面板的主要属性面板的主要属性: BorderStyle , BackColor, BackgroundImage7.2.3 常用控件常用控件 5. 列表框和组合框列表框和组合框 列表框列表框(ListBox)：在框中提供假设干选项供用户选：在框中提供假设干选项供用户选择。只允许用户选择，不能输入。择。只允许用户选择，不能输入。 组合框组合框(ComboBox)：由文本框和下拉列表框组合：由文本框和下拉列表框组合而成。用户即可以在文本框中输入又可在下拉列表而成。用户即可以在文本框中输入又可在下拉列表中选择。中选择。7.2.

40、3 常用控件常用控件 列表框组合框(1) 主要属性主要属性Items: 集合。存储列表框或组合框中的一切集合。存储列表框或组合框中的一切选项。选项。SelectedIndex: 整型。程序运转时被选定的整型。程序运转时被选定的项的序号。第项的序号。第1项的序号为项的序号为0。SelectedItem:字符。被选定的项的内容。字符。被选定的项的内容。Text：用户输入或选择的值。：用户输入或选择的值。 Items.Count: 整型。程序中援用，值为列表整型。程序中援用，值为列表框或组合框中的项数。框或组合框中的项数。Sorted:逻辑。列表框或组合框的选项能否按逻辑。列表框或组合框的选项能否按

41、字母表顺序排序字母表顺序排序.7.2.3 常用控件常用控件 DropDownStyle: 设置组合框外观和功能。设置组合框外观和功能。当当ComboBox1.DropDownStyle= ComboBoxStyle. DropDownList时时组合框只能经过选择得到文本。组合框只能经过选择得到文本。当当ComboBox1.DropDownStyle= ComboBoxStyle. DropDown时时组合框即可经过输入又可选择得到文本。组合框即可经过输入又可选择得到文本。 组合框专有属性：组合框专有属性：7.2.3 常用控件常用控件 当当ComboBox1.DropDownStyle= Co

42、mboBoxStyle. Simple时时组合框即可输入也可选择得到文本。但外观有改动。组合框即可输入也可选择得到文本。但外观有改动。下拉列表将不折起。如以下图所示。下拉列表将不折起。如以下图所示。7.2.3 常用控件常用控件 Simple(2) 常用方法常用方法Items.Add: 把一个选项参与到列表框或组合框。把一个选项参与到列表框或组合框。 Listbox1.items.Add(“computer)Items.Remove : 从列表框或组合框中删除指定从列表框或组合框中删除指定的选项。的选项。Listbox1.items.remove(“computer)Items.RemoveAt

43、(Index):删除列表框或组合框删除列表框或组合框中指定位置上的选项。中指定位置上的选项。 Listbox1.items.removeAt(1)Items.Clear:去除列表框或组合框中的一切选项。去除列表框或组合框中的一切选项。7.2.3 常用控件常用控件 (3) 常用事件常用事件Click、DoubleClick、SelectedIndexChanged(SelectedIndex属性值属性值改动后触发改动后触发)例例7.5 列表框控件程序。界面如图。列表框控件程序。界面如图。7.2.3 常用控件常用控件 6. 滚动条和进度条滚动条和进度条 滚动条滚动条(ScrollBar)：通常附在

44、窗体上协助：通常附在窗体上协助察看数据或确定位置，也可用来作为数据察看数据或确定位置，也可用来作为数据的输入工具。的输入工具。 滚动条有垂直滚动条滚动条有垂直滚动条(VScrollBar)和程度和程度滚动条滚动条(HScrollBar) 2种。种。 进度条进度条(ProgressBar)：通常指示事务处置：通常指示事务处置的进度。的进度。7.2.3 常用控件常用控件 (1) 主要属性主要属性Value:滑块当前位置所代表的值，缺省值为滑块当前位置所代表的值，缺省值为0。Minimun、Maximun :滚动条可以调整的最滚动条可以调整的最小值和最大值。小值和最大值。SmallChange:滚动

45、条两端的箭头为微调箭头，滚动条两端的箭头为微调箭头，用户单击微调箭头时，用户单击微调箭头时，Value属性添加或属性添加或减少的值。减少的值。(相当于步长相当于步长)LargeChange:按下中间快卷区域时的挪动量。按下中间快卷区域时的挪动量。7.2.3 常用控件常用控件 (2) 主要事件主要事件Scroll、ValueChange:当滚动条内滑块位置当滚动条内滑块位置发生变化时，发生变化时，ValueChange的值随之改动的值随之改动时，触发这两个事件。时，触发这两个事件。例例滚动条程序。三个滚动条分别控制滚动条程序。三个滚动条分别控制PictureBox1的背景颜色的背景颜色red、g

46、reen、 Blue。Minimun=0, maximun=255, largechange=10,SmallChange=1 . 见以下图。见以下图。7.2.2 窗体和常用控件窗体和常用控件 Private Sub HScrollBar1_Scroll()PictureBox1.BackColor = Color.FromArgb(HScrollBar1.Value, HScrollBar2.Value, HScrollBar3.Value)End Sub7.2.3 常用控件常用控件 7. 定时器定时器 Timer(1) 主要属性主要属性Enabled: 为为false 时，定时器不起作用。

47、时，定时器不起作用。Interval: 两次触发两次触发tick事件的时间间隔。其事件的时间间隔。其值以值以ms0.001s为单位。即为单位。即1000为为1秒。秒。(2) 主要事件主要事件Tick: 时间间隔一到触发该事件。时间间隔一到触发该事件。7.2.3 常用控件常用控件 例例7.6 ：用定时器控制蝴蝶在窗体内飞舞。：用定时器控制蝴蝶在窗体内飞舞。 窗体中放三个窗体中放三个PictureBox控件。设计时，只控件。设计时，只需需PictureBox1的的visible=true。经过定时器。经过定时器控制在控制在PictureBox1中装入中装入PictureBox2 和和Picture

48、Box3的图像来实现。的图像来实现。7.2.2 窗体和常用控件窗体和常用控件 7.2.2 窗体和常用控件窗体和常用控件 事先搜集事先搜集2 2个不同蝴蝶图片，存放在工程的个不同蝴蝶图片，存放在工程的binbin文件夹下。文件夹下。8、日期挑选控件、日期挑选控件 DateTimePicker控件控件: 用户不想输入日期或时用户不想输入日期或时间，可以经过该控件选择一个日期时间。间，可以经过该控件选择一个日期时间。7.2.3 常用控件常用控件 (1) 主要属性：主要属性： Value: 对象的当前值。对象的当前值。Format：显示日期的格式。：显示日期的格式。 Long(2019年年2月月25日

49、日) short(2019/2/25) time(仅显示时间仅显示时间) custom(用户所给格式用户所给格式)ShowUpDown：控制显示的款式：控制显示的款式 Flase/trueFlaseTrue7.2.3 常用控件常用控件 例例7.7 程序界面如下图。程序界面如下图。Private Sub DateTimePicker1_ValueChanged () MessageBox.Show( DateTimePicker1.Value.date.ToStringEnd Sub7.2.3 常用控件常用控件 RichTextBox控件用于显示、输入和操作格式化的控件用于显示、输入和操作格式化

50、的文本。控件除了做文本。控件除了做 TextBox 控件所做的每件事控件所做的每件事外，还可以显示字体、颜色和链接，从文件加外，还可以显示字体、颜色和链接，从文件加载文本和加载嵌入的图像，以及查找指定的字载文本和加载嵌入的图像，以及查找指定的字符符(find方法方法)。RichTextBox 控件通常用于提供控件通常用于提供类似字处置运用程序如类似字处置运用程序如 Microsoft Word的的文本操作和显示功能。文本操作和显示功能。7.2.3 常用控件常用控件 9. RichTextBox控件控件RichTextBox没有没有PasswordChar属性，但比属性，但比TextBox功能强

51、大，主要有：功能强大，主要有：(1) 文本的长度没有文本的长度没有64k限制；限制；(2) 可对选中的文本设置格式，如可对选中的文本设置格式，如SelectionBackColor、SelectionColor、SelectionFont等等(3) 可方便用可方便用LoadFile和和SaveFile直接读写文件。直接读写文件。7.2.3 常用控件常用控件 7.2.3 常用控件常用控件 RichTextBox常用的常用的2个方法：个方法： SaveFile: 将将RichTextBox 控件中内容保管控件中内容保管到文件中到文件中 LoadFile:将文件内容加载到将文件内容加载到 RichT

52、extBox 控件中控件中 用法：用法：RichTextBox1. LoadFile(途径文件途径文件名名,流类型流类型) RichTextBox1. SaveFile(途径文件途径文件名名,流类型流类型) 功能：将功能：将 RTF 格式文件或规范格式文件或规范 ASCII 文文本文件加载到本文件加载到RichTextBox 控件中控件中(或或 反之反之)。7.2.3 常用控件常用控件 If OpenFileDialog1.ShowDialog() = DialogResult.OK Then RichTextBox1.LoadFile(OpenFileDialog1.FileName, Ri

53、chTextBoxStreamType.PlainText ) End If If SaveFileDialog1.ShowDialog() = DialogResult.OK Then RichTextBox1.SaveFile(SaveFileDialog1.FileName,RichTextBoxStreamType.PlainText) End If 途径和文件名途径和文件名. 菜单设计菜单设计 有种方式的菜单：有种方式的菜单：MainMenu主菜单和主菜单和ContextMenu弹出式菜单，或称快捷菜单。弹出式菜单，或称快捷菜单。7.2.4 菜单和对话框菜单和对话框 (1) 菜单建立

54、：菜单建立：选择工具箱中的选择工具箱中的“MainMenu控件，并在控件，并在窗口中拖曳出适宜的大小；窗口中拖曳出适宜的大小； 此时此时MainMenu对象出如今窗体外的区域对象出如今窗体外的区域直接在直接在“请在此处输入的虚框中输入所要请在此处输入的虚框中输入所要的菜单数据。的菜单数据。 见以下图。见以下图。7.2.4 菜单和对话框菜单和对话框 7.2.4 菜单和对话框菜单和对话框 (2) 主要属性主要属性Name: 菜单或菜单项名。菜单或菜单项名。Text：菜单显示的文本。字母前有表示该字母是：菜单显示的文本。字母前有表示该字母是热键，热键，“-显示菜单项分割线。显示菜单项分割线。Shor

55、tCut：快捷键。：快捷键。Checked：文本前有：文本前有“，表示被选中。，表示被选中。(3) 菜单项事件菜单项事件: 主要是主要是Click事件事件7.2.4 菜单和对话框菜单和对话框 (4) 弹出菜单弹出菜单设计方法类似设计方法类似Mainmenu。为某个对象的为某个对象的ContextMenu属性指定快捷菜单属性指定快捷菜单ContextMenu 1。当鼠标移到对象上，按鼠标右键翻。当鼠标移到对象上，按鼠标右键翻开此菜单。开此菜单。. 输入和显示对话框输入和显示对话框7.2.4 菜单和对话框菜单和对话框 输入和输出对话框不是控件，是由系统提供的函数输入和输出对话框不是控件，是由系统提

56、供的函数实现。实现。(1) InputBox输入函数：输入函数： InputBox(提示提示,标题标题,默许值默许值,Xpos,Ypos ) 函数前往用户输入的值，函数值类型是字符串。函数前往用户输入的值，函数值类型是字符串。提示提示默许值默许值标题标题X,Y坐标坐标取消，那么前往长度为取消，那么前往长度为0的字符的字符串串7.2.4 菜单和对话框菜单和对话框 InputBox对话框对话框例如：例如：Dim an as string, gz as Decimal =0an=InputBox(“请输入工资请输入工资:,“计算工资计算工资,0)If an.trim.length0 Then Gz=

57、CDec(an) Textbox1.text=gzEnd If注：注： InputBox函数值是字符串型，上例中系统会将函数值是字符串型，上例中系统会将字符串型强迫转换为字符串型强迫转换为Decimal.7.2.4 菜单和对话框菜单和对话框 (2) MsgBox输出函数输出函数功能：翻开一个信息窗口，等待用户选择一功能：翻开一个信息窗口，等待用户选择一个按钮。函数前往值是一个整数，不同整个按钮。函数前往值是一个整数，不同整数代表用户按了不同按钮。数代表用户按了不同按钮。 假设不需求前往值，可作为一个独立的语假设不需求前往值，可作为一个独立的语句运用。句运用。 格式：格式： MsgBox(“提示

58、，按钮，提示，按钮，“标题标题) Messagebox.Show(“提示提示, “标题标题, 按钮按钮)7.2.4 菜单和对话框菜单和对话框 MsgBox(“提示，按钮，提示，按钮，“标题标题)例：例：MsgBox(“真的要删除吗真的要删除吗?, MsgBoxStyle.YesNo + MsgBoxStyle.Question , “信息提示信息提示)或或 MsgBox(“真的要删除吗真的要删除吗?, 4+32 , “信息提示信息提示)7.2.4 菜单和对话框菜单和对话框 分组分组枚举值枚举值按钮值按钮值对话框中心是的按钮对话框中心是的按钮按钮按钮个数个数OkOnly0“确定确定” OkCan

59、cel1“确定确定”、“取消取消”AbortRetryIgnore2“终止终止”、“重试重试”、“忽忽略略”YesNoCancel3“是是”、“否否”、“取消取消”YesNo4“是是”、“否否”RetryCancel5“重试重试”、 “取消取消”图标图标类型类型Critical16关键信息图标关键信息图标Question32问号图标问号图标Exclamation48警告图标警告图标 Information64信息图标信息图标按钮设置值及其意义按钮设置值及其意义7.2.4 菜单和对话框菜单和对话框 枚举值枚举值内部常数内部常数返回值返回值被单击的按钮按钮被单击的按钮按钮OkvbOk1“确定确定”

60、 CancelvbCancel2“取消取消”AbortvbAbort3“终止终止”RetryvbRetry4“重试重试”IgnorevbIgnore5 “忽略忽略”YesvbYes6“是是”NovbNo7“否否”函数前往与所选按钮的关系函数前往与所选按钮的关系7.2.4 菜单和对话框菜单和对话框 例例7.8编写一个账号和密码输入检查程序。编写一个账号和密码输入检查程序。P186MsgBox(密码错误密码错误, MsgBoxStyle.RetryCancel + MsgBoxStyle.Exclamation, 警告警告)7.2.4 菜单和对话框菜单和对话框 . 通用对话框通用对话框 通用对话框