位置:首页 > 题库频道 > 其它分类 > 计算机其它 > 二级二级VB2014年全国计算机等级《二级VB》考前押密试题(4)

执行下列程序段后,整型变量n 的值为(  )。n =0For i =1To 20Step 5n =n +1Next i

发布时间:2024-07-09

A.50

B.4

C.15

D.210

试卷相关题目

  • 1在窗体上画一个命令按钮(名称为Co mmand1),并编写下列代码:Function Funl (ByVal a As Integer ,b As Integer)As IntegerDi mt As Integer t =a-bb =t +aFunl =t +bEnd FunctionPrivate Sub Co mmand1_Click()Di mx As Integerx=10Print Funl(Funl(x,(Funl(x,x-1))),x-1)End Sub程序运行后,单击命令按钮,输出结果是(  )。

    A.10

    B.0C.11D.21

    开始考试点击查看答案
  • 2下列说法正确的是(  )。

    A.任何时候都可以使用标准工具栏的"菜单编辑器"按钮打开菜单编辑器

    B.只有当代码窗口为当前活动窗口时,才能打开菜单编辑器

    C.只有当某个窗体为当前活动窗体时,才能打开菜单编辑器

    D.任何时候都可以使用D.任何时候都可以使用"工具"菜单下的"菜单编辑器"命令,打开菜单编辑器

    开始考试点击查看答案
  • 3MsgBox 函数的返回值的类型为( )。

    A.数值型

    B.变体类型

    C.字符串型

    D.日期型

    开始考试点击查看答案
  • 4下列符号常量的声明中,不合法的是(  )。

    A.Const a As Si ngle =1.1

    B.Const a="OK"

    C.Const a As Double =Si n(1)

    D.Const a As Integer ="12"

    开始考试点击查看答案
  • 5设有如下程序:Option Base lPrivate Sub Form_Click()Di ma(5)As Stri ng ,i As IntegerFor i =1To 5a(i)=Chr(Asc("A")+i)Call f(a,i)Next iEnd SubSub f(ta()As Stri ng ,n As Integer)Di mi As IntegerFor i =1To nPrint ta(i);Next i PrintEnd Sub对上述程序,以下叙述中正确的是(  )。

    A.程序有错,因为在过程f 的定义中数组参数格式不正确

    B.程序可正常运行,输出内容的第一行是一个字母"A"

    C.程序可正常运行,输出内容的第一行是一个字母"B"

    D.程序可正常运行,输出内容的第一行是数字65

    开始考试点击查看答案
  • 6设有变量声明为"Di m aDate As Date",则为变量aDate 正确赋值的表达方式是(  )。

    A.aDate =#8/2008#

    B.aDate =#"8/8/2008"#

    C.aDate =Date("8/8/2008")

    D.aDate =Format("m/d/yy","8/8/2008")

    开始考试点击查看答案
  • 7下列叙述中错误的是(  )。

    A.在通用过程中,多个形式参数之间可以用逗号作为分隔符

    B.在Print 方法中,多个输出项之间可以用逗号作为分隔符

    C.在Di m 语句中,所定义的多个变量可以用逗号作为分隔符

    D.当一行中有多个语句时,可以用逗号作为分隔符

    开始考试点击查看答案
  • 8窗体上有一个名称为Co mmand1的命令按钮,其事件过程如下:Private Sub Co mmand1_Click()Di mi As Integer ,j As Integer ,k As IntegerDi ms As Doubles =0:i =1:j=0:k =-1Do While i <6s =s +k*(j/i)i =i +1j=j+1k =-kLoopPrint sEnd Sub以上程序所计算的表达式是(  )。

    A.1/2-2/3+3/4-4/5

    B.-1/2+2/3-3/4+4/5

    C.1-1/2+2/3-3/4+4/5

    D.-1+1/2-2/3+3/4-4/5

    开始考试点击查看答案
  • 9在窗体上画两个文本框(其Name 属性分别为Text1和Text2)和一个命令按钮(其Name 属性为Co mmand1),然后编写如下事件过程:Private Sub Co mmand1_Click()x=0Do While x<50x=(x+2)*(x+3)n =n +1LoopText1.Text =Str(n)Text2.Text =Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为(  )。

    A.1和0

    B.2和72

    C.3和50

    D.4和168

    开始考试点击查看答案
  • 10某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:Private Sub Co mmand1_Click(  )Di ma(10)As Integer ,max As IntegerFor k =1TO 10a(K)=InputBox("输入一个整数")Next kMax=0For k =1To 10If a(k)>max ThenMax=a(k)End IfNext kPrint maxEnd Sub运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改,下面的修改中可以得到正确运行结果的是(  )。

    A.把If a(k)>max Then 改为If a(k)<max Then

    B.把max=a(k)改为a(k)=max

    C.把第2个循环语句For k =1TO 10改为For k =2TO 10

    D.把max=0改为max=a(10)

    开始考试点击查看答案
返回顶部