vb属性方法和事件概述.docx
- 文档编号:7757793
- 上传时间:2023-01-26
- 格式:DOCX
- 页数:32
- 大小:313.96KB
vb属性方法和事件概述.docx
《vb属性方法和事件概述.docx》由会员分享,可在线阅读,更多相关《vb属性方法和事件概述.docx(32页珍藏版)》请在冰豆网上搜索。
vb属性方法和事件概述
vb属性、方法和事件概述
VisualBasic
VisualBasic的窗体和控件是具有自己的属性、方法和事件的对象。
可以把属性看
作一个对象的性质,把方法看作对象的动作,把事件看作对象的响应。
日常生活中的对象,
如小孩玩的气球同样具有属性、方法和事件。
气球的属性包括可以看到的一些性质,如它的
直径和颜色。
其它一些属性描述气球的状态(充气的或未充气的)或不可见的性质,如它的
寿命。
通过定义,所有气球都具有这些属性;这些属性也会因气球的不同而不同。
气球还具有本身所固有的方法和动作。
如:
充气方法(用氦气充满气球的动作),
放气方法(排出气球中的气体)和上升方法(放手让气球飞走)。
所有的气球都具备这些能
力。
气球还有预定义的对某些外部事件的响应。
例如,气球对刺破它的事件响应是放气,
对放手事件的响应是升空。
如果能对气球编程的话,VisualBasic代码将如下所示。
其作用是设置气球的属性:
Balloon.Color=Red
Balloon.Diameter=10
Balloon.Inflated=True
注意代码的语法,首先是对象(Balloon),接着是属性(Color),然后是赋值(Red)。
重复这条语句,但是,换一个不同的值,就可以改变气球的颜色。
属性也可以在程序设计阶
段在“属性”窗口中设置。
调用气球的方法是这样的:
Balloon.Inflate
Balloon.Deflate
Balloon.Rise5
它的语法与属性的语法相似,对象(一个名词)后面紧跟着方法(一个动词)。
在
第三个例子中有一个附加项,称为一个参数,表示气球上升的高度。
一些方法有一个或多个
参数,它们对执行的动作做进一步的描述。
气球对一个事件的响应如下所示:
SubBalloon_Puncture()
Balloon.Deflate
Balloon.MakeNoise"Bang"
Balloon.Inflated=False
Balloon.Diameter=1
EndSub
本例中代码描述了当刺穿事件发生时气球的行为:
调用Deflate方法,然后以"Bang"(发出的声响)为参数调用MakeNoise方法。
因为气球已不再是充气状态,所以把Inflated属性置为False,并给Diameter属性设置一个新值。
实际上对气球不能编程,但是,可以对VisualBasic的窗体或控件进行编程。
作为
程序员,由您作主。
您决定应更改哪些属性,调用哪些方法,对哪些事件作出响应,从而得
到希望的外观和行为。
窗体对象是VisualBasic应用程序的基本构造模块,是运行应用程序时与用户交互
操作的实际窗口。
窗体有自己的属性、事件和方法用于控制其外观和行为。
设计窗体的第一步是设置它的属性。
这可以在设计时在“属性”窗口中完成,或者运
行时由代码来实现。
设计时,即在VisualBasic环境中创建应用程序的任何时刻,此时你可以操
作窗体和控件,设置它们的属性,对它们的事件编程。
运行时是指实际运行应用程序并与应
用程序进行交互的时间。
设置窗体属性
窗体的许多属性会影响窗体的外观。
Caption属性决定窗体标题栏中显示的文本;
图标属性设置在窗体最小化时显示的图标。
MaxButton和MinButton属性决定窗体是否能
最大化或最小化。
通过改变BorderStyle属性,可以控制窗体如何调整大小。
Height和Width属性决定的窗体初始大小;Left和Top属性根据屏幕的左上角
确定窗体的位置。
WindowState属性可以把窗体设成在启动时最大化、最小化或正常大小。
Name属性设置窗体的名称,在代码中用这个名称引用该窗体。
首次在工程中添加窗体时,该窗体的名称被缺省为Form1;添加第二个窗体,其名称被缺省为Form2,以此类推。
最好给Name属性设置一个有实际意义的名称,如给一个条目窗体命名为"frmEntry"。
熟悉这些窗体属性,最好的办法是实践。
在“属性”窗口(图3.3)中更改窗体的一些属性,然后运行该应用程序并观察修改的效果。
如果想详细了解每个属性,可以选择该属
性并按F1键查看联机帮助。
窗体事件和方法
窗体作为对象,能够执行方法并对事件作出响应。
无论是因为用户交互,还是通过代码调整窗体的大小,都会触发一个Resize事件。
当窗体尺寸变化时,允许您在窗体上进行移动控件或调整控件大小等操作。
每当一个窗体变成活动窗体时,就会产生一个Activate事件;当另一个窗体或应
用程序被激活时,就会产生Deactivate事件。
这些事件对初始化或结束窗体行为十分方便。
例如,在Activate事件中,可以编写代码突出显示一个特定文本框中的文本;在Deactivate事件中,可以把更改保存到一个文件或数据库中。
要使一个窗体可见,可调用Show方法:
Form2.Show
调用Show方法与设置窗体Visible属性为True具有相同的效果。
窗体的许多方法都调用文本或图形。
Print、Line、Circle和Refresh方法可用于直接在窗体表面上写和画。
这些方法和更多的方法将在第十二章“使用文本和图形”中详细讨论。
关于窗体的详细信息,请参阅第六章“创建用户界面”中的“再论窗体”。
使用户与应用程序交互的最简便的方法是给用户提供一个按钮。
可以用VisualBasic提供的CommandButton控件,或利用包含图形的Image控件,如一个图标,来创建自
己的“按钮”。
使用CommandButton
大多数VisualBasic应用程序都有CommandButton,使用户通过简单的敲击按钮
来执行操作。
当用户选中按钮时,不仅会执行相应操作,还会使该按钮看上去象被按下并释
放一样。
无论何时,只要用户单击按钮,就会调用Click事件过程。
将代码写入Click事件过程,执行想要执行的动作。
在程序执行时,有多种方法可以选中CommandButton:
用鼠标单击按钮。
按TAB键把焦点移到相应按钮上,然后按SPACE键或ENTER键选中该按钮。
参阅本章后面的“焦点概述”。
按CommandButton的快捷键(ALT+下划线的字符)。
在代码中设CommandButton的Value属性为True。
cmdClose.Value=True
在代码中调用CommandButton的Click事件。
cmdClose_Click
如果该CommandButton是窗体的缺省命令按钮,既使将焦点移到其它不是CommandButton的控件上,按下回车键也会选中该按钮。
在设计时,通过设置某按钮的Default属性为True,指定它为窗体的缺省CommandButton。
如果该CommandButton是窗体的缺省的取消按钮,即使把焦点移到其它控件上,
也能通过按ESC键选中该按钮。
在设计时,通过设置某按钮的Cancel属性为True,指定它为窗体的缺省的取消按钮。
所有这些操作都使VisualBasic调用Click事件过程。
“测试按钮”应用程序
利用Caption属性可以在按钮上显示文字,告诉用户该按钮的功能。
在图3.4中,在控件示例应用程序的测试按钮范例中包含一个Caption属性为"ChangeSignal"的CommandButton(此例的工作为Controls.vbp示例应用程序中的Buttons.frm)。
注意,S是这个按钮的快捷键,用一条下划线表示。
在Caption属性的正文内插入一个(&)符号,将使得此符号后面的字符成为该按钮的快捷键(例如,Change&Signal)。
用户单击CommandButton,将执行该CommandButton的Click事件过程中的代码。
在这个范例中,每次单击按钮,将变换一个不同的交通灯图标。
详细信息关于CommandButton的属性的详细信息,请参阅第七章“使用VisualBasic的标准控件”。
Label和TextBox控件是用于显示和输入文本的。
让应用程序在窗体中显示文本
时使用Label,允许用户输入文本时用TextBox。
Labels中的文本为只读文本,而TextBox中的文本为可编辑文本。
可由用户编辑的文本,例如一个顺序条目TextBox
字段或一个密码框
只能显示的文本,例如在窗体中标识一个Label
字段或给用户显示指令
Labels和TextBoxes将在以下部分讨论:
用Label显示文本(vbconUsingLabels)使用Label控件的基本知识。
使用TextBox(vbconWorkingWithTextBox)使用TextBox的基本知识。
用Label显示文本
Label控件显示的文本用户不能直接修改。
如TextBox和ScrollBar这些没有自己的Caption属性的控件,可以用Label标识。
在Label中实际显示的文本是由Caption属性控制的,该属性可以在设计时在“属性”窗口中设置或在运行时用代码赋值。
在缺省情况下,标题是Label控件中唯一的可见部分。
但是,如果把BorderStyle属性设成1(可以在设计时进行),那么Label就有了一个边框,看起来像一个TextBox。
还可以通过设置Label的BackColor、BackStyle、ForeColor和Font属性来,改变
Label的外观。
改变Label尺寸以适应其内容
设计时可在“属性”窗口中指定单行Label的标题。
但是如果要输入一个较长的
或在运行时可能变化的标题,该怎么办呢?
Label提供了两种属性:
AutoSize和WordWrap,用于帮助您改变控件尺寸以适合较长或较短的标题。
AutoSize属性决定控件是否自动改变尺寸以适应其内容。
如该属性设为True,Label就会根据其内容进行水平方向变化,如图3.5所示。
WordWrap属性使Label根据其内容进行垂直方向变化,而保持其宽度不变,如图
3.6所示。
本例的工作版,请参阅应用程序示例Controls.vbp中的WordWrap.frm。
如果在Controls.vbp中运行AotoSize示例,就会发现为了同时使用WordWrap,必须两个复选框都选中。
这是因为,要想使Label的WordWrap属性起作用,就必须设置AutoSize为True。
只有在一个单字的宽度超过控件的当前宽度时,Label的宽度才会增加。
关于Label控件属性的详细信息,请参阅第七章“使用VisualBasic的标准控件”。
使用TextBoxes
TextBox是一种通用控件,可以由用户输入文本或显示文本。
除非把TextBox的Locked属性设为True,否则不能用TextBox显示不希望用户更改的文本。
TextBox中显示的实际文本是受Text属性控制的。
Text属性可以用三种方式设置:
设计时在“属性”窗口进行、运行时通过代码置或在运行时由用户输入。
通过读Text属性能在运行时检索TextBox的当前内容。
多行TextBox和WordWrap
TextBox在缺省情况下只显示单行文本,且不显示ScrollBar。
如果文本长度超过可用空间,则只能显示部分文本。
通过设置MultiLine和ScrollBars两种属性(只能在设计程序时设置),可以改变TextBox的外观和行为。
不要把ScrollBars属性与ScrollBar控件混淆,ScrollBar控件并不属于
TextBox,它具有自己的属性集。
把MultiLine属性设为True,可以使TextBox在运行时接受或显示多行文本。
只
要没有水平方向ScrollBar,多行TextBox中的文本会自动按字换行。
ScrollBars属性的缺省值被设置为0(None)。
自动按字换行省去用户在行尾插入换行符的麻烦。
当一行文本
已超过所能显示的长度时,TextBox自动将文本折回到下一行显示。
在设计时,不能在“属性”窗口输入换行符。
在过程中,可以通过插入一个回车加
上换行符(ANSI字符13和0)来产生一个行断点。
也可以用常量vbCrLf插入一个回车
与换行符组合。
例如,下面的事件过程是在加载窗体时,把两行文本放入一个多行TextBox(Text1)中的示例。
SubForm_Load()
Text1.Text="Herearetwolines"_
&vbCrLf&"inatextbox"
EndSub
使用TextBox中的文本
利用TextBox的SelStart、SelLength和SelText属性,可以控制TextBox的插入点和选择行为。
这些属性仅能在运行时使用。
当一个TextBox首次得到焦点时,TextBox缺省的插入点和光标位置在文本的最
左边。
用户可以用键盘和鼠标移动它们。
当TextBox失去焦点而后再得到时,插入点位置
与用户最后设置的位置一样。
在有些情况下,它可能与用户设置不一致。
如:
在字处理应用程序中,用户会希望
新字符出现在已有文本后面;在数据项应用程序中,用户会希望他的输入替换原有条目。
使
用SelStart和SelLength属性,用户可以根据需要改变TextBox的行为。
SelStart属性是一个数字,指示文本串内的插入点,其中0表示最左边的位置。
如果SelStart属性值大于或等于文本中的字符数,那么插入点将被放在最后一个字符之
后,如图3.7所示。
该例子的工作版,请参阅应用程序示例Controls.vbp中的Text.frm。
SelLength属性是一个设置插入点宽度的数值。
把SelLength设为大于0的值,会选中并突出显示从当前插入点开始的SelLength个字符。
图3.8显示选择的性能。
如果有一段文本被选中,此时用户键入的文字将替换被选中的文本。
有些情况下,
也可以用粘贴命令用新文本替换原有的文本。
SelText属性是一串文本,可以在运行时给
它赋值以替换当前选中的文本。
如果没有选中的文本,SelText将在当前插入点插入文本。
详细信息关于TextBox控件的属性的详细信息,请参阅第七章“使用VisualBasic的标准控件”。
关于TextBox控件的属性的详细信息,请参阅第七章“使用VisualBa
sic的标准控件”。
大多数应用程序需要向用户提供选择,如简单的“Yes/No”选项、或者从包含成百个
可能性的列表中进行选择。
VisualBasic包含几种用于提供选择的标准控件。
下列表格总结
了这些控件及其用途。
CheckBox
CheckBox表明一个特定的状态是选定(on)还是清除(off)。
在应用程序中使用CheckBox为用户提供了“True/False”或“yes/no”的选择。
因为CheckBox彼此独立工作,所以用户可以同时选择任意多个CheckBox。
例如,在图3.9中,可同时选定粗体和斜体。
CheckBox应用程序
这个例子使用一个CheckBox来决定文本用普通字体还是用斜体字显示。
关于此
例的工作版本,请参阅应用程序示例Controls.vbp中的Check.frm。
如图3.10所示,此应用程序有一个TextBox,一个Label,一个CommandButton和两个CheckBox。
下表列出了应用程序中的对象的属性设置。
选定粗体或斜体时,CheckBox的Value属性值设置为1,不选定时为0。
缺省Value值为0,所以除非改变Value属性值,否则第一次显示时不会选定CheckBox。
可以用常量vbChecked和vbUnchecked表示数值1和0。
checkbox应用程序中的事件
当单击CheckBox时,会发生CheckBox的Click事件。
此事件过程测试是否选
定CheckBox(即是否Value=vbChecked)。
如果选定,通过设置Font对象的Bold或Italic属性,将文本转换为粗体或斜体;该Font对象是由TextBox的Font属性返回的。
PrivateSubchkBold_Click()
IfChkBold.Value=vbCheckedThen'如果选定。
txtDisplay.Font.Bold=True
Else'如果没有选定。
txtDisplay.Font.Bold=False
EndIf
EndSub
PrivateSubchkItalic_Click()
IfChkItalic.Value=vbCheckedThen'如果选定。
txtDisplay.Font.Italic=True
Else'如果没有选定。
txtDisplay.Font.Italic=False
EndIf
EndSub
用选项按钮进行选项分组
选项按钮表示给用户一组两个或更多的选择。
但是,不同于CheckBox,选项按钮总是作为一组的组成部分工作的;因此,选择一个选项按钮就会立即清除该组中的其它按钮。
定义一个选项按钮组,告诉用户“这是一组选择,从中选一个,而且只选一个”。
例如,在图3.11所示的选项按钮组中,用户只能在三个选项按钮中选择一个。
创建选项按钮组
直接放在一个窗体中(也就是不在Frame或PictureBox中)的所有的选项按钮
构成一组。
如果想创建别的选项按钮组,必须将其中一些选项按钮组放到Frame或PictureBox中去。
所有在给定的Frame中的选项按钮,组成一个独立的组,在PictureBox中的所有选项按钮也是如此。
用这种方法生成一个独立的组时,总是要先画好一个Frame或PictureBox,然后,将选项按钮画到里面。
图3.12显示了一个具有两个选项按钮组的窗体。
在Frame中画了一组选项按钮后,用户只能在组内选择一个选项按钮。
要在Frame中为控件分组,请按照以下步骤执行:
1.在“工具箱”中选择Frame控件,并在窗体上画出Frame。
2.在“工具箱”中选择OptionButton控件,并在Frame内画出控件。
3.如果还想在Frame中增加选项按钮,重复步骤2。
先画Frame,再在Frame上画每个控件,这样移动Frame时控件会一起移动。
如果将已经存在的控件移到Frame上,此控件不会和Frame一起移动。
如果将已存在的控件分组到一个Frame中去,可以选择这些控件,然后剪
贴到Frame或Picture控件上去。
控件的容器
当控件是独立的对象时,窗体和控件之间存在着某种父子关系。
图3.12表明选项按钮怎样才能包含在一个窗体或一个Frame控件中。
要理解容器的概念,首先要把所有的控件都想象为所在窗体的孩子。
实际上,大多
数控件都支持只读Parent属性,它的值就是控件所在的窗体。
作为孩子,控件决定其在父
窗体上的位置。
控件的Left属性和Top属性是相对父窗体而言,且控件不能移出父窗体
的边界。
移动容器的同时也移动了控件,因此控件与容器的相对位置不变(即控件的Left属性和Top属性不变)。
选定或禁止选项按钮
一个选项按钮可以用以下方法选择:
1.在运行期间用鼠标单击选项按钮。
2.用Tab键定位到选项按钮组,然后在组内使用方向键(箭头键)定位选项按钮。
3.用代码将它的Value属性设置为True:
optChoice.Value=True
4.使用在Label的标题中指定的快捷键。
5.要使某个按钮成为选项按钮组中的缺省按钮,只要在设计时将其Value属性设置成True。
它保持被选中状态,直到用户选择另一个不同的选项按钮或用代码改变它。
要禁用选项按钮,将其Enabled属性设置为False。
程序运行时,若此选项按钮变
灰,表示无法选取此选项按钮。
Options应用程序
图3.13所示的窗体使用选项按钮为一台计算机选择处理器类型和操作系统。
当用
户在组内选择了选项按钮后,Label的标题就改变,反映当前的选择。
关于此例的工作版本,
请参阅应用程序示例Controls.vbp中的Options.frm。
下表列出了应用程序中对象属性的设置。
Options应用程序中的事件
选项应用程序对事件的响应如下:
前三个选项按钮的Click事件为窗体级的string变量strComputer分配一个相应的描述。
后两个选项按钮的Click事件为第二个窗体级变量strSystem分配一个相应的描述。
这个方法的关键就在于使用这两个窗体级变量,strComputer和strSystem。
这两个变量具有不同的string值,选项按钮的最后选定就依赖于这些值。
每次选择新的选项按钮,其Click事件的代码就更新相应变量的值。
PrivateSubopt586_Click()
strComputer="Pentium"
CallDisplayCaption
EndSub
然后它调用一个名为DisplayCaption的过程,此过程把两个变量连在一起并改变Label的Caption属性。
SubDisplayCaption()
lblDisplay.Caption="Youselecteda"&
_strComputer&"running"&strSystem
EndSub
使用子过程是因为改变Caption属性的过程对所有五个选项按钮来说基本是一样
的,只不过变量的值因情况而异。
这就可以避免在每个Click事件中重复同样的代码。
变量和子过程将在第五章“编程基础”中讨论。
使用ListBox和ComboBox
ListBox和ComboBox为用户提供了选择。
按照缺省规定,选项以垂直单列方式
显示,也可以设置成多列方式。
如果项目数量超过ComboBox或ListBox所能显示的数目,ScrollBar自动出现在控件上。
于是用户可以在列表中上下左右滚动。
图3.14为一个单列ListBox。
ComboB
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 属性 方法 事件 概述
![提示](https://static.bdocx.com/images/bang_tan.gif)