2011年度计算机等级考试二级VFP基础教程(34)

会计考友

　一.标签控件用于显示文本,一般用于显示提示信息.显示文本的格式由标签的属性设置.常用属性见下表:　　二。例1:
　　1.新建一个表单，表单中添加三个命令按钮commadn1～command3,一个标签控件label1,分别设置三个命令按钮的caption属性值为"显示1","显示2"和"隐藏",如图17
$ U  \+ i5 ~( T9 i& r* b6 I
& x0 y) S6 m8 j5 a) n　　2.添加事件代码：
7 k1 f2 {" T; d0 Z% H5 m( A. r) X　　*表单的init事件：
　　thisform.autocenter=.t.
4 }5 I: B5 ?8 t　　thisform.caption="标签控件演示"
　　thisform.label1.autosize=.t.
　　thisform.label1.visible=.f.
　　*"显示1"命令按钮的click事件：
　　thisform.label1.forecolor=rgb(0,255,0)
　　thisform.label1.visible=.t.
% j1 d' l5 h* b9 }% f* i　　thisform.label1.caption="你好"
　　thisform.label1.fontsize=10
; P5 j5 P1 B8 Q  O; ]$ i/ r6 u　　*"显示2"命令按钮的click事件：
　　thisform.label1.forecolor=rgb(255,0,0)
; ^; q: {( I% ?" @% C* V  h　　thisform.label1.visible=.t.
　　thisform.label1.caption="hello"
7 r2 O( w3 O. f3 K# `; h  @　　thisform.label1.fontsize=18
　　*"隐藏"命令按钮的click事件：
- b8 {& [* q7 Q5 M* `' r, J$ U& C* c　　thisform.label1.visible=.t.
　　3.保存并运行该表单，分别单击三个命令按钮，观察效果

会计考友

三。例2:在屏幕上移动的字幕　　1.新建一个表单，在表单上添加一个标签label1,设置该标签的属性如下：
# v4 z* m3 `5 `' H, T% I　　caption="大家好"
　　fontname="楷体_GB2312"
　　fontbold=.t.
　　forecolor=rgb(255,0,0)
3 D0 M* V3 Y1 m0 X& d: G/ s* P　　alignment=2
9 s, j* C2 a& {" s" o2 \) }- Y　　2.编写事件代码：
　　*标签label1的click事件代码如下：
　　do while .t.
& a9 d2 ^5 D3 V: j: n　　for i=thisform.width step 10
5 `1 P3 ?% b0 q　　this.left=i
% k. Z6 H" Z, U, s/ p7 ^; P4 D　　=inkey(1) &&延时1秒
0 I9 |0 X/ e3 h, v- [　　next i
　　enddo
# ^8 J! C2 z& S　　3.保存并运行该表单，单击标签控件，观察效果。
　　注意：此程序运行后，必须按ctrl+alt+del终止vfp才能退出去，想想为什么?
　　四。用标签产生特殊效果的方法：
　　1.字排多行：在需换行的地方加chr(13)回车符，例如caption="你"+chr(13)+"好"
: I% F! ~7 H) e- \+ O4 A- T　　2.改变字的方向：设fontname属性为带@的字体名。
　　3.字从小到大：用一个循环不断改变标签的fontsize,同时调整top和left属性，每次增加一个值，直到最大时停止：this.top=thisform.height/2-this.fontsize/2
+ l  w  B; U, _  M1 B　　4.立体字：设计两个标签，将另一个标签的相对位置略加移动，forecolor设置不同的颜色，就可以产生立体字的效果。