单选题按文件的内容划分有( )。 A)顺序文件和随机文件 B)ASCII文件和二进制文们： C)程序文件和数据文件 D)磁盘文件和打印文件
单选题在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Suh
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写)，运行程序，如果按“A”键，则程序的输出是
单选题在单链表中，增加头结点的目的是______。
A.使单链表不为空
B.方便运算的实现
C.增加存储空间
D.说明单链表是线性表的链式存储实现
单选题假定在窗体上添加了一个通用对话框控件，并设置了以下属性：DefaultExt="doc"，FileName="c:/file1.txt"，则FileTitle属性的值是
单选题在窗体上建立一个名称为List1的列表框、一个名称为Text1文本框和一个名称为Command1的命令按钮，如图20-12如示。程序代码如下，如果在程序运行过程中单击命令按钮，则在文本框中显示的内容是()。PrivateSubCommand1_Click()DimiAsIntegerText1．Text=""Fori=0ToList1．ListCountIfiMod2=1ThenText1．Text=Text1．Text+List1．List(i)EndIfNextiEndSubPrivateSubForm_Load()List1．AddItem"英语"List1．AddItem"政治"List1．AddItem"物理"List1．AddItem"化学"List1．AddItem"语文"List1．AddItem"生物"EndSub
单选题使用( )方法不能让控件获得焦点。
单选题设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是
单选题下列程序执行后，变量a的值为( )。 Dim a，b，C，d As Single a=10：b=20：C=40 If b>a Then d=a：a=b：b=d End If If c>a Then d=a：a=c：C=d End If If c>b Then d=b：b：c：c=d End If
单选题设数据元素集合为{A，B，C，D，E，F}，下列关系为线性结构的是
单选题Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即1，1，2，3，5，8，13，21，34，55，89，…某人编写了下面的函数，判断大于1的整数x是否是Fibonaeci数列中的某个数，若是，则返回True，否则返回False。
Function Isfab(x As Integer)As Boolean
Dim a As Integer，b As Integer，c As Integer，flag As Boolean
fIag=False
a=1:b=1
Do While x＜b
c=a+b
a=b
b=c
If x=b Then flag=True
Loop
Isfab=flag
End Function
测试时发现对于所有正整数x，函数都返回False，程序需要修改。下面的修改方案中正确的是
____
单选题窗体上有一个名称为VScroll1的滚动条，当用鼠标拖动滚动条中的滚动块时，触发的事件是( )。 A) Click B) KeyDown C) DragDrop D) Scroll
单选题以下关于变量类型说明符的使用正确的是 ( ) A) Dim a%: a=90 B) Dim a:a＝2000％ C) Dim a#：a="OK"， D) Dim a&：a=True
单选题层次型、网状型和关系型数据库划分原则是
单选题设子程序过程定义的首部为：Public Sub S(X As Integer，Y As Single)则以下正确的调用形式为
单选题设窗体上有3个图像框：Image1、Image2、Image3，并有下面的程序代码：
Private Sub Form_Load()
Image1.Picture=LoadPicture("LEAF.bmp")
Image2.Picture=LoadPieture("OPEN.bmp")
Image3.Visible=False
End Sub
Private Sub Image1_Click()
Image2.Picture=Image1.Picture
End Sub
Private Sub Image2_Click()
Image3.Picture=Image2.Picture
Image2.Picture=Image1.Picture
Image1.Picture=Image3.Picture
End Sub
在程序运行期间单击Image2，则在窗体上看到的结果是______。
单选题下列针对框架控件的叙述中，错误的是( )。 A) 框架是一个容器控件 B) 框架也有Click和DblClick事件 C) 框架也可以接受用户的输入 D) 使用框架的主要目的是为了对控件进行分组
单选题设有如下程序： Private Sub Commandl_click() Dim c As Integer,d As Integer c=4 d=InputBox("请输入一个整数") Do While d＞0 If d＞c Then c=c+1 End If d=InputBox("请输入一个整数") Loop Print c+d End Sub 程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、 0，则输出结果是 A) 12 B) 11 C) 10 D) 9
单选题下列不可作为VB变量名的是 ( )
单选题假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是( )。
单选题阅读下列程序： Private Sub Command1_Crick() Dim i As Integer，k As Integer k=2 For i=1 TO 3 Print H(k)； Next i End Sub Function H(j As Integer) a=0 Static b a=a + 1 b=b + 1 H=a * b + j End Function 程序运行后，单击命令按钮输出结果是