(2).在"表单控件"工具栏中,分别选择"标签"、"文本框"及"命令按钮"控件,在表单上单击,添加2个标签label1和label2,2个文本框text1和text2,1个命令按钮command1,如图3.
( a) ^" R$ `/ U+ o" j% i (3).在"表单设计器"中选中command1,然后在"属性"窗口中将command1的caption属性改为"显示",如图4.7 C) `& l8 C+ Y
+ H2 k0 J6 s% S+ b6 o! I* W
再单击表单设计器空白处,选中表单form1,在"属性"窗口中将其autocenter属性设为。t.(把表单的autocenter属性设为。t.,运行时,表单会自动居中在主窗口的中央),如图5
. j+ S$ \- ^) S' t& ~9 D: F
: Q2 O0 y1 M0 b4 R* a (4).在"表单设计器"窗口中,双击"显示"按钮,出现代码窗口,在其中的click事件(即鼠标单击时发生的事件)中输入下面的代码:(如图6)
! i% _7 ^9 A+ l8 H5 { 3 B7 L1 G5 N6 |# W& [
thisform.text2.value=thisform.text1.value,然后按组合键ctrl+w保存代码。
- E' s0 B$ i, ]4 m/ m8 z (5).单击"表单"主菜单中的"执行表单"菜单项,如图7,为表单选一个保存位置,即可运行表单。
" G/ _( V% O$ o% V4 ]( r$ W 1 L# u$ J: x, t9 m e4 |' I V- X. x
(6).运行时,我们在第1个文本框中输入任意字符,再单击"显示"按钮,文本框1的内容即会显示在文本框2中。为什么会这样呢?实际上,显示文本这个事件是由命令按钮command1的click事件触发的,我们运行时单击了command1(即"显示"按钮),即触发了该按钮的click事件,调用 click事件中的代码。我们来分析一下其中的代码:3 f+ {1 L1 c+ [: F }
thisform.text2.value=thisform.text1.value,这里使用的是绝对引用的形式,从最外层容器--当前表单出发,取出text1的value属性值(即我们通过键盘输入到text1里的值),然后将该值赋给text2的value属性,所以在第二个文本框中就会显示出第一个文本框的值。; I' D1 x' [* _$ a; G; e
(7).也可在第(4)步中,将"显示"按钮的click代码改为相对引用的形式,效果是相同的,代码如下:
8 H5 [# D% Q3 u3 {8 N* R5 o this.parent.text2.value=this.parent.text1.value
2 W8 `3 Z. p# G$ F9 V 再来分析一下这句代码,单击鼠标时触发click事件,当前对象当然是"显示"按钮了,代码中的"this"即代表"显示"按钮,"this.parent"为"显示"按钮的父对象(即表单),"this.parent.text1"定位到表单中的text1,然后取出它的 value值赋给text2的value. |