(单选题)1: 当函数EOF()的返回值为-1时，表示文件的指针指向( )
A: 开头
B: 结尾
C: 第一个记录
D: 最后一个记录
正确答案: 

(单选题)2: 为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是
A: Visible
B: Timer
C: Enabled
D: Interval
正确答案: 

(单选题)3: 可以惟一标识控件数组中的每一个控件属性的是
A: Name
B: Caption
C: Index
D: Enabled
正确答案: 

(单选题)4: 执行语句Open“Tel.dat”For Random As #l Len=50后，对文件Tel.dat中的数据能够执行的操作是
A: 只能写，不能读
B: 只能读，不能写
C: 既可以读，也可以写
D: 不能读，不能写
正确答案: 

(单选题)5: 当一个工程含有多个窗体时，其中的启动窗体是
A: 启动VB时建立的窗体
B: 第一个添加的窗体
C: 最后一个添加的窗体工程属性
D: 在工程属性对话框中指定的窗体
正确答案: 

(单选题)6: 以下关于图片框控件的说法中，错误的是
A: 可以通过Print方法在图片框中输出文本
B: 清空图片框控件中图形的方法之一是加载一个空图形
C: 图片框控件可以作为容器使用
D: 用Stretch属性可以自动调整图片框中图形的大小
正确答案: 

(单选题)7: 定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔
A: 分
B: 秒
C: 毫秒
D: 微秒
正确答案: 

(单选题)8: 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()Dim i As Integer,j As IntegerDim a(10,10)As IntegerFor i=1 To 3For j=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j);Next jPrintNext jEnd Sub程序运行后，单击命令按钮，窗体上显示的是
A: 123 246 369
B: 234 345 456
C: 147 258 369
D: 123 456 789
正确答案: 

(单选题)9: 对窗体编写如下代码：Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后，按回车键，输出结果为
A: 48 4
B: 237 1
C: 498 5
D: 498 4
正确答案: 

(单选题)10: 在窗体中添加一个通用对话框，其名称为CommonDialog1，然后添加一个命令按钮。要求单击命令按钮时，打开一个打开文件的通用对话框。该窗口的标题为“打开”，在文件类型框中显示的是TextFiles(*.txt)。则能够满足上述要求的程序是（ ）
A: "Private Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub"
B: "Private Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 2CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub"
C: "Private Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex =1CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd Sub"
D: "Private Sub Command1_Click()CommonDialog1.Flags = cdlOFNHideReadOnlyCommonDialog1.Filter = ""allfiles(*.*)|*.*|textfiles"" & ""(*.txt)|*.txt|Batchfiles(*.bat)|*.bat""CommonDialog1.FilterIndex = 2CommonDialog1.ShowSaveMsgBox CommonDialog1.FileNameEnd Sub"
正确答案: 

(单选题)11: (10)为了把窗体上某个控件变成活动控件，应执行的操作是（ ）
A: 单击窗体的边框
B: 单击控件的内部
C: 双击控件
D: "双击窗体
正确答案: 

(单选题)12: 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是
A: Visual
B: Basic
C: Program
D: 出错
正确答案: 

(单选题)13: 设有语句
x=InputBox(“输入数值”，“0”，“示例”)
程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是
A: 变量X的值是数值10
B: 在InputBox对话框标题栏中显示的是“示例”
C: 0是默认值
D: 变量X的值是字符串“10”
正确答案: 

(单选题)14: 列表框控件中的列表内容是通过（ ）属性设置的
A: Name
B: Caption
C: List
D: Text
正确答案: 

(单选题)15: 确定一个控件在窗体上的位置的属性是
A: Width和Height
B: Width或Height
C: Top和Left
D: Top或Left
正确答案: 

(单选题)16: 关于子窗体说法正确的是
A: MDI子窗体与普通窗体没有区别
B: MDI子窗体与普通窗体不同，其活动区域为MDI窗体工作区，而普通窗体则没有此限制
C: MDI窗体菜单和子窗体可以同时显示出来
D: 当子窗体激活时仅仅显示子窗体菜单
正确答案: 

(单选题)17: 在窗体中添加一个列表框，然后编写如下两个事件过程： Private Sub Form_Click()List1.RemoveItem 1List1.RemoveItem 3List1.RemoveItem 2End SubPrivate Sub Form_Load()List1.AddItem "AA"List1.AddItem "BB"List1.AddItem "CC"List1.AddItem "DD"List1.AddItem "EE"End Sub运行上面的程序，然后单击窗体，列表框中所显示的内
A: AABB
B: DDEE
C: AACC
D: BBCC
正确答案: 

(单选题)18: 执行以下程序段后，变量c$的值为a$=“Visual Basic Programing”b$=“Quick”c$=b$ & UCase(Mid$(a$,7,6)) & Right $ (a$,11)
A: Visual BASIC Programing
B: Quick Basic Programing
C: QUICK Basic Programing
D: Quick BASIC Programing
正确答案: 

(单选题)19: 设置图片框pic1大小随所加载图像大小变化的正确语句是
A: pic1.autosize =true
B: pic1.strech =true
C: pic1.drawmode =1
D: pic1. drawmode =2
正确答案: 

(单选题)20: 表示滚动条控件取值范围最大值的属性是
A: Max
B: LargeChange
C: Value
D: Max-Min
正确答案: