问答题
完成下列问题：
问答题
在名称为Form1的窗体上画一个名称为Label1、标题为“滚动条控件”的标签，一个名称为Hscroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最小值为1，最大值为100，滚动条的宽度为3000、高度为300，滚动块的初始位置为20。程序运行后的窗体如图1所示。
[*]
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.1frm。
[*]
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.1frm。
【正确答案】[操作步骤]
第1步：新建一个标准EXE工程。
第2步：在窗体上画一个标签控件，设置其Caption属性为“滚动条控件”。
第3步：在窗体上画一个水平滚动条，保持其名称HScroll1不变，设置其Min属性值为1，Max属性值为100，Width属性值为．3000，Height属性值为300，Value属性值为20。
第4步：调试、运行并保存程序。
第1步：新建一个标准EXE工程。
第2步：在窗体上画一个标签控件，设置其Caption属性为“滚动条控件”。
第3步：在窗体上画一个水平滚动条，保持其名称HScroll1不变，设置其Min属性值为1，Max属性值为100，Width属性值为．3000，Height属性值为300，Value属性值为20。
第4步：调试、运行并保存程序。
【答案解析】[解析] 滚动条的取值范围由其Min和Max两个属性控制，滚动块的初始位置由Value属性控制，滚动条的Width和Height属性分别表示滚动条控件的宽度和高度。
问答题
在名称为Form1的窗体上画一个名称为Shape1的形状控件，位置在窗体的顶部，在属性窗口中将其设置为圆形。画一个名称为Timer1的计时器，在属性窗口中将其设置为不可用，时间间隔为0.5s，窗体如图2所示。请编写窗体的Load事件过程和计时器的事件过程，使得程序一开始运行．计时器即变为可用，且每隔0.5s形状控件向下移动100。
[*]
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
[*]
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
【正确答案】[操作步骤]
第1步：新建一个标准的EXE工程，保持现有窗体默认属性值不变。
第2步：在窗体上画一个形状控件，保持其名称Shape1不变，修改其Top属性值为0，修改其Shape属性值为3-Circle。
第3步：在窗体上画一个计时器控件，修改其Enabled属性值为False，修改其Interval属性值为500。
第4步：编写代码。在代码编写窗口中，分别编写窗体的Load事件过程和计时器的Timer事件过程。
Private Sub Form_Load()
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
Shape1.Top=Shape1.Top+100
End Sub
第5步：调试、运行并保存程序。
第1步：新建一个标准的EXE工程，保持现有窗体默认属性值不变。
第2步：在窗体上画一个形状控件，保持其名称Shape1不变，修改其Top属性值为0，修改其Shape属性值为3-Circle。
第3步：在窗体上画一个计时器控件，修改其Enabled属性值为False，修改其Interval属性值为500。
第4步：编写代码。在代码编写窗口中，分别编写窗体的Load事件过程和计时器的Timer事件过程。
Private Sub Form_Load()
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
Shape1.Top=Shape1.Top+100
End Sub
第5步：调试、运行并保存程序。
【答案解析】[解析] 形状控件的位置由其Left和Top属性控制，将其Top属性设置为0可使形状控件紧贴窗体的上边界；形状控件的形状由Shape属性控制，要显示为圆形，则需要将Shape属性设置为3-Circle。计时器控件的是否可用由Enabled属性控制，在计时器控件的Timer事件过程中改变形状控件的Top属性可以使得形状控件在竖直方向连续移动。