以下过程是标签Label1的（）事件。 Prviate Sub Label1_Click（） …… End SubA、单击B、双击C、拖拽D、移动

题目

以下过程是标签Label1的（）事件。 Prviate Sub Label1_Click（） …… End Sub

A、单击
B、双击
C、拖拽
D、移动

相似考题

1.在窗体上画一个文本框（其名称为 Text1）和一个标签（其名称为 Label1），程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容，以下可以实现上述操作的事件过程是（）。A．Private Sub Text1_Click（）Label1.Caption=Textl.TextEnd SubB．Private Sub Text1_Change（）Label1.Caption=Text1.TextEnd SubC．Private Sub Label1_Ctrange（）Label1.Caption=Text1.TextEnd SubD．Private Sub Label1_Click（）Label1.Caption=Text1.TextEnd Sub

2.（ 20 ）在窗体上画一个命令按钮和两个标签，其名称分别为 Command1 、 Label1 和 Label2 ，然后编写如下事件过程：Private Sub Command1_Click()a = 0For i = 1 To 10a = a + 1b = 0For j = 1 To 10a = a + 1b = b + 2Next jNext iLabel1.Caption = Str(a ）Label2.Caption = Str(b ）End Sub程序运行后，单击命令按钮，在标签 Label1 和 Label2 中显示的内容分别是A ） 10 和 20B ） 20 和 110C ） 200 和 110D ） 11 0 和 20

3.在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是______。A．12B．13C．14D．15

4.在窗体上面画一个命令按钮和一个标签，其名称分别为 Command1和 Label1，然后编写如下事件过程：Private Sub Commandl_Click（）Counter=0For i=1 To 4For j=6 To 1 Step -2Counter=Counter+1Next jNext iLabel1.Caption=Str（Counter）End Sub程序运行后，单击命令按钮，标签中显示的内容是（）。 A．11B．12C．16D．20

更多“以下过程是标签Label1的（）事件。 Prviate Sub”相关问题

第1题：

在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10,10)As Integer Dim i As Integer,j As Integer For i =2 To 4 For j =2 To 4 arr(i,j)=i*j Next j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是( )。
A．12
B．13
C．14
D．15

正确答案：B
第2题：

窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是： ______。
A．Private Sub Text1_Change() Label1.Caption=Text1.Text End Sub
B．Private Sub Text1_Click() Label1.Caption=Text1.Text End Sub
C．Private Sub Label1_Change() Label1.Caption=Text1.Text End Sub
D．Private Sub Labell_Click() Label1.Caption=Text1.Text End SUb

正确答案：A
解析：当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在Text1_Change()事件中。
第3题：

在窗体上画两个滚动条，名称分别为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

正确答案：D
解析：HScroll控件缺省属性为Value，即HScrolll与HScrolll.Value相等，而其属性中没有Text属性。
第4题：

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click( ) S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是
A．1
B．5
C．27
D．45

正确答案：B
解析：本题如果实际带值计算可能比较麻烦。题意表明，如果遇到x为3的倍数时，s就加1，可见当i取1到15之间的数时，选C、D明显不符合实际情况，选A也不正确，通过计算会发现，i在五种情况下使得x为3的倍数。
第5题：

窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： Private Sub Command1 Click（） XzInputBox("输入X："，，0) y=InputBox("输入y："，，0) Label1．Caption=x+y End Sub 运行程序，单击命令按钮，在输入对话框中分别输入2、3，运行的结果是（）。
A.程序运行有错误，数据类型不匹配
B.程序运行有错误，InputBox函数的格式不对
C.在Label1中显示5
D.在Label1中显示23

正确答案：D
D。【解析】此题考查InpuBox的属性。返回值为字符型，因此xy返回的是字符串的连接而不是数字的加和。如果在声明阶段特别注明了xy都是整形，那么输出是5，这是InputBox特殊的地方。
第6题：

以下过程是（）事件。 Prviate Sub Form_Load（） …… End Sub
- A、命令按钮的单击
- B、命令按钮的装载
- C、窗体的装载
- D、窗体的单击
正确答案:C
第7题：

在窗体Form1的Click事件过程中有以下语句： Label1.Caption="VisualBasic" 若本语句执行之前，标签控件的Caption属性为默认值，则标签控件的Name属性和Caption属性在执行本语句之前的值分别为（）.
- A、"Label"、"Label"
- B、"Label1"、"VisualBasic"
- C、"Label1"、"Label1"
- D、"Caption"、"Label"
正确答案:C
第8题：

以下过程是窗体Form1的（）事件。 Prviate Sub Form_Click（） …… End Sub
- A、单击
- B、双击
- C、装载
- D、按键
正确答案:A
第9题：

单选题
单击命令按钮Command1使标签Label1隐藏的代码应该写在Command1的（）事件过程里。
A
Load
B
Click
C
Unload
D
MouseDown

正确答案： B
解析：暂无解析
第10题：

单选题
以下过程是（）事件。 Prviate Sub Form_Load（） …… End Sub
A
命令按钮的单击
B
命令按钮的装载
C
窗体的装载
D
窗体的单击

正确答案： D
解析：暂无解析
第11题：

单选题
以下过程是标签Label1的（）事件。 Prviate Sub Label1_DblClick（） …… EndSub
A
单击
B
双击
C
拖拽
D
移动

正确答案： B
解析：暂无解析
第12题：

单选题
在窗体Form1的Click事件过程中有以下语句：Label1.Caption=”VisualBASIC”设标签的原Caption属性值为默认值，则该语句执行之后该标签控件Name属性和Caption属性的值分别为（）
A
“Label1”、“VisualBASIC”
B
“Label1”、“Caption”
C
“Label”、“VisualBASIC”
D
“Label”、“Label1”

正确答案： B
解析：暂无解析
第13题：

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是( )。
A．Private Sub Text1_Change() Label1．Caption=Text1．Text End Sub
B．Private Sub Label 1_Change() Label1．Caption=Text1．Text End Sub
C．Private Sub Text1_Click() Label1．Caption=Text1．text End Sub
D．Private Sub Label1_Click( ) Label1．Caption=Text1．Text End sot

正确答案：A
解析：文本框控件的change事件是当控件的文本区中的文字发生变化时触发。Chck事件是当用户点击该控件时触发的。所以根据题意要求，用户输入文本，则表桥中立即显示，也就是说当用户向文本框输入时执行，所以应使用文本框控件的change事件，语句labell．Caption=Text1．text的作用是将用户的输入传给标签控件的属性Caption显示，故选A。
第14题：

在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是： ______。
A．ABCD和10
B．1234和100
C．ABCD和100
D．1234和10

正确答案：D
解析：单击命令按钮后变量a赋初值a=10，通过Call调用函数后，Label1.Caption="1234"，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Label2．Caption=a后， Label2中显示的值仍为10。
第15题：

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和 Command1，然后编写如下两个事件过程： Private Sub Command1_Click() strText=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change() Label1.Caption=Right(Trim(Text1.Text)，4) End Sub 程序运行后，如果在对话框中输入abcdefgh，则在标签中显示的内容是 ______。
A．空
B．abcdef
C．abcd
D．efgh

正确答案：D
解析：Trim函数返回Variant(String)类型，其中包含指定字符串的拷贝，但不包含前导和尾随空白。Right(字符串，n)：返回“字符串”的后n个字符。这里的“字符串”可以是字符串常量、字符串变量、字符串函数或字符串连接表达式。本题中输入的是abcdef,返回后4个字符就是efgh。
第16题：

在窗体上画两个滚动条，名称分别为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

正确答案：D
解析：HScroll控件缺省属性为Value，即HScroll1与HScroll1.Value相等，而其属性中没有Text属性。
第17题：

在窗体Form1的Click事件过程中有以下语句：Label1.Caption=”VisualBASIC”设标签的原Caption属性值为默认值，则该语句执行之后该标签控件Name属性和Caption属性的值分别为（）
- A、“Label1”、“VisualBASIC”
- B、“Label1”、“Caption”
- C、“Label”、“VisualBASIC”
- D、“Label”、“Label1”
正确答案:A
第18题：

在在窗体上添加一个命令按钮Command1和两个名称分别为Label1和 Label2的标签，然后编写如下事件过程： Private X AsInteger Private SubCommand1_Click（　） X = 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal a As Integer, ByVal bAs Integer) X = a * a y = b + b End Sub 程序运行后，单击命令按钮，则两个标签label1和label2中显示的内容分别是（）。
- A、25，3
- B、25，6
- C、5，3
- D、5，6
正确答案:B
第19题：

以下过程是标签Label1的（）事件。 Prviate Sub Label1_DblClick（） …… EndSub
- A、单击
- B、双击
- C、拖拽
- D、移动
正确答案:B
第20题：

以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub
- A、命令按钮的单击
- B、命令按钮的装载
- C、窗体的装载
- D、窗体的单击
正确答案:C
第21题：

单选题
在窗体Form1的Click事件过程中有以下语句： Label1.Caption=”VisualBasic”若本语句执行之前，标签控件的Caption属性为默认值，则标签控件的Name属性和Caption属性在执行本语句之前的值分别为（）。
A
”Label”、”Label”
B
”Label1”、”VisualBasic”
C
”Label1”、”Label1”
D
”Caption”、”Label”

正确答案： D
解析：暂无解析
第22题：

单选题
以下过程是窗体Form1的（）事件。 Prviate Sub Form_Click（） …… End Sub
A
单击
B
双击
C
装载
D
按键

正确答案： B
解析：暂无解析
第23题：

单选题
以下过程是标签Label1的（）事件。 Prviate Sub Label1_DblClick（） …… End Sub
A
单击
B
双击
C
拖拽
D
移动

正确答案： B
解析：暂无解析

以下过程是标签Label1的（）事件。 Prviate Sub Label1_Click（） …… End SubA、单击B、双击C、拖拽D、移动

题目

相似考题

更多“以下过程是标签Label1的（）事件。 Prviate Sub”相关问题

相关内容