niusouti.com

窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Linel。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。1)Timer1的Interval属性的值应事先设置为【 】2)Private Sub Command1_ Click()Timer1. Enabled=TrueEnd SubPrivate Sub Tuner1_Timer()If

题目

窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Linel。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。

1)Timer1的Interval属性的值应事先设置为【 】

2)Private Sub Command1_ Click()

Timer1. Enabled=True

End Sub

Private Sub Tuner1_Timer()

If Imagel. Left＞【 】 Then

Image1.Left= 【 】 -100

End If

End Sub

相似考题

1.设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是（ ）。A．窗体的Click事件过程的过程名是Myform_ClickB．命令按钮的Click事件过程名是C1_ClickC．命令按钮的Click事件过程的过程名是Command1_ClickD．以上三种过程名称都是错误的

2.在窗件上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_ Click() Move 500, 500End Sub程序运行后，单击命令按钮，执行的操作为______。A．命令按钮移动到距窗体左边界、上边界各500的位置B．窗体移动到距屏幕左边界、上边界各500的位置C．命令按钮向左、上方向各移动500D．窗体向左、上方向各移动500

3.在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：程序执行时，单击命令按钮，实现的功能是（ ）。A. 命令按钮移动到距窗体左边界、上边界各500的位置B. 命令按钮向左、上方向各移动500C. 窗体移动到距屏幕左边界、上边界各500的位置D. 窗体向左、上方向各移动500

4.设在名称为Myform的窗体上只有—个名称为C1的命令按钮，下面叙述中正确的是______。A．窗体的Click事件过程的过程名是Myform. ClickB．命令按钮的Click事件过程的过程名是C1 CrickC．命令按钮的Click事件过程的过程名是Commandl ClickD．上面3种过程名称都是错误的

更多“ 窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Linel。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直”相关问题

  • 第1题：

    在名称为Forml的窗体上添加一个名称为Imagel的图像框，其高、宽分别为l900、1700，通过属性窗口把考生文件夹下的图像文件picl．bmp载入图像框；再画两个命令按钮控件，名称分别为Cl、C2，标题分别为“放大”、“缩小”，如图所示。

    要求：

    ①请编写适当的事件过程，程序运行后，如果单击“放大”按钮，则将图像框的高度、宽度均增加100；单击“缩小”按钮，则将图像框的高度、宽度均减少100，要求程序中不得使用任何变量。

    ②通过属性窗口设置图像框的适当属性，使得在放大、缩小图像框时，其中的图像也自动放大、缩小。

    注意：存盘时必须存放在考生文件夹下，工程文件名保存为sit2．vbp，窗体文件名保存为sjt2．frm。


    正确答案：

    【考点分析】本题考点有：图像框的Name、Width、Height、Picture和Stretch属性，命令按钮的Name、Caption属性。
    【解题思路】图像框(Image)控件的Picture属性用于在设计阶段时装载在图像框中显示的图片，它的Stretch(自动伸缩)属性用来设定载入其中的图片是否需要自动调整，以适应图像框的大小。图像框的宽和高分别由其Width属性和Hcight属性设置。
    本题要在单击按钮时实现“放大”或“缩小”的功能，应在程序中动态设置图像框大小(宽和高)，即在其原来基础上增加或减小图像框的宽和高。
    【操作步骤】
    步骤1：新建一个窗体，按照题目要求建立控件并设置图像框相应属性，如图3．17所示。


    步骤2：按照步骤I设置其他控件相关属性，程序中涉及的控件及属性见表3．10。


    步骤3：打开代码编辑窗口，在指定位置编写如下代码。
    参考答案
    Private Sub C1_Click()′当单击"放大"按钮时，依次将Imagel的高与宽分别加100
    Image1．Height=Image1．Height+100
    Image1．Width=Image1．Width+100
    End Sub
    Private Sub C2_Click()1当单击”缩小”按钮，则依次
    将Imagel的高与宽分别减100
    Image1．Height=Image1．Height-100
    Image1．Width=Image1．Width-100
    EndSub
    步骤4：调试并运行程序，关闭程序后按题目要求存盘。

  • 第2题：

    （ 6 ）窗体如图所示，其中汽车是名称为 Image1 的图像框，命令按钮的名称为 Command1, 计时器的名称 为Timer1, 直线的名称为 Line1 。 程序运行时 ， 单击命令按钮 ， 则汽车每 0.1 秒向左移动 100 ， 车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。

    1 Timer1 的 Interval 属性的值应事先设置为【 6 】

    2 Private Sub Command1_Click()

    Timer1.Enabled=True

    End Sub

    Private Sub Timer1_Timer()

    If Image1.Left>= 【 7 】 Then

    Image1.Left= 【 8 】 -100

    End If

    End Sub


    正确答案：

  • 第3题：

    设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是（）。

    A．窗体的Click事件过程的过程名是Myform_Click

    B．命令按钮的Click事件过程的过程名是Command_Click

    C．命令按钮的Click事件过程的过程名是Command1_Click

    D．命令按钮的Click事件过程的过程名是C1_Click


    B

  • 第4题：

    在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为( )

    A．命令按钮移动到距窗体左边界、上边界各500的位置

    B．窗体移动到距屏幕左边界、上边界各500的位置

    C．命令按钮向左、上方向各移动500

    D．窗体向左、上方向各移动500


    正确答案：B

  • 第5题：

    在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

    Private Sub Command1_Click（ ）

    Move 500，500

    End Sub

    程序运行后，单击命令按钮，执行的操作为（ ）。

    A．命令按钮移动到距窗体左边界、上边界各500的位置

    B．窗体移动到距屏幕左边界、上边界各500的位置

    C．命令按钮向左、上方向各移动500

    D．窗体向左、上方向各移动500


    正确答案：B

相关内容