VB程序设计常用标准控件一Word格式文档下载.docx
《VB程序设计常用标准控件一Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《VB程序设计常用标准控件一Word格式文档下载.docx（11页珍藏版）》请在冰豆网上搜索。
③ScaleLeft，ScaleTop，ScaleWidth，ScaleHeight和ScaleMode属性
④PictureBox控件作为容器
（2）图片框的常用事件
图片框的常用事件有Click，DBClick，Change，鼠标事件和键盘事件等，使用方法与TextBox控件相似。
其中Chage事件当改变图片框的Picture属性时发生。
（3）PictureBox控件的常用方法
①Line方法
在对象上画直线和矩形。
语法：
Object.Line[Step]（x1,y1）［Step]（x2,y2）,[color],[B][F]
其中，object为PictureBox控件对象；
（x1，y1）为线段的起点坐标或矩形的左上角坐标；
（x2，y2）为线段的终点坐标或矩形的右下角坐标；
Step指定相对于线的起点的终点坐标；
B表示画矩形；
F表示用画矩形的颜色来填充矩形，F必须与B一起使用。
若只用B而不用F，则矩形的填充由FillColor和FillStyle属性决定。
②Circle方法
在对象上画圆、椭圆或弧。
Object.Circle[Step]（x，y），radius，[color,start，end，aspect]
（x，y）为Single类型，是圆、椭圆或弧的中心坐标；
step表示采取当前作图位置的相对值；
start、end分别表示起始角度、终止角度，取值为0～2π时，画圆弧，取值为负值时，画扇形，负号表示画圆心到圆弧的径向线；
aspect指定长短轴比率，默认值为1，画圆，大于或小于1时，画椭圆。
③Cls方法
清除运行时PictureBox所生成的图形和文本。
Object.Cls
④Point与PSet方法
Point方法用于返回图形框上指定点的RGB颜色，若指定点在对象外面，则返回值为-1，该方法对图像上控件无效。
PSet方法用于在图形框指定位置上画点。
其语法如下：
object.Point（x，y）
object.PSet[Step]（x，y），[color]
其中，（x，y）为所画点的坐标，Step表示当前作图的相对值。
PSet方法采用背景颜色可清除某个位置上的点。
⑤Print方法
利用PictureBox控件的Print方法，可以在控件中打印文本、图像、动画。
2．图像框的常用属性、事件与方法
（1）Image控件属性
Image控件也使用Picture属性来确定控件显示的内容。
Image控件没有AutoSize属性，它使用Stretch属性来指定一个图形是否要调整大小，当Stretch值为True时，图形调整大小以与控件相适合；
当值为False时，控件调整大小以与图形相适应。
Image控件也不能设置对象的坐标系统，它没有ScaleLeft、ScaleTop、ScaleWidth、ScaleHeight和ScaleMode属性。
（2）Image控件事件
Image控件具有Click事件、DbClick事件、鼠标事件、键盘事件，但没有Change事件。
（3）Image控件方法
Image控件只具有Move、Refresh、ZOrder等方法，不支持PietureBox控件的图形方法。
5.2.2图形文件的装入
将图形载入到PictureBox控件或Image控件，可利用函数LoadPicture设置控件的Picture属性。
语法为：
LoadPicture（[filename]，[size]，［colordepth]，［x，y]）
其中，filename指定图片文件名。
如果filename是光标或图标文件，size指定图像大小，colordepth指定颜色深度，（x，y）指定光标或图标的宽度与高度。
运行时，若要从PictureBox或Image控件中删除一个图形，可使用不指定文件名的LoadPicture函数。
例如：
Imagel.Picture=LoadPicture
5.3选择控件―复选框与单选按钮
复选框也称检查框。
单击检查框可以使“选”和“不选”交替起作用。
可同时选择一项或多项；
其默认名称分别为CheckX（其中X为1，2，3…）。
1．复选框的属性
（1）Caption属性
（2）Alignment属性
（3）Value属性
该属性表示检查框的状态。
①选0-UnClick（默认）值，表示检查框没有被选中；
②选1-UnClick值，表示检查框被选中；
③选2-Grayed值，表示检查框被禁止选择，此时检查框变成灰色
（4）Style属性
2．复选框的事件
复选框控件最基本的事件也是Click事件。
同样，用户无须为检查框编写Click事件过程，因为当用户单击检查框时，它会自动改变状态。
3．复选框的方法
复选框也可使用SetFocus方法来改变其Value属性值，其用法与要求同单选按钮一样。
每调用一次SetFocus方法就触发一次Click事件。
【例5.2】CheckBox控件示例。
设计一个窗体，如图5-3所示，用检查框控制文本输入是否加“下划线”和“斜体显示”。
操作步骤如下。
（1）设计窗体外观
本例需要在窗体上添加3个控件，即一个文本框，两个检查框。
在文本框中显示文本，由两个检查框决定显示的文本是否加下划线或用斜体显示。
（2）编写事件代码
“Form1”窗体控件的“Load”事件过程代码如下：
PrivateSubForm_Load（）
TextDisplay.FontSize=15
EndSub
“TextDisplay”文本框控件的“Change”事件过程代码如下：
PrivateSubTextDisplay_Change（）
IfCheckUnderLine.Value=1Then
TextDisplay.FontUnderline=True
Endif
IfCheckItalic.Value=1then
TextDisplay.FontItalic=True
EndIf
“CheckUnderLine”检查框控件的“Click”事件过程代码如下：
PrivateSubCheckUnderLine_Click（）
Else
TextDisplay.FontUnderline=False
“CheckItalic”检查框控件的“Click”事件过程代码如下：
PrivateSubCheckItalic_Click（）
IfCheckItalic.Value=1Then
TextDisplay.FontItalic=True
TextDisplay.FontItalic=False
（3）执行程序
5.3.2单选按钮（OptionButton）
单选按钮主要用于在多种功能中选择一种功能的情况。
单选按钮必须成组出现，在一组单选按钮中必须选择一项，且只能选择一项；
其默认名称分别为OptionX（其中X为1，2，3…）。
1．单选按钮的属性
（1）Caption属性
该属性表示单选按钮的状态，它是一个逻辑值。
①取True值，表示它被选中，按钮的中心有一个圆点。
②取False（默认）值，表示单选按钮没被选中，按钮的中心是一个圆圈。
（4）Style属性
2．单选按钮的事件
单选按钮最基本的事件是Click事件，但一般不须要编写Click事件过程。
因为当用户单击单选按
钮时，它会自动改变状态。
3．单选按钮的方法
SetFocus方法是单选按钮控件最常用的方法，可以在代码中通过该方法将Value属性设置为True。
使用该方法之前，必须要保证单选按钮当前处于可见和可用状态（即Visible与Enabled属性值均为True）。
【例5.3】OptionButton控件示例。
设计一个如图5-3所示的窗体程序，实现用单选按钮在文本框中显示不同的字体。
（1）外观设计
在窗体上添加4个控件，即一个文本框，3个单选按钮，进行其主要属性设置。
（2）事件过程代码编写
3个单选按钮编写事件过程代码分别如下：
PrivateSubcourier_Click（）
TextDisplay.FontSize=18
TextDisplay.FontName="
courier"
PrivateSubmodern_Click（）
TextDisplay.FontSize=20
modern"
PrivateSubroman_Click（）
TextDisplay.FontSize=24
timesnewroman"
5.4选择控件―列表框与组合框
列表框（ListBox）主要是用于显示列表性的数据，用户可以从此列表框内选择适当的列表数据。
组合框（ComboBox）是一种把文本框（TextBox）和列表框（ListBox）特性组合为单个控制窗口。
利用组合框可以在文本框部分输入字符串，或者在列表框直接选取某项目。
5.4.1列表框（ListBox）
列表框用来以选项列表形式显示一系列选项，用户可从中选择一项或多项。
列表框最主要的特点是只能从中选择，不能直接写入或修改其内容。
其默认名称分别为ListBoxX（其中X为1，2，3…）。
1．列表框的常用属性
列表框所支持的标准属性包括：
Enabled，FontBold，FontName，FontUnderline，Height，Left，Name，Top，Visible，Width。
此外，列表框还具有以下特殊属性。
（1）Columns属性
该属性用来确定列表框的列数。
（2）List属性
该属性是一个字符型数组，每一个列表项都是这个数组中的一个元素，通过下标访问数组中的值，List数组的下标是从0开始的。
其格式为
列表框名.List（下标）
（3）ListCount属性
它表示列表框中列表项的数量，其值为整数。
第一个列表项序号为0，最后一个列表项序号为ListCount-1值。
该属性只能在程序中设置或引用
（4）ListIndex属性
它表示执行时选中的列表项序号，其值为整数。
（5）Style
（6）NewIndex属性
（7）Selected属性
该属性实际上是一个数组，各个元素的值为True或False，每个元素与列表框中的一项相对应。
当元素的值为True时，表明选择了该项；
如为False，则表示未选择。
列表框名.Selected（索引值）
“索引值”从0开始，它实际上是数组的下标。
上面的语句返回一个逻辑值（True或False）。
用下面的语句可以选择指定的表项或取消已选择的表项：
列表框名.Selected（索引值）=True|False
（8）Stored属性
（9）Text属性
它的值是被选中列表项的文本内容。
List（ListIndex）等于Text。
（10）MultiSelect属性
2．列表框事件
（1）Click事件
（2）DblClick事件
3．列表框方法
（1）AddItem方法
格式：
列表框名.AddItem项目字符串[，索引值]
（2）Clear方法
列表框名.Clear
（3）RemoveItem方法
列表框名.RemoveItem索引值
【例5.4】ListBox控件示例。
设计一个如图5-8所示的窗体应用程序。
在文本框中输入数据，按“增加（A）”按钮，所输入的数据将增加到列表框中。
选中列表框中的某项，按删除“按钮（D）”，将该项从列表框中删除；
按“清除（C）”按钮，将清除列表框中所有项目；
按“退出（X）”按钮，将结束程序运行。
（1）窗体外观设计
（2）事件过程代码设计
Text1.Text="
"
List1.Clear
“cmdAdd”命令按钮控件的“Click”事件过程代码如下：
PrivateSubCommand1_Click（）
List1.AddItemText1.Text
Label2.Caption="
列表项目总数为：
&
amp;
List1.ListCount
Text1.SetFocus
“cmdDel”命令按钮控件的“Click”事件过程代码如下：
PrivateSubCommand2_Click（）
DimintSelectedAsInteger
intSelected=List1.ListIndex
IfintSelected&
gt;
=0Then
List1.RemoveItemintSelected
MsgBox"
请先在列表框中选择要删除的项目。
Beep
“cmdClear”命令按钮控件的“Click”事件过程代码如下：
PrivateSubCommand3_Click（）
“cmdExit”命令按钮控件的“Click”事件过程代码如下：
PrivateSubCommand4_Click（）
End
（3）运行调式程序
5.4.2组合框（ComboBox）
组合框是组合了文本框和列表框的特性而形成的一种控件。
组合框在列表框中列出可供用户选择的选项，另外还有一个文本框。
组合框有三种不同的风格：
下拉式组合框、简单组合框和下拉式列表框，由Style属性值来确定。
1．组合框属性
（1）Style属性
①当Style属性被设置为0时，组合框称为“下拉式组合框”
②Style属性值为1的组合框称为“简单组合框”（SimpleCombo），它由可输入文本的编辑区和一个标准列表框组成。
③Style属性值2的组合框称为“下拉式列表框”（DropdownListBox）。
（2）Text属性
该属性值是用户所选择的项目的文本或直接从编辑区输入的文本。
2．组合框事件
（3）Change事件
3．组合框方法
（1）AddItem方法
组合框名.AddItemString[,number]
功能：
它把String选项加入到指定的组合框中。
（2）Clear方法
组合框名.Clear
删除组合框中的所有内容。
（3）RemoveItem方法
组合框名.RemoveItem（index）[=number]
从组合框中删除一个指定的选项。
小结：
控件是ＶisualBasic中预先定义好的、程序中能够直接使用的对象。
每种控件都有自己的属性、事件和方法，每种控件都可以完成一种特定的任务。
这些控件对象都以形象的图标形式出现在工具箱中，以便于编程时使用。
本讲系统和深入地介绍了标签、文本框、复选框、单选按钮、列表框和组合框这些常用标准控件的属性、方法及事件及其在程序设计中的具体应用。
作业：
1、单选按钮和复选框在使用上有什么区别？
2、列表框和组合框在使用上有什么区别？
3、熟悉各种控件的属性、事件和方法。
升级会员 