picture

picturectrl控件中加载图⽚并显⽰_VBA窗体与控件（⼀）

第六章窗体与控件

6.1窗体基本知识

6.1.1创建⽤户窗体

创建⽤户窗体的⽅法是：在VBA编辑器窗⼝中执⾏“插⼊”-“⽤户窗体”，就可以插⼊⼀个默认名为UrForm1的⽤户窗体，同时弹出窗

体控件⼯具箱，⽤户要以在窗体中插⼊各种插件。

6.1.2设置⽤户窗体的属性

1.更改⽤户窗体名称

更改⽤户窗体名称必须通过窗体的属性窗⼝来实现。将光标移到“名称”属性右边的属性值栏中，删除窗体的默认名，然后输⼊新名称。

2.更改窗体的标题⽂字

通过属性窗⼝来实现，也可以在程序运⾏过程中进⾏修改，通过后者可以更加灵活地设置窗体的标题，使窗体的标题显⽰当前的⼯作状态。

通过窗体的属性窗⼝更改窗体的标题⽂字的⽅法是：将光标移到caption属性右边的属性值栏中，删除窗体的默认标题⽂字，然后输⼊新标

题⽂字。

在程序运⾏过程中修改窗体的标题⽂字的语句如下：

窗体名称.caption=新标题⽂字

6.1.3加载和卸载⽤户窗体

1.加载并显⽰窗体

利⽤窗体对象的show⽅法可以把还没有加载到内存的窗体加载到内存，并显⽰窗体，或者显⽰已经加载到内存但还没有显⽰的窗体。

窗体名.show

默认情况下，窗体的显⽰是有模式的，也就是当显⽰窗体时，我们⽆法操作⼯作表，只能操作当前的窗体及其上⾯的控件，如果要在打开窗

体时也能同时操作⼯作表，可以显⽰为⽆模式。

语句为：

窗体名.show0

2.加载但不显⽰窗体

利⽤load语句可以将窗体对象加载到内存，但不显⽰窗体。只要不卸载窗体，利⽤load语句加载到内存的窗体对象将⼀直存在并占⽤内存和

资源，并且可以随时利⽤show⽅法显⽰窗体，或者利⽤hide⽅法隐藏窗体。语句如下：

load窗体名

3.隐藏窗体

利⽤窗体对象的Hide⽅法可以隐藏窗体。隐藏窗体时，将从屏幕上删除窗体，但在VB应⽤程序中并不卸载窗体，仍然可以引⽤隐藏窗体中

的控件。

4.卸载窗体

利⽤unload语句可以把加载到内存中的窗体对象从内存中卸载。

unload窗体名

释放内存和资源的唯⼀⽅法是卸载窗体，并把所有引⽤设置为nothing.语句如下：

t窗体名=nothing

6.1.4利⽤事件控制⽤户窗体

为窗体指定事件的具体步骤如下：

1.⽤⿏标双击窗体，或直接按F7键，进⼊窗体的代码窗⼝，此时，系统⾃动为窗体指定⼀个click事件。

2.若⽤户需要为窗体指定⼀个Initialize事件，则可以单击“过程/事件”框的下拉箭头，从下拉列表中选取Initialize事件。

下⾯程序就是在启动窗体时为组合框设置项⽬，并为窗体中的控件设置初始值。

双击进⼊代码窗⼝，输⼊以下代码：

PrivateSubUrForm_Initialize()

n="我的窗体"

WithComboBox1

.AddItem"机械制图"

.AddItem"计算机基础"

.AddItem"数控技术"

.Value="机械制图"

EndWith

=Date

n="选择姓名"

n="选择编号"

EndSub

运⽤上⾯代码可以给窗体初始化效果如下所⽰：

6.2控件基本知识

6.2.1在窗体中插⼊控件

在窗体中插⼊控件，⾸先在控件⼯具箱中⽤⿏标选择要插⼊的控件，然后将⿏标移到窗体中要插⼊控件的位置，此时⿏标指针变为⼗字形

状，并在⿏标指针的右下⽅显⽰该控件的图标，然后向右向下拖曳⿏标，就可以窗体中插⼊控件。

对于不在控件⼯具箱的控件，则需要“⼯具/附加控件”，在“可⽤控件”列表中勾选，⽐如TreeView控件来让其显⽰在控件⼯具箱中才可

以使⽤。

6.2.2控件的属性、⽅法与事件

控件是⼀个对象，因此它也有属性、⽅法和事件，每⼀个控件都有⾃⼰的属性、⽅法和事件。

控件的属性如尺⼨、颜⾊、对齐⽅式、外观等。

控件⽅法有AddItem、等。

控件事件：各个控件事件有所不同，常⽤的有click、chang事件等。

6.2.3设置控件的属性

尽管不同的控件有许多不同于其他控件的独有属性，但也有很多属性是许多控件都具有的，这些属性在各⾃的控件中的含义也是相同的。例

如，width属性(宽度)、height属性(⾼度)、enable属性(是否可操作)、Backcolor属性，Forecolor属性(前景颜⾊)，Font属性(字体)等。

⼀、标签

标签是VBA中最简单的控件，主要⽤于显⽰字符串。例如，为⽂本框、复合框、列表框等控件添加描述性的⽂字，以便⽤户了解这些控件的

功能。标签不能作为输⼊信息的界⾯。

标签的名字是Label,插⼊的标签默认名字都是Label1,Label2,Label3……….

标签的默认属性是Caption属性，标签的默认事件是Click事件。

标签的基本设置项⽬包括Caption属性、前景样式、前景⾊和背景⾊、边框和边框外观等。

重要的属性如下：

⼀、⾏为：

ze属性

AutoSize属性使控件能够更改其⼤⼩(如有必要)，以达到由PreferredSize属性指定的值。通过设置AutoSizeMode属性，可以调整特定

控件的⼤⼩调整⾏为。只有⼀些控件⽀持AutoSize属性。此外，⼀些⽀持AutoSize属性的控件也⽀持AutoSizeMode属性。

d属性：控件是否可⽤。

ign:⽂本⽔平对齐⽅式，左对齐，居中对齐，右对齐三种⽅式。

ap:标签⽂本是否允许换⾏。

⼆、图⽚

e:可以为标签背景添加图⽚。

eposition:标签背景图⽚位置。

三、外观

lor属性：背景颜⾊

yle:背景模式，分两种：0-fmcycleallforms,标签背景隐藏在窗体之下。1-fmbackstyleopaue，标签背景颜⾊在窗体之上。

color:边框颜⾊

style:边框样式

n:标签显⽰的⽂本。

ltiptext:属性来指定在屏幕提⽰中显⽰的⽂本，当⿏标指针悬停在控件上时。

e:标签是否可见。

lor：字体颜⾊。

四、位置

:标签的⾼度

:标签距窗体左边距离。

:标签距窗体上边距离。

:标签宽度。

五、字体

属性：字体设置。

六、杂项

ex属性:按Tab键时的索引号。控件的tabindex属性⽤来确定控件被放置在⽤户窗体上的顺序，它决定了当⽤户按下tab键时控件的

转换顺序。

p属性：⽤来确定控件是否⾼亮显⽰，那些不能与⽤户交互的控件的tabstop属性被设置为fal。