在窗体上画一个名称为 Listl 的列表框,一个名称为 Labell 的标签,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名从列表框中消失,并在标签中显示出来。下列能正确实现上述操作的程序是 ( ) 。
A.Privale Sub Listl_Click()Labell. Caption=Listl. ListIndexListl. Removeltem Listl.TextEnd Sub
B.Private Sub Listl_Click()Labell.Name=Listl. ListIndexListl.RemoveItem Listl.TextEnd Sub
C.Private Sub Listl_Click()Labell. Caption=Listl.TextListl. RemovItem Listl. ListIndexEnd Sub
D.Private Sub Listl_Click()Labell. Name=Listl. TextListl. RemoveItem Listl. ListIndexEnd Sub
试卷相关题目
- 1在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Labell 和 Labe12 ,然后编写如下事件过程:Private Sub Commandl_Chick.a=0For i=1 To 10a=a+1b=0Forj=1 To 10a=a+1b=b+2NextjNext iLabell. Caption=Str(a)Labe12.Caption=Str(b)End Sub程序运行后,单击命令按钮,在标签 Labell 和 Labe12 中显示的内容分别为 ( ) 。
A.10 和 20
B.20 和 110
C.200 和 110
D.110 和 20
开始考试点击查看答案 - 2在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Commandl_Click()Dim i As Integer, n As IntegerFor i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str(n)End Sub程序运行后,单击命命令按钮,在文本框中显示的值是 ( ) 。
A.5
B.4
C.3
D.2
开始考试点击查看答案 - 3在窗体上面画一个命令按钮和一个标签,其名称分别为 Commandl 和 Labell ,然后编写如下事件过程:Private Sub Commandl_Click()Counter=0For i=1 To 4For j=6 To 1 Step -2Counter=Counter+1NextjNextiLabell.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是
A.11
B.12
C.16
D.20
开始考试点击查看答案 - 4在窗体上画一个文本框(其名称为 Textl)和一个标签(其名称为 Labell),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容,以下可以实现上述操作的事件过程是 ( ) 。
A.Private Sub Textl_Click()Labell.Caption=Textl.TextEnd Sub
B.Private Sub Text1_Change()Labell.Caption=Textl.TextEnd Sub
C.Private Sub Labell_Ctrange()Labell. Caption=Textl.TextEnd Sub
D.Private Sub Labell_Click()Labell.Caption=Textl.TextEnd Sub
开始考试点击查看答案 - 5执行以下程序段后,变量 c$ 的值为 ( ) 。a$= “ Visual Bassic Programming ”b$= “ Quick ” e$=b$&U Case(Mid$(a$,7,6))&Right$(a$,12)
A.Visual Basic Programming
B.Quick Basic programming
C.Quick Basic Programming
D.Quick Basic Programming
开始考试点击查看答案 - 6在窗体上画一个名称为 Commandl 的命令按钮,然后编写如下程序:Private Sub Commandl Click()Dim i As Integer, j As IntegerDim a (10,10)As IntegerFor i=1 To 3For j= i To 3a(i,j)=(i-1)*3+jPrint a (i,j);Next jPrintNext iEnd Sub程序运行后,单击命令按钮,窗体上显示的是 ( ) 。
A.123246369
B.234345456
C.147258369
D.123456789
开始考试点击查看答案 - 7在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:Option Base 0Private Sub Command1_Click()Dim A (4)As Integer,B(4) As IntegerFor k=0 To 2A(k+1)=InputBox(“ 请输入一个整数 ”)B(3-k)=A(k+1)Next kPrint B(k)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输入结果为 ( ) 。
A.0
B.2
C.3
D.4
开始考试点击查看答案 - 8有以下程序:Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr (i,j)=i*2+jNext jNext iReDim Preserve arr(1,4)For j=3 To 4arr(3,j)=j+9Next jPrint arr(3,2);arr(3,4)End Sub程序运行后,单击窗体,输出结果为 ( ) 。
A.8 13
B.0 13
C.7 12
D.0 0
开始考试点击查看答案 - 9以下叙述中正确的是 ( ) 。
A.一个 Sub 过程至少要一个 Exit Sub 语句
B.一个 Sub 过程必须有一个 End Sub 语句
C.可以在 Sub 过程中定义一个 Function 过程,但不能定义 Sub 过程
D.调用一个 Function 过程可以获得多个返回值
开始考试点击查看答案 - 10有以下程序:Sub subp(b()As Integer)For i=1To4b(i)=2-iNextiEnd SubPrivate Sub Command1_Click()Dim a (1 To 4)As Integera(1)=5a(2)=6a(3)=7a(4)=8subpa()For i=1 To4Print a (i)Next iEnd Sub运行上面的程序,单击命令按钮,输出结果为 ( ) 。
A.2468
B.5678
C.10121416
D.出错
开始考试点击查看答案
最新试卷
注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它