问答题
在名称为Form1的窗体上添加两个命令按钮(见图1)，其名称分别为Cmd1和Cmd2，编写适当的事件过程。程序运行后，单击命令按钮Cmd1，则可使该按钮移到窗体的左上角(只允许通过修改属性的方式实现)；单击命令按钮Cmd2，则可使该按钮在长度和宽度上各扩大到原来的2倍。程序的运行情况如图2所示。
要求：不得使用任何变量。
注意：存盘时必须存放在 下，工程文件名保存为sjt2.vbp，窗体文件名保存为sjt2.frm。
图1
要求：不得使用任何变量。
注意：存盘时必须存放在 下，工程文件名保存为sjt2.vbp，窗体文件名保存为sjt2.frm。
图1
【正确答案】
【答案解析】[操作步骤]
步骤1：建立界面，并设置控件的属性。程序中用到的控件及属性见下表。
步骤2：编写程序代码。
Option Explicit
Private Sub Cmd1_Click()
Cmd1. Left=0
Cmd1. Top=0
End Sub
Private Sub Cmd2_Click()
Cmd2. Height=Cmd2. Height*2
Cmd2. Width=Cmd2. Width *2
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
答案考生文件夹 [解析] 在窗体上建立控件后，先设置控件的属性，再编写事件过程。
单击命令按钮触发Click事件。利用按钮的Height和Width属性来改变按钮的大小；利用按钮的Left和Top属性来改变按钮的位置。
步骤1：建立界面，并设置控件的属性。程序中用到的控件及属性见下表。
| 控件 | 命令按钮 | 命令按钮2 | ||
| 属性 | Caption | Name | Caption | Name |
| 设置值 | Cmd1 | Cmd1 | Cmd2 | Cmd2 |
Option Explicit
Private Sub Cmd1_Click()
Cmd1. Left=0
Cmd1. Top=0
End Sub
Private Sub Cmd2_Click()
Cmd2. Height=Cmd2. Height*2
Cmd2. Width=Cmd2. Width *2
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
答案考生文件夹 [解析] 在窗体上建立控件后，先设置控件的属性，再编写事件过程。
单击命令按钮触发Click事件。利用按钮的Height和Width属性来改变按钮的大小；利用按钮的Left和Top属性来改变按钮的位置。