计算机二级
在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2：六个标签，名称分别为Label1、Label2、 Latel3、Label4、Label5、Label6，其中标签Label4～Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能
题目
在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2：六个标签，名称分别为Label1、Label2、 Latel3、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=HScrolll*HScroll2 End Sub
D．Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
相似问题和答案
第1题：
在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。
Private Sub Combo1_Click（）
Call ShowItem（Combo1, Label1）
End Sub
Private Sub Combo2_Click（）
Call ShowItem（Combo2, Label2）
End Sub
Public Sub ShowItem（tmpCombo As ComboBox, tmpLabel As Label）
______.Caption =______.Text
End Sub
tmplabel tmpCombo
第2题：
在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3，La- bel4、Label5、Label6，其中标签Label4～Label6分别显示“A”；“B”、“A*B”等文字信息，标签Label1、La- bel2分别显示其右侧的滚动条的数值，LabeB显示A*B的计算结果。如图所示。
当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是
A．Private Sub Command1_Click( ) Labe3.Caption=Str(Vs1(Label1.Caption)*Val(Label2.Caption)) End Sub
B．Private Sub Command1_Click( ) Labe3.Caption=Hscroll1.Value*HscrolValue End Sub
C．Private Sub Command1_Click( ) Labe3.Caption=Hscrol11*Hscrol12 End Sub
D．Private Sub Command1＿Chek( ) Labe13.Caption=HscrolText*HscrolText End Sub
解析：为实现题目中的功能，可以把Label1与LabeL2的Caption属性值变为数值之后相乘，然后赋给kabel3的Caption属性，也可以把Hscroll2与Hscroll2的Value值相乘，把结果赋给Label3的Caption属性。所以A、B项都是可行的。由于Value属性是滚动条的默认属性，故可以省略不写，所以C项也是正确的。Text并非滚动条的属性，故D项错误。
第3题：
在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Labell、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
解析：HScroll控件缺省属性为Value，即HScroll1与HScroll1.Value相等，而其属性中没有Text属性。
第4题：
在窗体上画两个滚动条，名称分别为Hscrolll、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=HScrolll.Value*HScroll2.Value End Sub
C．Private Sub Commandl_click() Label3.Caption=HScrolll*HScroll2 End Sub
D．Private Sub Command1_Click() Label3.Caption=HScrolll.Text*HScroll2.Text End Sub
解析：HScroll控件缺省属性为Value，即HScrolll与HScrolll.Value相等，而其属性中没有Text属性。
第5题：
在窗体上画两个滚动条，名称分别为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
解析：HScroll控件缺省属性为Value，即HScroll1与HScroll1.Value相等，而其属性中没有Text属性。
第6题：
在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；6个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签Label4~Labe16分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条Value属性值，Label3显示A*B的计算结果，如下图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现求积功能的事件过程是（ ）。
A．
B．
C．
D．
本题中要求显示两个滚动条Value属性值的变化过程，并对两值求积，因为Labell和Label2分别存了两个滚动条的数值，所以可以通过标签的Caption属性取到值进行计算：也可以通过滚动条的Vlaue当前值来进行计算。注意：选项C中，没有写Value属性，而是使用滚动条的默认属性，因为滚动条的默认属性就是Value属性，所以也可以正确计算。选项D中，使用滚动条的Text属性是错误的，因为滚动条没有Text属性。
第7题：
在窗体上画两个名称分别为Label1和Label2的标签，再画一个名称为Command1的命令按钮，然后编写如下事件过程：
运行上面的程序，单击命令按钮．其输出结果是
A．8 9
B．8 18
C．64 9
D．64 18
解题的关键是窗体变量X和局部变量Y的作用域及过程调用时的参数传递方式。窗体变量X的作用域是该窗体内的所有过程，所以虽然是传值，但在过程Subl中可见，因此在该过程中使用了窗体变量X，这个“x＝a*a”直接将该窗体变量X的值改变为64。而y则是过程Command1_Click的内部变量，与过程Sunl中的变量y没有关系，标签Label2显示的是本过程的Y值，即9。正确答案为c。
第8题：
在窗体上画两个名称分别为Hscroll1、Hscroll2的滚动条控件；6个名称分别为Label1、Label2、Label3、Label4、Label5、Label6的标签，其中，Label4～Label6分别显示“A”、“B”、“A*B’ 等文字信息，标签Label1、Label2分别显示其右侧的滚动条Value属性值，Label3显示A*B的计算结果，如图1所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现求积功能的事件过程是（ ）。
D) 【解析】本题考查滚动条的属性。滚动条Value属性表示滑块的位置值，为数值型；而标签的Caption为字符串型。因此，要将滚动条的Value属性值显示在标签上，需要进行类型转换(将数值型数据转换成字符串型数据)。
第9题：
（13）在窗体上画两个组合框，其名称分别为Combo1、Combo2,然后画两个标签，名称分别为Label1、Label2.要求程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下的标签中显示出来，请填空使程序完整。Private Sub Combo1_Click() Call ShowItem(Combo1,Label1) End SubPrivate Sub Combo2_Click() Call ShowItem(Combo2,Label2)End SubPrivate Sub ShowItem(tmpCombo As ComboBox,tmpLabel As Label) Caption=_____.TextEnd Sub
【解析】标签控件的Caption属性显示标签中的内容，组合框的Text属性显示选择或输入的数据项的内容，要把选择的项目显示在标签中，应该是用组合框的Text为标签的Caption属性赋值。用户定义的ShowItem过程中定义了两个控件型参数（tmpCombo和tmpLabel），因此，在该过程中使用tmpCombo和加pLabel来表示组合框和标签控件。