(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。 (1)在名称

admin2017-09-22  31

问题 (1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。
    (1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。
    注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
    (2)在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为“等级考试",显示为宋体10号字,且能根据标题内容自动调整标签的大小,并有凹陷效果,如图3-28所示。再画1个名称为Timerl的计时器控件,通过属性窗口设置有关属性,使其不可用,时间间隔为1秒。

    要求:编写适当的事件过程,使得程序运行时,单击Label1标签,则每隔1秒,Label1中所显示的内容在原有基础上增大1个字号;单击窗体,Label1中的内容停止增大。
    注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案(1)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个垂直滚动条。按表4.18设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个标签和定时器。按表4.19设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写标签、窗体的Click事件代码和定时器Timer事件代码。参考代码: Private Sub Form_Click() Timerl.Enabled=False End Sub Private Sub Label1_Click() Timerl.Enabled=True End Sub Private Sub Timerl_Timer() Label1.FontSize=Label1.ForltSize+1 End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 (1)根据题目要求,在窗体上添加一个垂直滚动条,并设置其属性。滚动条的Max属性、Min属性限定了滚动条所能表示的最大值和最小值,也是Value属性值的取值范围,在程序中改变Value属性的值,滚动条滑块会随之移动到相应位置。
    设置滚动块位于滚动条的中间位置,即把Value属性设置为Min和Max平均值。
  (2)根据题目要求在单击标签框的时候周期性地增大1个字号,需要在标签的Click事件代码里面使能定时器Timerl。在定时器的Timer事件代码里面将标签的FontSize增加1。早单击窗体时,停止增大,说明在窗体的Click事件代码里面禁用定时器Timerl。
转载请注明原文地址:https://kaotiyun.com/show/XjGp777K
0

最新回复(0)