操作题
2. 在名称为Form1的窗体上添加一个名称为Label1的标签，使其初始内容为空，且能根据其标题内容自动调整标签的大小；再添加两个命令按钮，标题分别为“日期”和“时间”，名称分别为Command1、Command2。请编写两个命令按钮的Click事件过程，使得单击“日期”按钮时，标签内显示系统当前日期；单击“时间”按钮时，标签内显示系统当前时间。如图所示。
【正确答案】【操作步骤】
步骤1：建立界面，添加相应控件并设置控件的属性。程序中用到的控件及属性见表。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Comand1_Click()
Label1=Date '用于返回系统当前日期
End Sub
Private Sub Command2_Click()
Label1=Time '用于返回系统当前时间
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
步骤1：建立界面，添加相应控件并设置控件的属性。程序中用到的控件及属性见表。
| 控件 | 属性 | 设置值 | |||||||||||||||||||||
| 标签 | Name | Label1 | |||||||||||||||||||||
| Caption | |||||||||||||||||||||||
| AutoSize | Ture | ||||||||||||||||||||||
| 命令按钮1 | Name | Command1 | |||||||||||||||||||||
| Caption | 日期 | ||||||||||||||||||||||
| 命令按钮2 | Name | Command2 | |||||||||||||||||||||
| Caption | 时间 | ||||||||||||||||||||||
参考答案
Private Sub Comand1_Click()
Label1=Date '用于返回系统当前日期
End Sub
Private Sub Command2_Click()
Label1=Time '用于返回系统当前时间
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【答案解析】[考点] 本题考点有：标签的Name、Caption和AutoSize属性，命令按钮的Name和Caption属性，Date()函数以及Time()函数。
通过标签的Name和Caption属性设置标签的名称和标题，AutoSize属性实现标题内容的自动调整，通过命令按钮的Name和Caption属性设置命令按钮名称和标题，Date()函数用于返回系统日期，Time()函数用于返回系统时间。
通过标签的Name和Caption属性设置标签的名称和标题，AutoSize属性实现标题内容的自动调整，通过命令按钮的Name和Caption属性设置命令按钮名称和标题，Date()函数用于返回系统日期，Time()函数用于返回系统时间。