visual basic辅导讲义1-控件的属性方法

VisualBasic辅导讲义计算机与数学基础教学部：刘冰VB语言特点

提供可视化编程工具(界面设计)

面向对象的程序设计思想(窗体、控件,设备等)

事件驱动的编程机制(鼠标单击等)

结构化程序设计语言对象的属性\事件\方法对象对象是系统中的基本运行实体。包括窗体、控件、硬件设备等。

对象的三要素属性、事件和方法。属性：对象的特征方法：对象发出的动作事件：对象能响应的操作属性是对象的特征，不同的对象有不同的属性。属性设置：用属性窗口或者程序语句设置

Text1.text=“goodmorning!”Text1.text=Text1.text+”aa”Command1.Visible=false当对象为当前窗体时，可以省略对象名,也可用Me代替当前窗体。对象名.属性名称=设置的属性值Caption=“abc”Me.Backcolor=vbred对象方法:是一种特殊的过程或者函数，可以理解为对象自身发出的动作。由语句操作。

对象名.方法[操作内容]Form1.print100Form1.clsList1.Additem“沈阳”Form2.showPicture1.circle(200,200),100,vbred和属性设置类似，对象为窗体可以省略如print100cls事件:由VB预先设置好的、能够被对象识别的动作。事件过程（EventProcedure）响应事件后所执行的操作的一段程序代码。格式：

PrivateSub对象名称_事件名称（）

……

程序代码

……Endsub

对象的name属性VB预先定义好的赋予该对象的事件，不能由用户命名使用Call命令调用可以调用过程1、以下叙述中错误的是（）事件过程是响应特定事件的一段程序不同的对象可以具有相同名称的方法对象的方法是执行指定操作的过程对象事件的名称可以由编程者指定2、任何控件都有的属性是（）A)BackColorB)CaptionC)NameD)Text3、下列说法不正确的是（）A)对象的操作由对象的属性、事件和方法来描述B)VB是面向对象的程序设计，VB中只有窗体和控件两种对象C)属性是对象的特征，不同的对象有不同的属性D)对象事件在代码窗口中体现过程DCB4，以下叙述中，错误的是

A)在VisualBasic中，对象所能响应的事件是由系统定义的

B)对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定

C)VisualBasic中允许不同对象使用相同名称的方法

D)VisualBasic中的对象具有自己的属性和方法窗体及几个基本控件的使用

一、窗体的属性1.Name名称

所有对象都有，只能在属性窗口设置。对象引用标识。2.Caption标题：定义窗体标题，可将窗体标题改为所需名字格式：对象.Caption[=字符串]Form1.Caption=“四则运算器”3.

BackColor/

ForeColor背景色/前景色

Form1.ForeColor=vbred4.BorderStyle边框样式(文本框,标签,线条控件也有此属性)

0-None窗体无边框。

1-FixedSingle固定单边框。大小只能用最大化和最小化按钮改变

2-Sizable(默认）可调整的边框。大小可变，标准双线边界窗体(frm)所有控件的容器，桌面上的窗口，新建默认名为form1。5.FontName/FontSize/FontBold/FontItalic

类型，字符型。大小，整型。粗体/斜体，逻辑型。

Text3.FontName=“宋体”

Text3.FontSize=14Text3.FontItalic=trueText3.FontBold=NotText3.FontBold6.Visible（可见）

True：可见。False：不可见。7.Enabled(允许，可用）

对象.Enabled[=Boolen值]

true：激活，可用。False：禁止，不可用。

Text2.Enabled=False8.Height和Width高度、宽度设置和返回控件对象的高度和宽度，决定控件对象的大小。9.Top和Left顶边距、左边距Top和Left属性决定了控件对象在上层对象中的位置。单位为twip,缇1/1440英寸10.

MaxButton和MinButton（最大、最小按钮）属性

True：“最大化”、“最小化”按钮有效。

False：相应按钮无效。11.Picture（图形）窗体背景图片。程序代码中设置属性值，使用LoadPicture函数。

【例】Form1.Picture=LoadPicture(“c:\picture\lake.bmp”)

如果工程和图片在同一个文件夹，可以使用：

Form1.Picture=LoadPicture(“lake.bmp”)

当参数为空时，表示清除图片

Form1.Picture=LoadPicture()。

二、窗体事件Click事件单击窗体空白区域或一个无效控件时，调用Form_click()DblClick事件

双击时，调用Form_Dblclick()。Load（装入）事件在启动程序时对属性和变量进行初始化。载入窗体后，运行程序，自动触发该事件。不支持Print方法。Unload事件关闭窗体时触发该事件。

(综合应用题中很多题目用这个事件来记录答题结果)

多窗体（Multi-Form）1.多窗体的建立新建一个VB工程时，工程中只有一个窗体，名称为Form1。选择“工程｜添加窗体｜新建或现存”，添加一个新窗体默认名称为Form2提示：右击“工程资源管理器”空白区域，弹出菜单选择“添加｜添加窗体”。一个工程可以有多个窗体，启动窗体只有一个，窗体之间可以互相调用。２.移除窗体右击想要移除的窗体，在弹出菜单中选择“移除Form1”。窗体被移除出工程，但它并没有被删除，它仍保存在原来的文件夹里。3.设置启动窗体第一个窗体为默认启动窗体。改变：选择“工程｜属性｜通用｜启动对象｜确定”４.加载窗体Load方法只是把窗体加载到内存里，并不显示。格式：Load[对象名]’LoadForm25.显示窗体启动窗体自动显示，其他窗体用Show方法显示窗体。格式：[对象名].Show ‘Form1.Show说明：无模式窗体：可以对其他窗体操作[对象名].show0模式窗体：不可以对其他窗体操作[对象名].Show1

建立一个有3个窗体的程序，在第一个窗体上加入2个按钮，写代码form2.show0和form3.show1，看看效果6.Hide方法：隐藏窗体

格式：

[对象名].Hide

‘Form1.Hide说明：Hide方法只能隐藏窗体，不能卸载。如果调用Hide方法时该窗体还没有加载，Hide方法会自动加载该窗体但并不予以显示。7.卸载窗体：Unload方法格式：Unload[对象名]

’UnloadMe‘卸载当前窗体

功能：隐藏窗体同时将窗体从内存中卸载。SubMain过程

SubMain（启动过程）:多工程、多窗体应用程序，在显示多个窗体之前，需要进行初始化，既执行一个特定的过程，即启动过程。SubMain过程要在标准模块中建立。建立方法：选择“工程｜添加模块”命令，然后在“工程资源管理器”窗口中双击该标准模块的名称，进入代码编辑窗口，在该窗口中键入SubMain（）后按回车键，则在代码编辑窗口将自动产生该过程的开头和结束语句。SubMain过程的特点如下：每个工程中只能有一个SubMain过程。SubMain过程可以被设置为工程的启动对象。SubMain过程只能在标准模块中定义。控件窗体和控件是VB中的对象，共同构成用户的界面。VB的控件包括3类：标准控件（内部控件）：文本框、命令按钮等，出现在工具箱中ActiveX控件：VB控件箱的扩充部分，使用前必须添加到工具箱中。（只学习通用对话框）可插入对象：由其他应用程序创建的对象。控件值：

通常，使用“控件名.属性”设置控件属性值。如Text1.Text=“hello”VB为每个控件规定一个默认属性，在设置默认的属性时，不必给出属性名，把该属性称为控件的值。上例也可写作Text1=“hello”Label1=“abc”Option1=trueMe.Hscroll1=100常用标准控件文本控件：标签(label)：只能显示文本，不能编辑。文本框(text)：既可显示文本，又可输入文本。按钮控件：命令按钮（CommandButton)标签(label—lbl)

主要用来显示文本信息，所显示内容只能用Caption来设置或修改，不能直接编辑。常用来标注本身不具有Caption属性的控件。文本框、列表框、组合框等控件附加描述性信息。属性部分属性与窗体及其他控件相同：FontBold、Visible、Left、Name等。AutoSize（自动调整）

True：可以自动调整大小。

False：保持大小，正文太长自动裁剪。Alignment（对齐）确定标签中标题的放置方式。

0-左对齐（默认），1-右对齐，2-居中对齐BorderStyle

设置边框，可以取两种值。

0-无边框（默认），1-有边框。BackStyle

对象.BackStyle[=0或1]1-标签覆盖背景（默认），0-标签为“透明”文本框(TextBox-txt)

文本框也称编辑框，用来输入、编辑和显示文本。1．属性Text（文本）设置文本框中显示的内容。字符串类型，最大长度2048字符。

Text1.Text=“VisualBasic”MultiLine（多行文本）属性

True：多行，自动换行，Ctrl+Enter插入空行。

False：单行文本。Locked（文本锁定）属性指定文本框是否可被编辑，逻辑型。

False：可编辑，（默认）。True：可滚动和选择但不能编辑。PasswordChar（口令字符\掩码）属性不显示口令输入信息，显示设计符号，起密码作用。ScrollBars（滚动条）确定文本框中有没有滚动条，整数类型。MultiLine属性为True0—None：无。1—Horizontal：水平滚动条。2—Vertical：垂直滚动条。3—Both：同时具有水平和垂直滚动条。当由水平滚动条后，不能自动换行，通过Enter来换行。SelStart

定义当前选择的文本起始位置。

0-第一个字符前。1-第二个字符前。依次类推SelLength

当前选中的字符数。SelText

选定文本内容，没有选择，为空字符串。

注意：该三个属性不能在属性窗口设置，只能在程序运行过程中取得值。5套22．事件⑴Change（文本变化）输入新内容或当程序将Text属性设置新值从而改变文本框的Text属性时触发该事件。程序运行后，每键入一个字符，就会引发一次Change事件GotFocusLostFocus是两个事件，文本框得到焦点或失去焦点时发生。Text1_GotFocus()SetFocus是方法，将文本框中置入焦点Text1.SetFocus命令按钮(Commandbutton-cmd)1．属性Caption

缺省Command1，可以&+字母，允许Alt+字母激活该按钮。【例】comand1.caption=&Exit CancelTrue：按Esc键同单击作用。只能有一个按钮设置成True。Value（值）属性

True：命令按钮被按下。

False：命令按钮未被按下。DefaultTrue：按回车键同单击作用。只能有一个按钮设置成True。2．事件命令按钮的常用事件为Click事件，并且命令按钮不支持DblClick事件。当做两次Click.其它常用控件图片框（PictureBox）图像框（Image）

1．常用属性

Picture（图片）属性共有属性装入图形：对象.Picture=LoadPicture(“图形文件名”)删除图形：对象.Picture=LoadPicture()图片框的Autosize（自动调整）属性True：自动调整控件大小与显示的图片匹配。False：图像框大小不能调整。注：图片大小不变，控件大小随图片变

图像框的Stretch（图像伸展）属性True：图像自动调整尺寸以适应图像框的大小。控件大小不变False：图像框自动改变大小以适应其中的图形。图片框Autosizefalse图片框Autosizetrue图像框Stretchfalse图像框stretchtrue36.237.1

线条（Line）与形状（Shape）

为窗体创建不同形状、大小和颜色的各种图象(直线、矩形、圆等)。1．常用属性BorderStyle(线型样式)：7种线型，实线、虚线、点划线【例】line1.Borderstyle=1line的X1、Y1,X2、Y2属性线段起点和终点坐标BorderWidth(线段|边框宽度)：粗细，以像素为单位Borderwidth>1时，线条样式都为实线0透明1实线2划线3点线…

线条（Line）颜色值表示方法：1．六位十六进制数，从左到右每两位一组代表一种原色（蓝、绿、红）。【例】

＆H000000’黑色＆H0000FF’红色＆H00FF00‘绿色。2．RGB函数 格式：RGB（红，绿，蓝）

【例】RGB(0,0,0)黑色；RGB(255,255,255)白色

RGB(255,0,0)红色；RGB(0,255,0)绿色3．QBColor函数格式：QBColor（颜色码）0~15之间的整数，共16种颜色。4.颜色常量vbredvbblue等等BorderColor(线段|边框颜色)【例】

line1.

Bordercolor=qbcolor(1)shape1.fillcolor=rgb(200,100,50)

线条（Line）FillStyle(填充图案的类型)：取值由0到7。Shape（形状属性）(0-5)(矩、正方、椭圆、圆、圆角矩形、圆角正方形) 【例】

Shape1.Shape=1‘正方【例】

Shape1.FillStype=4‘左上到右下斜线形状（Shape）FillColor(填充图案的颜色)BackColor(背景色)PrivateSubCommand1_Click()Shape1.BackColor=vbRedShape1.BackStyle=1Shape1.FillColor=vbBlueShape1.FillStyle=5Shape1.BorderColor=vbGreenShape1.BorderWidth=3EndSub47.11为了在运行时把d:\pic文件夹下的图形文件a.jpg装入图片框Picture1，所使用的语句为_______。2将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是3假定在图片框Picture1中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是______。

A)选择图片框，然后按Del键

B)执行语句Picture1.Picture=LoadPicture(“”)

C)执行语句Picture1.Picture=“”

D)选择图片框，在属性窗口中选择Picture属性条，然后按回车键4以下关于图片框控件的说法中，错误的是

A)可以通过Print方法在图片框中输出文本

B)清空图片框控件中图形的方法之一是加载一个空图形

C)图片框控件可以作为容器使用

D)用Stretch属性可以自动调整图片框中图形的大小

5形状控件的Shape属性有6种取值，分别代表6种几何图形。下列不属于这6种几何图形的是

。创建图形坐标系三要素：坐标原点、坐标度量单位（由窗体、图片框或打印机等容器的刻度单位ScaleMode属性决定，7个值，缺省时为Twip，可以设为英寸，点，厘米等）、坐标轴的长度与方向。坐标系统原点HeightScaleHeight窗体系统坐标Me.circle(1000,1000),500Me.Circle(0,0),1000Me.circleForm1.circlecircle图形方法----Line方法（画线和矩形）格式：[对象名.]Line[(x1,y1)]–(x2,y2)[,颜色][,B[F]]（x1,y1）线段的起点或矩形的左上角坐标，（x2,y2）线段的终点或矩形的右下角坐标。在对象上画直线和矩形。

Circle方法（画圆）

格式：[对象名.]Circle[(x,y),半径[,颜色]（x，y）为圆心坐标。【例】Circle(2000,1000),500Picture1.Circle(500,400),200,QBColor(12)PrivateSubCommand1_Click()Fori=500To1500Step500Circle(2000,2000),iNextiEndSub单选钮(optionButton)、复选框(CheckBox)提供选择,通常成组出现；单选钮：多选一，只其一为真复选钮可选择多项。1．常用属性Caption（标题）属性Alignment（对齐）属性

0—钮在左，标题在右。

1—钮在右，标题在左。Value（值）属性单选钮(逻辑型)

复选框（数值型）

True：选定0--Unchecked：未被选定

False：未选定1--Checked：选定

2--Grayed：灰色Style（样式）属性

0－Standard：标准方式。

1－Graphical：图形方式，类似命令按钮，选中呈按下状。Alignment=0Alignment=1

框架（Frame）框架是其他控件的容器，框架内所有控件随框架一起移动、显示、消失和屏蔽。框架内控件的创建方法：一、先放置框架，然后在框架范围内画出控件，此时移动框架各控件可以一同移动。二、现有控件不可拖入框架内。可将框架外控件先剪切，然后粘贴到框架内。1．常用属性Caption（标题）属性：框架标题Enabled（可用）属性

True：有效

False：无效，灰色，不允许对框架内对象操作Visible（可见）属性

True：可见

False：隐藏2．常用事件

Click、DblClick等事件。一般不需要编写框架的事件过程。Enabled=False单选钮和复选框主要出现在简单应用题带有编程的题目中。

滚动条（ScrollBar）用来协助观察数据或确定位置，也可以作为数据输入的工具。水平滚动条（HscrollBar）垂直滚动条（VscrollBar）1.属性Max：最大值32,767Min：最小值-32,768SmallChange：小变动值，单击箭头时滑块移动的增量值。LargeChange：大变动值，单击空白处时移动的增量值。Value：滑块所处位置所代表的值。Min

Value

Max

LargeChangeSmallChange计时器（Timer）

计时器是以一定的时间间隔，周期性地触发Timer事件的控件，据此可依照时间控制某些操作或计时。运行时控件隐藏1．常用属性Interval（间隔）属性

设置两个事件之间的时间间隔。单位：毫秒ms（0.001s），0.5秒=5000~65535ms之间

Interval=0屏蔽计时器

2．常用事件Timer事件

每隔一个Interval时间间隔，发生一次该事件。Enabled（可用）属性

设置计时器是否有效。

True：有效

False：无效1计时器控件能有规律的以一定时间间隔触发_______事件，并执行该事件过程中的程序代码。2在窗体上画一个标签（名称为Label1）和一个计时器（名称为Timer1），然后编写如下几个事件过程：

PrivateSubForm_Load()

Timer1.Enabled=False

Timer1.Interval=〖5〗

EndSub

PrivateSubForm_Click()

Timer1.Enabled=〖6〗

EndSub

PrivateSubTimer1_Timer()

Label1.Caption=〖7〗

EndSub

程序运行后，单击窗体，将在标签中显示当前时间，每隔0.5秒钟变换一次。请填空。

列表框（ListBox）和组合框（ComboBox）列表框显示供用户选择的列表，组合框是文本框和列表框的组合。列表框（ListBox）

1．常用属性List(列表)属性字符型数组，存放列表项，list(0)…list(n-1)添加列表项：1使用属性窗口，输入时Ctrl+Enter换行。2