设有如下程序段：Dim a(10)…For Each x ln aPrint x;Next x在上面的程序段中，变量x必须是（    ）。

试卷相关题目

• 1默认情况下，下面声明的数组的元素个数是（    ）。Dim a(5, -2 To 2)

  A.20

  B.24

  C.25

  D.30

  开始考试点击查看答案
• 2窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（    ）。

  A.Private Sub Form 1_Click()…End Sub

  B.Private Sub Form_Click()…End Sub

  C.Private Sub Commandl_Click()…EndSub

  D.Private Sub Commandl_Click()…End Sub

  开始考试点击查看答案
• 3设a=2，b=3，c=4，d=5，则下面语句的输出是（    ）。Print 3 > 2 * b Or a = c And b <> c Or c > d

  A.False

  B.l

  C.True

  D.-l

  开始考试点击查看答案
• 4如果一个直线控件在窗体上呈现为一条垂直线，则可以确定的是（    ）。

  A.它的YI、Y2属性的值相等

  B.它的X1、X2属性的值相等

  C.它的X1、Y1属性的值分别与X2、Y2属性的值相等

  D.它的Xl、X2属性的值分别与Y1、Y2属性的值相等

  开始考试点击查看答案
• 5为了在窗体上建立2组单选按钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法中正确的是（    ）。

  A.把这2组单选按钮设置为名称不同的2个控件数组

  B.使2组单选按钮的Index属性分别相同

  C.使2组单选按钮的名称分别相同

  D.把2组单选按钮分别画到2个不同的框架中

  开始考试点击查看答案
• 6设有以下函数过程Private Function Fun(a() As Integer,b As String)As Integer…End Function若已有变量声明：Dim x(5)As Integer，n As Integer，ch As String则下面正确的过程调用语句是（    ）。

  A.x(0) = Fun(x, "ch")

  B.n = Fun(n, ch)

  C.Call Fun x,"ch"

  D.n = Fun(x(5), ch)

  开始考试点击查看答案
• 7假定用下面的语句打开文件：Open "Filel.Txt" For Input As #l则不能正确读文件的语句是（    ）。

  A.Input #1, ch$

  B.Line Input #1, ch$

  C.ch$ = Input$(5, #1)

  D.read #1,ch$

  开始考试点击查看答案
• 8下面程序的执行结果是（    ）。Private Sub Command1_Click()a = 10For k = 1 To 5 Step -1a = a - kNext kPrint a; kEnd Sub

  A.-5 6

  B.-5 -5

  C.10 0

  D.10 l

  开始考试点击查看答案
• 9设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：Private Sub Command1_Click()x! = Val(Text1.Text)Select Case xCase Is < -10, Is >= 20Print "输入错误"Case Is < 0Print 20 - xCase Is < 10Print 20Case Is <= 20Print x + 10End SelectEndSub程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是（    ）。

  A.5

  B.20

  C.25

  D.输入错误

  开始考试点击查看答案
• 10设有如下程序Private Sub Command1_Click()x = 10: y = 0For i = 1 To 5Dox = x - 2y = y + 2Loop Until y > 5 Or x < -1NextEnd Sub运行程序，其中Do循环执行的次数是（    ）。

  A.15

  B.10

  C.7

  D.3

  开始考试点击查看答案