(1)在名称为Form1的窗体上添加一个名称为Label1、标题为“滚动条控件”的标签,一个名称为HScroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最大值为100,最小值为1,滚动条的高度为300,宽度为3000,滚动块的初始位置为

admin2015-06-30  34

问题 (1)在名称为Form1的窗体上添加一个名称为Label1、标题为“滚动条控件”的标签,一个名称为HScroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最大值为100,最小值为1,滚动条的高度为300,宽度为3000,滚动块的初始位置为20。程序运行后的窗体如图所示。

    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
    (2)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,位置在窗体的顶部,在属性窗口中将其设置为圆形。添加一个名称为Timer1的计时器,在属性窗口中将其设置为禁用,时间间隔为0.5秒,窗体如图所示。请编写窗体的Load事件过程和计时器的事件过程,使得程序一开始运行,计时器即变为可用,且每隔0.5秒形状控件向下移动100。

    注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。

选项

答案(1)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.144。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.145。 [*] 步骤2:编写程序代码。 参考答案 Private Sub Form_Load() Timer1.Enabled = True End Sub Private Sub Timer1_Timer() Shape1.Top = Shape1.Top + 100 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析
转载请注明原文地址:https://jikaoti.com/ti/P160FFFM
0

最新回复(0)