Question

VB题目解答，急！

一、单项选择题（20道小题，共20分）
1、为了删除ComboBox控件中的项目，需要使用的方法为（1分）
A、Add B、Remove
C、AddItem D、RemoveItem

2、引用列表框（Listl）最后一个数据项应使用（1分）
A、Listl.List(List.ListCount) B、Listl.List(List.ListCount-1)
C、Listl.List(ListCount) D、Listl.List(ListCount-1)

3、将窗体的前景色设置为蓝颜色的过程是＿＿＿＿＿＿。（1分）
A、Form1.ForeColor ＝ Vbblue B、Form1.ForeColor ＝ blue
C、Form1.ForeColor ＝ Green D、Form1.ForeColor ＝ “blue”

4、要使菜单命令能通过Alt+M键打开，正确的做法为（1分）
A、在菜单编辑器的“名称”栏中的“M”字符前加上“&”字符 B、在菜单编辑器的“名称”栏中的“M”字符后加上“&”字符
C、在菜单编辑器的“标题”栏中的“M”字符前加上“&”字符 D、在菜单编辑器的“标题”栏中的“M”字符后加上“&”字符

5、Visual Basic文件是由下列内容组成的（1分）
A、扩展名 B、字段
C、记录 D、字符

6、Redim可以定义的数组是（1分）
A、永久数组 B、静态数组
C、多维数组 D、临时数组

7、若定义了Sub Maxxy（x％，y％），下列正确的调用为（1分）
A、Maxxy 5，8 B、Maxxy “58”，20
C、Call Maxxy 5，8 D、Call Maxxy（5，8，20）

8、用Open语句打开一个随机文件时，若省略“Len＝记录长度”，则记录的长度为（1分）
A、64 B、128
C、256 D、1024

9、Timer控件决定该控件是否对时间的推移做响应的属性是（1分）
A、Enabled B、Visible
C、Time D、Capable

10、工程资源管理器窗口包含的文件类型有( )种。（1分）
A、1 B、2
C、3 D、4

11、下列程序的执行结果为：( ) 。Private Sub Form＿Click() : For i ＝ 0 To 10: If i Mod 2 ＝ 0 Then Print i, :Next i : End Sub（1分）
A、0 2 4 6 8 10 B、1 3 5 7 9
C、0 1 2 3 4 5 6 7 8 9 10 D、0，2，4，6，8，10

12、使用Windows98保存一新建的工程，其默认的路径是＿＿＿＿＿＿。（1分）
A、VB B、VB98
C、Windows D、My Documents

13、下列不属于Visual Basic循环格式的是：（）。（1分）
A、Do ：x ＝ 5：Loop Until x ＝ 5 B、Do ：x ＝ 5：Loop While x ＜＞ 5
C、Do While x ＜＞ 5 ：x ＝ 5 ：Loop D、Do：x ＝ 5：While x ＜＞ 5

14、启动Visual Basic后, VB为用户建立的第一个窗体是()。（1分）
A、Form1 B、Form
C、窗体1 D、窗体

15、对窗体中某一控件使用属性窗口设置属性，首先要先＿＿＿＿＿＿该控件。（1分）
A、保存 B、双击
C、显示 D、选择

16、下列选项中，不是字符串常量的为（1分）
A、"你好" B、""
C、"True" D、#False#

17、表达式 25.28 Mod 6.99 的值是 。（1分）
A、1 B、4
C、5 D、出错

18、使用Windows XP保存一新建的工程，其默认的路径是＿＿＿＿＿＿。（1分）
A、VB B、VB98
C、Windows D、My Documents

19、正确表示数组a的元素的是（1分）
A、a[8] B、a＜8＞
C、a8 D、a（8）

20、关于函数和子过程错误的叙述为（1分）
A、模块级的过程使用Private B、全局级的过程可以省略Public
C、全局级的过程使用Public D、模块级的过程可以省略Public
二、简答题（11道小题，共30分）
1、 编写程序，输出下列三角形：
4 4 4 4 4 4 4
3 3 3 3 3
2 2 2
1

Answer 1

DBACB

DABAD

DBDAD

DBBDC 

Private Sub Command1_Click()

Print "4 4 4 4 4 4 4"

Print "  3 3 3 3 3"

Print "      2 2 2"

Print "        1"

End Sub

做了很久也没什么好的方法，这个方法虽然实现了题目要求。。不过感觉不太对~

Answer 2

DBAACBDCCBDBCADDBBDB

Answer 3

DBAAC
DCBAD
DBDAD
DBBDC

Private Sub Command1_Click()
Print " 4 4 4 4"
Print " 3 3 3 "
Print " 2 2 "
Print " 1"
End Sub

Answer 4

13c
14cd
15b
16a
17c
18c
19c
20a
21c
22b
23b