二级二级VB2013年9月全国计算机等级《二级VB》上机模考试卷(5)

试卷预览

• 21窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1Click（　　）Dim a(10)，x％Fork=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Next kPrint XEnd Sub程序运行后，单击命令按钮，输出结果是（　　）。

  A.10个数中奇数的个数

  B.10个数中偶数的个数

  C.10个数中奇数的累加和

  D.10个数中偶数的累加和

  开始考试练习点击查看答案
• 22下列关于栈的叙述正确的是（　　）。

  A.栈顶元素最先能被删除

  B.栈顶元素最后才能被删除

  C.栈底元素永远不能被删除

  D.以上三种说法都不对

  开始考试练习点击查看答案
• 23下面程序运行时，若输入“Visual Basic Prograrmming”，则在窗体上输出的是（　　）。Private Sub Command1Click（　　）Dim cout(25)As Integer，ch As Stringch=Ucase(Int,utBox("请输入字母字符串"))For k=1 To i en(ch)．n=ASC(Mid(ch，k，1))-Asc("A")If n>=0 Thencount(n)=count(n)+1End IfNext km=count(0)For k=1 To 25If m<COUNT(K)THENm=count(k)End IfNext kPrint mEnd Sub

  A.0

  B.1

  C.2

  D.3

  开始考试练习点击查看答案
• 24设有下列程序Private Sub Form Click（　）X=50For i=1 T0 4y=InputBox("请输入一个整数")y=Val(v)If y Mod 5=0 Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（　）。

  A.100

  B.50

  C.120

  D.70

  开始考试练习点击查看答案
• 25下面正确使用动态数组的是（　　）。

  A.Dim arr（　　）As Integer…ReDim arr(3，5)

  B.Dim arr（　　）As Integer…ReDim arr(50)As String

  C.Dim arr（　　）…RcDim arr(50)As Integer

  D.Dim arr(50)AS Integer…ReDim arr(20)

  开始考试练习点击查看答案
• 26在窗体上面有一个命令按钮，然后编写如下事件过程：Private Sub Command1 Click（　　）MsgBox Str(123+321)End Sub程序运行后，单击命令按钮，则在信息框中显示的提示信息为（　　）。

  A.字符串“123+321”

  B.字符串“444”

  C.数值“444”

  D.空白

  开始考试练习点击查看答案
• 27窗体上有一个名称为Command1的命令按钮，其单击事件过程及有关函数过程如下：Private Sub Command1 Click（　）Dim n As Integern=add(5，10)Print nEnd SubFunction add(v1 As Integer，v2 As Integer，Optiona1 v3)As IntegerIf Not IsMissing(v3)Thenadd=v1+v2+v3Elseadd=v1+v2End IfEnd Function运行程序，单击命令按钮，以下叙述中正确的是（　）。

  A.程序不能正常运行，因为函数add的参数定义有错

  B.程序不能正常运行，因为函数定义与函数调用语句的参数个数不匹配

  C.程序能正常运行，结果是在窗体上显示15

  D.程序能正常运行，结果是在窗体上显示510v3

  开始考试练习点击查看答案
• 28以下叙述中正确的是（　　）。

  A.窗体及窗体上所有控件的事件过程代码都保存在窗体文件中

  B.在工程中只有启动窗体可以建立菜单

  C.窗体名称必须与窗体文件的名称相同

  D.程序一定是从某个窗体开始执行的

  开始考试练习点击查看答案
• 29窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面的事件过程：Private Sub Command1_Click（　　）Timer1．Enabled=TrueEnd SubPrivate Sub Form_Load（　　）Timer1．Interval=10Timer1．Enabled=FalseEnd SubPrivate Sub Timer1 Timer（　　）Command1．Left=Command1．Left+10End Sub程序运行时，单击命令按钮，则产生的结果是（　　）。

  A.命令按钮每10秒向左移动一次

  B.命令按钮每10秒向右移动一次

  C.命令按钮每10毫秒向左移动一次

  D.命令按钮每10毫秒向右移动一次

  开始考试练习点击查看答案
• 30设a=2，b=3，c=4，d=5，下列表达式的值是（　　）。Not a<=c Or 4*C=b^2 And b<>a+C

  A.-1

  B.1

  C.True

  D.False

  开始考试练习点击查看答案