以下说法中错误的是（    ）。

试卷相关题目

• 1在窗体上画一个文本框（名称为Textl）和一个标签（名称为Label1），程序运行后，如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是（    ）。

  A.Private Sub Text1_Change()Label1.Caption = Text1.TextEnd Sub

  B.Private Sub Label1_Change()Label1.Caption = Text1.TextEnd Sub

  C.Private Sub Text1_Click()Label1.Caption = Text1.TextEnd Sub

  D.Private Sub Label1_Click()Label1.Caption = Text1.TextEnd Sub

  开始考试点击查看答案
• 2在窗体上画一个名称为Commandl的命令按钮。单击命令按钮时执行如下事件过程：Private Sub Command1_Click()a$ = "software and hardware"b$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, , b$, c$, 1End Sub则在弹出的信息框标题栏中显示的标题是（    ）。

  A.software and hardware

  B.hardware

  C.software

  D.1

  开始考试点击查看答案
• 3语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是（    ）。

  A.-36

  B.1

  C.-1

  D.-72

  开始考试点击查看答案
• 4设a=5，b=6，c=7，d=8，执行语句x=IIf((a>b) And (c>d),10,20)后，x的值是（    ）。

  A.10

  B.20

  C.30

  D.200

  开始考试点击查看答案
• 5滚动条可以响应的事件是（    ）。

  A.Load

  B.Scroll

  C.Click

  D.MouseDown

  开始考试点击查看答案
• 6以下关于局部变量的叙述中错误的是（    ）。

  A.在过程中用Dim语句或Static语句声明的变量是局部变量

  B.局部变量的作用域是它所在的过程

  C.在过程中用Static语句声明的变量是静态局部变量

  D.过程执行完毕，该过程中用Dim或Static语句声明的变量即被释放

  开始考试点击查看答案
• 7以下程序段的输出结果是（    ）。x=1 : y=4Do Until y>4x = x * yy = y + lLoopPrint x

  A.l

  B.4

  C.8

  D.20

  开始考试点击查看答案
• 8有如下事件过程：Private Sub Form_Click()Dim n As Integerx = 0n = InputBox("请输入一个整数")For i = 1 To nFor j = 1 To ix = x + 1Next jNext iPrint xEnd Sub程序运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是（    ）。

  A.13

  B.14

  C.15

  D.16

  开始考试点击查看答案
• 9请阅读程序：Sub subp(b() As Integer)For i = 1 To 4b(i) = 2 * iNextEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As Integera(1) = 5: a(2) = 6: a(3) = 7: a(4) = 8subp a()For i = 1 To 4Print a(i)NextEnd Sub运行上面的程序，单击命令按钮，则输出结果是（    ）。

  A.2468

  B.5678

  C.10121416

  D.出错

  开始考试点击查看答案
• 10Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True，否则返回False。Function Isfab(x As Integer) As BooleanDim a As Integer, b As Integer, c As Integer, flag As Booleanflag = Falsea = 1 : b = 1Do While x < bc = a + b : a = b : b = cIf x = b Then flag = TrueLoopIsfab = flagEnd Function测试时发现对于所有正整数x，函数都返回False，程序需要修改。下面的修改方案中正确的是（    ）。

  A.把a=b与b=c的位置互换

  B.把c=a+b移到b=c之后

  C.把Do While xb

  D.把If x=b Then flag=True改为If x=a Then flag=True

  开始考试点击查看答案