VB补充内容资料
第一章 组合框与滚动条
1、组合框
定义:列
框和文本框的组合,可用于输入或选择文本,其默认名称为ComboX。
属性:Style——确定组合框的类型,有0、1、2三个值。
输入文本或从列表中选择(0、1) 仅从列表中选择(2) 下拉式列表(0) 非下拉式列表(1)
属性:Text——组合框的内容
事件:Dropdown——将列表框拉下时触发。Click——在列表框中单击,选中某一列表项时触发。Change——文本框的内容发生改变时触发
注意:Click与Change的区别:Click——单击选中列表框中某一个列表项时触发;Change——仅当通过键盘输入时才会触发。
2、滚动条
· 分类:水平滚动条(HScrollX)和垂直滚动条(VScrollX)作用:用于设置近似值
· 属性
Max——最大值 Min——最小值
LargeChange——单击滚动条中的白色区域,Value的增量值
SmallChange——单击滚动条中的箭头时,Value的增量值 Value——滚动框的值
· 事件:Scroll——拖动滚动块时触发 Change——Value值发生改变后触发
比较程序:
比较这两个程序我们会发现:Scroll只有在拖动滚动块时才触发;而Change在拖动滚动块、单击滚动条中的箭头或白色区域时,均触发。
· VB提供三种文件系统控件:驱动器列表框(DriveListBox)、目录列表框(DirListBox)、文件列表框(FileListBox)。
第二章 文件管理控件
1、驱动器列表框
常用属性
基本属性
Name、Left、Top、Height、Width、Visible、Enabled等
特有属性:Drive属性,设置或返回所选择的驱动器名。
格式:[名称.]Drive[=驱动器名]
常用事件
Change事件:每次重新设置Drive属性,都会引发Change事件。驱动器列表框的默认名称为Drive1,其Chang事件过程的开头为Drive1_Change()。
2、目录列表框
显示当前驱动器上的目录结构及当前目录下所有子目录。供用户选择其中的某个目录作为当前目录。
在目录列表框中,双击某个目录,就会显示该目录下的所有目录
目录列表框中只能显示当前驱动器上的目录。如果要显示其他驱动器上的目录,必须改变路径,即重新设置目录列表框的Path属性。
基本属性
Name,Left/Top,Height/Width,Visible,Enabled等
特有属性:Path属性,只在代码中设置,不能在属性窗口中设置
格式:[对象.]Path[="路径名"]功能:设置或返回当前驱动器路径,适用于目录列表框和文件列表框.
常用事件
目录列表框的Path属性值改变时,将引发Change事件。文件列表框的Path属性改变时,将引发Change事件。
驱动器列表框和目录列表框必须同步
一般,改变驱动器列表框中的驱动器名后,目录列表框中的目录应当随之变为该驱动器上的目录,也就是使驱动器列表框和目录列表框必须产生同步效果。
3、文件列表框(File ListBox)
常用属性
Pattern属性
格式:[窗体.]文件列表框名.Pattern[=Value] 功能: 设置在执行时要显示的某一种类型的文件。
常用属性
FileName属性:在设计状态不能使用。
格式:[窗体.][文件列表框名.]FileName[=文件名] 功能:在文件列表框中设置或返回被选定文件的名称和路径
ListCount属性:只能在代码中使用,不能在属性窗口中设置
格式:[窗体.]控件.ListCount 功能:返回控件内所列项目的总数。
常用属性
ListIndex属性:只能在代码中使用
格式:[窗体.]控件.ListIndex[=索引值] 功能:设置或返回当前控件上所选项目的“索引值”(即下标)
List属性
格式:[窗体.]控件.List(索引)[=字符串表达式] 功能:在List属性中存有文件列表框中所有项目的数组,可用来设置或返回各种列表框中的某一项目。
驱动器、目录及文件列表框的同步通过Path属性的改变引发Change事件来实现同步。
例如:Sub Dir1_Change()
File1.Path=Dir1.Path
End Sub
该事件过程使窗体上的目录列表框Dir1和文件列 表框File1产生同步。
例如:Private Sub Drive1_Change()
Dir1.Path=Drive1.Drive
End Sub
该过程使驱动器列表框和目录列表框同步。
在“部件”对话框中通过选中“Microsoft Common Dialog Control 6.0” ,添加通用对话框控件。
在窗体上绘制的通用对话框不能改变大小,运行时控件被隐藏,可设置不同Action属性值和使用不同方法决定对话框类型。
Action属性只能在程序中赋值,而不能在属性窗口进行设置。
通用对话框的其他共同属性有:CancelError 属性
设为True时,单击“取消”按钮关闭对话框时显示出错信息;
设为False时,不显示出错信息。
· DialogTitle 属性
设置对话框标
栏所显示的字符串。
· Flags属性:修改通用对话框的每个具体对话框的默认设置
第三章 公共对话框
1、文件对话框
· 文件对话框分类:
· 打开(Open)文件对话框:可以让用户指定一个文件,由程序来实现;
· 另存为(Save As)文件对话框:保存文件对话框,可以指定一个文件,并以这个文件名保存当前文件。
从结构上来说,“打开”和“另存为”对话框是类似的。
· 文件对话框的主要属性
· FileName 属性: 设置所选文件的路径和文件名。
· FileTitle 属性:设置要打开或保存文件的名称(没有路径)
· Filter 属性:指定在对话框中显示的文件类型。用该属性可设置多个文件类型。由描述符和过滤器两部分组成
dialog1.filter=word files|*.doc dialog1.filter=All Files | *.*| Word Files |*.Doc| text Files | *.txt
· 文件对话框的主要属性
· FilterIndex属性:指定默认的过滤器
dialog1.filterindex=3
· InitDir属性:指定文件对话框中的初始目录,如该属性没有指定,则使用当前目录
· MaxFileSize属性:设置Filename属性的最大长度。
2、颜色对话框
使用通用对话框 ShowColor 方法显示“颜色”对话框。功能:生成或选择自定义颜色。
· Color 属性:设置或返回选定的颜色。语法格式:object.Color [= number]。 Flags属性值的含义
值 符号常量 作 用
1 vbCCRGBInit 使得Color属性定义的颜色在首次显示对话框时随着显示出来
2 vbCCFullOpen 打开完整对话框,包括“用户自定 颜色”窗口
4 vbCCPreventFullOpen 禁止选择“规定自定义颜色”按钮
8 vbCCShowHelp 显示一个“Help”按钮
3、字体对话框
用通用对话框的 ShowFont 方法显示“字体”对话框。 功能:为文字指定字体、大小、颜色和样式。
要使用“字体”对话框,先设置通用对话框中与字体对话框相关的属性,然后用ShowFont 方法显示对话框。
· Flags属性值的含义(字体对话框)
属性值 符号常量 作 用
1 cdlCFScreenFonts 只显示屏幕字体
2 cdlCPrinterFonts 只列出打印机字体
3 cdlCFBoth 列出打印机和屏幕字体
4 cdlCFShowHelp 显示一个Help按钮
256 cdlCFEffects 显示“效果”框:删除线、下划线和颜色
8192 cdlCLimitSize 只显示在Max属性和Min属性指定范围内的字体大小
第四章 图形处理
1、图形操作基础
1、标准坐标系统
2、图形控件
2、直线控件(Line)
直线控件用来在窗体和其他容器控件中创建简单的线段,它没有自己的特殊方法,也不产生任何事件。设计和运行时可通过它的属性改变它的位置、粗细和颜色等
1.直线控件的常用属性
(1)BorderColor属性设置直线的颜色。(2)BorderWidth属性设置直线的粗细。
(3)BorderStyle属性设置直线样式。 0~6种类型,1—实线,6—内实线。
2.直线控件的特有属性
x1,x2,y1,y2属性指定起点和终点的x坐标及y坐标。可以通过改变x1,x2,y1,y2的值,来改变线的位置和长度。
说明:直线控件没有Left、Top、Width和Height属性,运行时也不能用Move方法决定直线的位置和长短。
3、形状控件(Shape)
· 使用形状控件在窗体或其他控件容器中画矩形、正方形、圆、椭圆、圆角矩形或圆角正方形。
1.形状控件常用属性
(1)Left、Top、Width和Height决定形状控件位置和大小,也可用Move方法改变它的大小和位置。
(2)BorderWidth设置图形边界宽度,值是以像素为单位的边线宽度 (3)BorderColor:设置图形边界颜色。
(4)BorderStyle:设置边界线的类型。 (5)FillColor属性设置图形的前景颜色。
如要为图形填充颜色(背景)时,先将FillStyle设成1(透明),否则FillColor(前景色)的颜色会遮盖背景色。
2.形状控件特有属性
(1)Shape属性:用来设置图形的形状。
0——Rectangle 矩形 1——Square 正方形
2——Oval 椭圆形 3——Circle 圆形
4——Rounded Rectangle 圆角矩形 5——Rounded Square 圆角正方形
· Shape属性的缺省值为0(矩形)。若选择3,则用Shape控件画出的矩形中画出一个圆(圆的直径是矩形的短边)。
(2)BackStyle属性:设置图形背景的风格
0——Transparent(透明) 1——Opaque(不透明)
缺省值为0。如果着色, 要将BackStyle属性设置为“不透明”。
(3)FillStyle属性:设置图形填充的线形(风格或样式)
3、 图形方法
4、PSet方法
格式:[对象名.]PSet (x,y)[,颜色] 功能:在窗体或图片框上画出一个点。对象缺省时,为窗体。
程序范例:
· 有个名称为Form1的窗体,上面没有控件,设有以下程序:
Dim cmdmave As Boolean
Private Sub Form_MouseDown(……)
cmdmave = True
End Sub
Private Sub Form_MouseMove(……)
If cmdmave Then
Form1.Pset(X,Y)
End If
End Sub
Private Sub Form_MouseUp(……)
cmdmave = False
End Sub
此程序的功能是
A)每按下鼠标键一次,在鼠标所指位置画一个点
B)按下鼠标键,则在鼠标所指位置画一个点;放开鼠标键,则此点消失
C)不按鼠标键而拖动鼠标,则沿鼠标拖动的轨迹画一条线
D)按下鼠标键并拖动鼠标,则沿鼠标拖动的轨迹画一条线,放开鼠标键则结束画线
5、Line方法
格式:[对象.]Line (x1,y1)- (x2,y2)[,颜色] 功能:在窗体或图片框上画出一条直线。对象缺省时为窗体。
6、Circle方法
格式:[对象名.]Circle (x,y),半径[,颜色] 功能:在窗体或图片框上画圆。
1