[单选题]

在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签Label4～Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是______。

A．Private Sub Command1_Click() Label3. Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub

B．Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub

C．Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End Sub

D．Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub

参考答案与解析：

相关试题

在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2:六个标签,名

[单选题]在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2：六个标签，名称分别为Label1、Label2、 Latel3、Label4、Label5、Label6，其中标签Label4～Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中

  • 查看答案

    • 在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;6个标签,名

    [单选题]在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；6个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签Label4~Labe16分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条Value属性值，Label3显示A*B的计算结果，如下图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果

  • 查看答案

    • 在窗体上画两个滚动条,名称分别为Hscrolll、Hscroll2;六个标签,名

    [单选题]在窗体上画两个滚动条，名称分别为Hscrolll、Hscroll2;六个标签，名称分别为Label1、Label2、 Label3、Label4、Label5、Label6，其中标签Label4-Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中

  • 查看答案

    • 在窗体上画两个名称分别为Hscroll1、Hscroll2的滚动条控件;6个名称

    [单选题]在窗体上画两个名称分别为Hscroll1、Hscroll2的滚动条控件；6个名称分别为Label1、Label2、Label3、Label4、Label5、Label6的标签，其中，Label4～Label6分别显示“A”、“B”、“A*B’ 等文字信息，标签Label1、Label2分别显示其右侧的滚动条Value属性值，Label3显示A*B的计算结果，如图1所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将

  • 查看答案

    • 在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条

    [单选题]在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示。 以下能实现上述操作的程序段是（ ）。A．Private Sub Hscroll1_Change（）Text1.Text=HScroll1.ValueE．nd SubB．Private Sub Hscroll1_Click（）Text1.Text=HScroll1.ValueE．nd SubC．Private

  • 查看答案

    • 在窗体上画一个名称为Text1的文本框.然后画一个名称为HScroll1的滚动条

    [单选题]在窗体上画一个名称为Text1的文本框．然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图16-6所示。 以下能实现上述操作的程序段是______。A．Private Sub HScroll1_Change() Text1.Text=HScroll1. Value End SubB．Private Sub HScroll1_Click() Text1. Text=HScroll1. Value End

  • 查看答案

    • 在窗体上画一一个名称为Text1的文本框,然后画一个名称为Hscroll1的滚动

    [单选题]在窗体上画一一个名称为Text1的文本框，然后画一个名称为Hscroll1的滚动条，其Min和Max属性分别为0和1 000。程序运行后，如果移动滑块，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是（ ）。

  • 查看答案

    • 在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名

    [试题]在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。Private Sub Combo1_Click（）C．all ShowItem（Combo1, Label1）E．nd SubPrivate Sub Combo2_Click（）C．all ShowItem（Combo2, Label2）E．nd SubPublic Sub Sh

  • 查看答案

    • 设窗体有上一个名称为HScroll1的水平滚动条,要求当滚动块移动位置后,能够在

    [主观题]设窗体有上一个名称为HScroll1的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离(即新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数)。下面是可实现此功能的程序，请填空。 Dim (7) AsInteger Private Sub Form_Load Pos＝HScrol1．Value End Sub Private Sub HScroll1_Change Print (8) - pos Pos＝HScrolll．Value End Sub

  • 查看答案

    • 窗体上有一个名称为HScroll 1的滚动条,程序运行后,当单击滚动条两端的箭头

    [单选题]窗体上有一个名称为HScroll 1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是( )。A． Private Sub HScroll 1_Change() Print HScroll1.Value End SubB．Private Sub HScroll 1_Change() Print HScroll1.SmallChange End SubC．Private Sub HScroll1 Scroll() Print

  • 查看答案