12秋西安电子科技大学《VB程序设计》在线作业

西电《VB程序设计》在线作业
试卷总分：100
单选题


一、单选题（共 25 道试题，共 100 分。）
1.下面程序段 For I=1 To 3 Step 1 Print Spc(5-I); For j=1 To 2*I-1 Print ＂*＂; Next j; Print Next I 运行结果为()
A. * * * ** * * * *
B. * * * * * * * * *
C. * * * * * * ** * * * *
D. * * * * * * * * *

2.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。 Model1代码如下： Public x As Integer Public y As Integer Sub S1() x =1 S2 End Sub Sub S2() y=10 Form1.Show End Show Model2的代码如下： Sub Main() S1 End Sub 其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是
A. 13
B. 14
C. 27
D. 20

3.以下合法的Visual Basic标识符是()
A. ForLoop
B. Const
C. 9abc
D. a#x

4.当对被选择的控件进行对齐、调整大小等操作时，将以()为准。
A. 所有控件
B. 某些控件
C. 基准控件
D. 以上说法均不对

5.以下叙述中错误的是()
A. 在KeyPress事件过程中不能识别键盘的按下与释放
B. 在KeyPress事件过程中不能识别回车键
C. 在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母
D. 在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符

6.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是()
A. VVV
B. Vis
C. sic
D. 11

7.“x是小于100的非负数”，用Visual Basic表达式表示正确的是()
A. 0<=x<100
B. 0<=x<100
C. 0<=x And x<100
D. 0<=x Or X<100

8.在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是()
A. Private Sub HScroll_Change() Text1.Text=HScroll1.Value End Sub
B. Private Sub HScroll_Click() Text1.Text=HScroll1.Value End Sub
C. Private Sub HScroll_Change() Text1.Text=HScroll.Caption
D. Private Sub HScroll_Click() Text1.Text=HScroll.Caption

9.一般来说，在用Visual Basic开发应用程序时，其通常的步骤为()
A. ①设置可视界面②编写代码 ③程序测试、运行
B. ①建立可视用户界面②设置可视界面特性 ③编写事件驱动代码
C. ①编写事件驱动代码②程序测试 ③程序运行和维护
D. 以上步骤均不对

10.表的每一行就是一个（ ）；表中的每一列称作一个（ ），描述了它所含有的数据。
A. 记录 字段
B. 索引 字段
C. 字段 记录
D. 记录 索引

11.双精度浮点数存储时占的字节数是()
A. 4
B. 8
C. 16
D. 32

12.表达式2*3^2+2*8/4+3^2的值为()。
A. 64
B. 31
C. 49
D. 42

13.设x=4,y=8,z=7，以下表达式的值是() x<y And (Not yz) Or z<x
A. 1
B. -1
C. TRUE
D. FALSE
此题选: D
14.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1 To 5 Sum = sum+a(i) Next i x=Sum/5 For i =1 To 5 If a(i)x Then Print a(i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 (
A. 13
B. 14
C. 27
D. 19
此题选: D
15.Data控件的很多方法，当我们在运行时修改了Record-Source属性后，需要调用（ ）方法刷新记录集
A. Refresh方法
B. UpdateRecord方法
C. UpdateControls方法
D. Cancelupdate方法

16.执行以下程序段 a$="abbacddcba" For i=6 To 2 Step -2 X=Mid(a,i,i) Y=Left(a,i) z=Right(a,i) z=UCase(X&Y&z) Next i Print z 输出结果为()
A. 13
B. 14
C. 27
D. 18

17.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,y End Sub 程序运行后，连续三次单击Command1按钮后，窗体上显示的是()
A. 4 2
B. 12 18
C. 12 30
D. 4 6

18.假定Picture1和Text1分别为图片框和文本框的名称，下列语句不正确的是()
A. Print100
B. Picture1.Print 100
C. Text1. Print 100
D. Debug. Print 100

19.表达式5^2Mod25/2^2的值是()
A. 0
B. 1
C. 6
D. 4

20.在窗体上画一个命令按钮,然后编写如下事件过程：() Private Sub C ommand1_Click() a=InputBox(＂Enter the First Integer＂) b=InputBox(＂Enter the Second integer＂) Print b+a End Sub 程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是
A. 579
B. 23
C. 56
D. 23456
此题选: D
21.下列不属于VisualBasic数据文件的是()。
A. 顺序文件
B. 随机文件
C. 二进制文件
D. 数据库文件
此题选: D
22.下面4个选项中属于字符型数据的是()
A. “Hello”
B. `Hello`
C. Hello
D. #Hello

23.阅读程序 Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum = 0 arr = Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3 = arr(i)/3 Then Sum =Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输入结果为()
A. 13
B. 14
C. 27
D. 15

24.在窗体上画一个名称为File1的文件列表框，并编写如下程序： Private Sub File1_DblClick() x=Shell(File1.FileName,1) End Sub 以下关于该程序的叙述中，错误的是()
A. 13
B. 14
C. 27
D. 16

25.若要使标签控件显示时不覆盖其背景内容，要对其设置的属性是()
A. BackColor
B. BorderStyle
C. ForeColor
D. BackStyle
此题选: D