VB常用控件与界面设计教程

公共教育学院 计算机教研室
徐州医学院VB教程
3.1.1 窗体的属性、方法与事件
属性名 名 称 （Name） Caption BackColor 分类 杂项 外观 外观 描述 窗体对象引用名 窗体标题 返回或设置对象中文本和 图形的背景色 缺省值 Form1 Form1
ForeColor
BorderSty le Enabled
外观
外观 行为
返回或设置对象中文本和 图形的前景色
返回或设置对象的边框样 式 决定对象是否活动 2 True
公共教育学院 计算机教研室
徐州医学院VB教程
3.1.1 窗体的属性、方法与事件
Visible Font Moveable
行为 字体 位置
决定对象是否可见
True
用于设置文本对象的字体、 字型、字号等 决定窗体能否被移动 True
公共教育学院 计算机教研室
徐州医学院VB教程
3.1.2 定制/设置窗体属性 1、在设计状态下通过属性窗口进行设定 2、在程序代码中进行设置
[Object.]Property = Expression
例如：Form1.caption=“考试系统” 特别注意：某些属性只能在代码中进行设置或改变
公共教育学院 计算机教研室
Private Sub Form_Click()
x = 50 : y = "库存书" Print "ABC1"; “wwwwwwwwww"
Print "ABC2", “qqqqq"
Picture1.Print Picture1.Print "1234567890" Picture1.Print Tab(3); "111"; y; "="; x; "本" Picture1.Print Spc(3); "222"; y; "="; x; "本" End Sub
徐州医学院VB教程
3.1.3 窗体的显示、隐藏和卸载
1. 显示与隐藏窗体
使用Show与Hide方法 [Object.]Method [p1,p2,…]
2. 装载窗体与Load事件 使用Load语句可把窗体载入内存 Load Object 3. 卸载窗体与Unload事件 4. End语句
公共教育学院 计算机教研室
1、“对象名称”可以是窗体（Form）、图片框 （PictureBox）或打印机（Printer），也可以是
立即窗口（Debug）
2 、“表达式表”是一个或多个表达式，可以是数值 以 14 个字符位置为单位把一 不同段的文字中间相 个输出行分为若干个区段， 表达式或字符串 隔一个空格，但是如 逗号后面的表达式在下一个 果是字符串的情况下， 区段输出 3、如果输出的各表达式之间用逗号分隔，则按标准 就不会有空格如果是字符 输出格式显示数据项；如果各输出项之间用分号或 空格作分隔符，则按紧凑输出格式输出数据。例如
公共教育学院 计算机教研室
徐州医学院VB教程
与Print方法有关的函数
Tab函数 Spc函数 空格函数（Space$）
公共教育学院 计算机教研室
徐州医学院VB教程
Tab函数
格式：Tab [(n)]
Tab函数把光标移到由参数n指定的列(从1开始计数，如 果n<1,则在第一列开始打印,如果参数省略则到下一个 区域输出)，从这个位置输出信息。要输出的内容放在 Tab函数的后面，并用分号隔开。 例如：print Tab(30);”asd” 在第30列的位置开始输出“asd”
公共教育学院 计算机教研室
徐州医学院VB教程
Print输出格式说明
例如： Dim a As integer, b As integer a = 100: b = 300 Print a,b Print a;b 输出结果为： 100 300 //100和300之前相隔14个字符位置 100 300 //在VB中输出数值数据时数值的前面有一个符号 位， 后面有一个空格。 对于分号情况，如果是字符串，前后就不会有空格，例如： Print “你好”；”小熊” Print”你好小熊” 结果： 你好小熊 你好小熊
公共教育学院 计算机教研室
徐州医学院VB教程
Cls方法
Cls方法用于清除运行时在窗体或图形框中用Print显示的文
本或图形。形式如下：
[对象.]Cls 其中：对象为窗体或图形框，缺省值为窗体。 例如： Picture1.Cls „清除图形框内显示的图形或文本
Cls
„清除窗体上显示的文本
公共教育学院 计算机教研室
OptionButton Frame ComboBox Timer
HscrollBar VscrollBar
PictureBox
公共教育学院 计算机教研室
徐州医学院VB教程
Name（名称）属性
该属性是所有对象都具有的属性。所有的控件 在创建时由VB自动提供一个默认名称。程序 中，对象名称是作为对象标识而引用，不会显 示在窗体上。
公共教育学院 计算机教研室
徐州医学院VB教程
Left
Top Width Height
位置
位置 位置 位置
对象左边界距容器坐标系 纵轴的距离 对象上边界距容器坐标系 横轴的距离 对象的宽度
对象的高度
Picture
外观
返回或设置对象中的图形
公共教育学院 计算机教研室
徐州医学院VB教程
窗体边框风格
设定值 0 常 vbBSNone 量 窗口无外框； 风 格
徐州医学院VB教程
Move方法
Move方法用于移动窗体或控件，另外，使用该方法还可以重新设定对
象的width和height的属性值，所以，该方法也可以用来改变对象的
大小。 [对象.]Move 左边距离[,上边距离[,宽度[,高度]]]
对象：可以是窗体及除时钟、菜单外的所有控件，缺省值为窗体 。
左边距离、上边距离、宽度、高度：数值表达式，以twip为单位(每一 英寸是1440twips ，一厘米567twips )。
BorderStyle （边框风格）属性
0——None：控件周围没有边框。
1——Fixed Single：控件带有单边框。
公共教育学院 计算机教研室
徐州医学院VB教程
Alignment属性
Alignment属性决定控件内的对齐方式。 0——Left Justify：正文左对齐 1——Right Justify：正文右对齐 2——Center：正文居中
公共教育学院 计算机教研室
徐州医学院VB教程
3.2 Visual Basic的常用控件
3.2.1 概述 3.2.2 常用控件
公共教育学院 计算机教研室
徐州医学院VB教程
3.2.1 概述
VB通过工具箱提供的用于创建用户界面的各种可视化
部件对象，称为“控件”
VB提供的基本控件有： TextBox CheckBox ListBox …… Label CommandButton
徐州医学院VB教程
Show方法： [窗体名.] Show [Style] 参数Style取值为： 1 或者vbModel 有模式，例如windows 窗口 0 或者vbModeless 无模式（缺省）,例如VB环 境 当 Show 在显示无模式窗体时，随后遇到的代 码则要执行。当 Show 在显示模式窗体 (modal form) 时，则随后的代码直到该窗体被隐藏或 卸载时才能执行。
公共教育学院 计算机教研室
徐州医学院VB教程
Font属性
Font属性改变文本的外观，其分属性有：
Name（字符型）控件上正文字体名 Size（整型）控件上正文字体大小
Bold（逻辑型）控件上正文是否是粗体
Italic （逻辑型）控件上正文是否是斜体
Strikethru （逻辑型）控件上正文是否加删除线
徐州医学院VB教程
第三章 常用控件与界面设计
3.1 3.2 3.3
创建窗体 Visual Basic的常用控件 制作菜单
公共教育学院 计算机教研室
徐州医学院VB教程
3.1 创建窗体
3.1.1 窗体的属性、方法与事件 3.1.2 定制窗体属性 3.1.3 窗体的显示、隐藏和卸载 3.1.4 Print方法
公共教育学院 计算机教研室
返回
徐州医学院VB教程
常用窗体方法
Hide：隐藏方法 Show：显示方法； Move：移动方法 Print：打印方法；
Cls：清除方法
公共教育学院 计算机教研室
徐州医学院VB教程
常用窗体事件
Click：单击事件； DblClick：双击事件； Load：装载事件.当使用 Load 语句启动应用程序， 或引用未装载的窗体属性或控件时，此事件发生。 Resize：在窗体被改变大小时，会触发本事件； Activate ：激活事件，当窗体变为当前窗口时，引发 本事件； Deactivate：失去激活事件
公共教育学院 计算机教研室
串前后就不会有空格
徐州医学院VB教程
4、print方法具有计算和输出双重功能，对于表达式，先
计算后输出。Print没有赋值功能。
例如：a=3,b=4 Print (a+b)*3 问题： Print c= (a+b)*3 输出的结果是什么？ 5、每执行以print方法都要自动换行，为了仍能在同一行 显示，可以在末尾加上一个分号或逗号。 6、有一些函数可以和print一起控制输出的格式
功能：产生由n个空格组成的字符串。
说明： n 为数值型参数，函数返回值为一个全部
由空格组成的字符串。 注意：Tab（n）等效于Space(n-1) Print “asd” & space(30) & ”efc”
公共教育学院 计算机教研室
徐州医学院VB教程
例 Print 方法的使用例。本程序执行后，输出的结果将 如图所示。
公共教育学院 计算机教研室
徐州医学院VB教程
Spc函数
格式：Spc(n)
在print的输出中，用该函数可以跳过n个空格。
Spc()函数与输出项之间用分号隔开。 Print “asd”;spc(30);”efc”
公共教育学院 计算机教研室
徐州医学院VB教程
空格函数
Space()函数
格式：Space(n)
Enabled属性决定控件是否允许操作： True：允许用户进行操作，并对操作作出 响应 False：禁止用户进行操作，呈灰色。
公共教育学院 计算机教研室
徐州医学院VB教程
Visible属性 Visible属性决定控件是否可见：
True：程序运行时控件可见 False：程序运行时控件隐藏，用户看不到，但控 件本身存在
正文以外的显示区域颜色。
公共教育学院 计算机教研室
徐州医学院VB教程
BackStyle （背景风格）属性
0——Transparent：透明显示，即控件背景颜色 显示不出来，若控件后面有其它控件均可透明 显示出来。 1——Opaque：不透明，此时可为控件设置背景
颜色。
公共教育学院 计算机教研室
徐州医学院VB教程
公共教育学院 计算机教研室
徐州医学院VB教程
Height,Width,Top,Left属性
Height和Width属性决定了控件的高度和宽 度，Top和Left属性决定了控件在窗体中 的位置。
单位为twip(特维), 1英寸=1440twip
公共教育学院 计算机教研室
徐州医学院VFra Baidu bibliotek教程
Enabled属性
Underline （逻辑型）控件上正文是否带下划线
公共教育学院 计算机教研室
徐州医学院VB教程
ForeColor（前景颜色）属性
该属性用来设置控件的前景颜色（即正文颜
色）。
如红色表示为:RGB(255,0,0)
或：Vbred
公共教育学院 计算机教研室
徐州医学院VB教程
BackColor （背景颜色）属性
公共教育学院 计算机教研室
徐州医学院VB教程
3.1.4 数据输出—Print方法
Print方法
Print 方法可以在窗体上显示文本字符串 和表达式的值，并可在其他图形对象或打印 机上输出信息。
公共教育学院 计算机教研室
徐州医学院VB教程
其一般格式为：
[对象名称.]Print[表达式表][,|;]
1
2 3 4 5
vbFixedSingle
vbSizable vbFixedDouble vbFixedToolWin dow
vbSizableToolWi ndow
单线外框，运行时窗口大小不可改变；
( 缺省值）双线外框，运行时可改变窗口大 小；
双线外框，运行时窗口大小不可改变；
包含一个关闭按钮，标题栏字体缩小，窗口大小 不可改变，在Windows95任务栏不会显示； 包含一个关闭按钮，标题栏字体缩小，窗口大小 可以改变，在Windows95任务栏不会显示。