单选题变量定义语句Dim Index&与下面的______等价。 ( )
单选题下面程序段执行结果为（ ）。
x=Iht(Rnd()+4)
Select Case x
Case 5
Print"excellent"
Case 4
Print"good"
Case 3
Print"paSS"
Case Else
Print "fail"
End Select
单选题在结构化方法的软件需求分析中，可采用分析工具来辅助完成。下列工具中，常用需求分析工具的是 Ⅰ．数据流图 Ⅱ．结构图 Ⅲ．数据字典 Ⅳ．判定表
单选题下列说法正确的是__________。
A.KeyDown事件在KeyPress事件前发生
B.KeyPress过程不可以使用Call语句来调用
C.MouseUp事件在Click事件之后发生
D.控件响应Click事件后不再响应MouseUp事件
单选题窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等)，一个名称为Timer1的计时器，并有下面程序代码：
Dim r As Single，flag As Integer
Private Sub Form Load()
r=Shapel．Width
Timer1．Enabled=True
Timer1．Interval=500
End Sub
Private Sub Timer1_Timer()
Ifflag=0 Then
Shapel．Width=Shapel．Width-10
IfShapel．Width=r Then
flag=0
End If
End If
End Sub
运行程序后产生的结果是
单选题无论什么控件，都有一个共同的属性，这个属性是 ______。
单选题窗体上有一个名称为Option1的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程：
Private Sub Option1_Click(Index As Integer)
…
End Sub
下面关于此过程的参数Index的叙述中正确的是
____
。
单选题为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为( )。 A) Dim pi As Integer B) Dim pi(7)As Integer C) Dim pi As Single D) Dim pi As Long
单选题当复选框被选中时，复选框的Value属性的值为（ ）。
单选题下列关于MsgBox的叙述中，错误的是
单选题Fibonacci数列的规律是：前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 Boolean
Dim a As Integer, b As Integer, c As Integer, flag As Boolean
flag=False
a=1：b=I
Do While x＜b
c=a＋b
a=b
b=c
If x=b Then flag=True
Loop
Isfab=flag
End Function
测试时发现对于所有正整数x,函数都返回False,程序需要修改。下面的修改方案中正确的是
单选题表示控件在窗体上位置的属性是______。
单选题为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择，则应将列表框的Multiselect属性设置为______ 。
单选题栈的初始状态为空。现将元素1，2，3，A，B，C依次入栈，再依次出栈，则元素出栈的顺序是
单选题在窗体上画一个名称为Labell的标签，然后编写如下事件过程。 Private Sub Form_Click( ) Dim arr(10, I0) As Integer Dim i As Integer, j As Integer For i = 2 To 4 For j =2 To 4 arr(i,j) =i*j Next Next Labell. Caption = Str(arr(2,2) + arr(3,3) ) End Sub 程序运行后，单击窗体，在标签中显示的内容是 A) 12 B) 13 C) 14 D) 15
单选题单击命令按钮，并在对话框内输入6，下列程序段的执行结果为______。
Private Sub Command1_Click()
Dim n As Integer
n=InputBox ("请输入日期")
Select Case n
Case Is ＜= 0
n=InputBox("错误!请重新输入日期!")
Case Is＞7
n=InputBox("错误!请重新输入日期!")
Case 1 To 3
Print "江苏"
Case 4 To 5
Print "浙江"
Case 6 To 7
Print "双休日"
End Select
End Sub
单选题以下叙述中错误的是______。 A) 当一行中有多个语句时，可以用逗号作为分隔符 B) 在Dim语句中，所定义的多个变量可以用逗号作为分隔符 C) 在Print方法中，多个输出项之间可以用逗号作为分隔符 D) 在通用过程中，多个形式参数之间可以用逗号作为分隔符
单选题下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dim X(10J As Integer,y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=X(2*i-1)+X(2*i) Next For i=1 to 5 Print y(i) Next End Sub A) 3 7 11 45 19 B) 19 15 11 7 3 C) 1 3 5 7 9 D) 不确定的值
单选题以下关于VB文件的叙述中，错误的是
单选题表达式Int(Rnd(0)*50)所产生的随机数范围是