VB模拟试题四-2023修改整理

千里之行，始于足下让知识带有温度。第第2页/共2页精品文档推荐VB模拟试题四一、单选题（30分，每题1分）

1．计算机中采纳二进制，是由于__(1)____。

(A)可降低硬件成本(B)两个状态的系统具有稳定性

(C)二进制的运算法则容易(D)上述三个缘由

2．我们通常说的U盘属于计算机部件中的___(2)___。

(A)输出设备(B)输入设备(C)存储设备(D)打印设备

3.下列表示存储容量的数据中，____(3)____是最小的。

(A)20480KB(B)1.44MB(C)1GB(D)4865723Byte

4.一个完整计算机系统应包括___(4)____。

(A)主机和显示器(B)硬件系统和软件系统

(C)系统软件和应用软件(D)内存和外存

5.下列执行速度最快的程序语言是___(5)____。

(A)数据库语言(B)高级语言(C)机器语言(D)汇编语言

6.一只白色的足球被踢进球门，则白色、足球、踢、进球门是___(6)___。

(A)属性、对象、办法、大事(B)属性、对象、大事、办法

(C)对象、属性、办法、大事(D)对象、属性、大事、办法

7.以下讲述中正确的是____(7)____。

(A)窗体的Name属性指定窗体的名称，用来标识一个窗体

(B)窗体的Name属性的值是显示在窗体标题栏中的文本

(C)可以在运行期间转变对象的Name属性的值

(D)对象的Name属性值可以为空

8.在VB中，保存一个工程至少应保存两个文件，这两个文件分离是___(8)____。

(A)文本文件和工程文件(B)窗体文件和工程文件

(C)窗体文件和标准模块文件(D)类模块文件和工程文件

9.在下列说法中，正确的是___(9)___

(A)通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上

(B)在列表框中不能举行多项挑选

(C)VB系统不能在列表框中自动实现将项目按字母挨次从大到小罗列

(D)复选框的Value属性值为布尔型

10.当一个复选框被选中时，它的Value属性的值是___(10)___

(A)3(B)2(C)1(D)0

11.计算结果为0的表达式是___(11)____

(A)Int(2.4)+Int(-2.8)(B)Cint(2.4)+Cint(-2.8)

(C)Fix(2.4)+Int(-2.8)(D)Fix(2.4)+Fix(-2.8)

12.可以惟一标识控件数组中的每一个控件属性的是___(12)____

(A)Name(B)Caption(C)Index(D)Enabled

13.下列变量名中，合法的变量名是___(13)____。

(A)m24(B)mn-k(C)24m(D)m+n

14.若有语句”DimFlagAsBoolean”，则下面赋值语句正确的是___(14)_____。

(A)Flag="True"(B)Flag='True'(C)Flag=Ture(D)Flag=True

15.下列讲述不正确的是___(15)_____。

(A)InputBox函数返回值为字符型(B)MsgBox函数返回值为所单击按钮的键值

(C)MsgBox语句没有返回值(D)MsgBox语句返回值为所单击按钮的键值

16.若要在Text1的光标(焦点)移动到其它控件时举行合法性推断，则可使用__(16)__大事来实

现。(A)Refresh(B)SetFocus(C)LostFocus(D)GotFocus

17.普通状况下，控件的大小是由___(17)___属性确定的

(A)Width和Height(B)Top和Left(C)Width和Left(D)Top和Width

18．以下能推断是否到达文件尾的函数是__(18)____

(A)BOF(B)LOC(C)LOF(D)EOF

19．下列过程语句说明合法的是____(19)____。

(A)Subf1(ByValn()AsInteger)(B)Subf1(n()AsInteger)AsInteger

(C)Functionf1(f1AsInteger)AsInteger(D)Finctionf1(ByValnAsInteger)

20.要在文本框Text1中显示列表框List1中最后一个项目的正确语句是__(20)____。

(A)Text1.Text=List1.List(ListCount-1)(B)Text1.Text=List1.List(0)

(C)Text1.Text=List1.List(List1.ListCount-1)(D)Text1.Text=List1.ListIndex

21．设组合框Combo1中有5个项目，则以下能删除最后一项的语句是__(21)______。

(A)Combo1.RemoveItemText(B)Combo1.RemoveItem5

(C)Combo1.RemoveItem4(D)Combo1.RemoveItemCombo1.Listcount

22．在通用声明代码中有以下语句：

OptionBase1

Dima(4,-3to3)AsString

则该数组有_(22)___个元素。

(A)28(B)24(C)35(D)30

23.要使菜单项能通过按键盘上的Alt键及K键打开，应在菜单编辑器中设置__(23)__。

(A)在“名称”栏中“K”字符前加上“&”(B)在“标题”栏中“K”字符前加上“&”

(C)在“名称”栏中“K”字符后加上“&”(D)在“标题”栏中“K”字符后加上“&”

24.以下Case语句中错误的是__(24)__。

(A)Case0To10(B)CaseIs>10

(C)CaseIs>10AndIs10

25．假定有以下两个过程,则以下说法中不正确的是__(25)______。

PrivateSubPPP(aAsSingle,bAsSingle)

a=a+b

b=a+b

Printa,b

EndSub

PrivateSubForm_Activate()

x=18

CallPPP(x,(x))

Printx

EndSub

(A)形参是a和b，两个实参x和(x)允许重名

(B)形参是a和b，实参(x)表示是传值调用

(C)形参是a和b，实参x表示是传址调用

(D)Printa,b输出的值分离为36，36

26．若需要在同一窗口内支配两组互相自立的单选按钮（OptionButton），可使用__(26)_____控件将它们分隔开。

①TextBox②PictureBox③Image④Frame

(A)①或②(B)②或③(C)②或④(D)③或④

27.在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下大事过程：

PrivateSubCommand1_Click()

CommonDialog1.FileName=""

CommonDialog1.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"

CommonDialog1.FilterIndex=2

CommonDialog1.DialogTitle="VBTest"

CommonDialog1.Action=1

EndSub

对于这个程序，以下讲述中错误的是___(27)___

(A)该对话框被设置为“打开”对话框(B)在该对话框中指定的默认文件名为空

(C)该对话框的标题为VBTest(D)在该对话框中指定的默认文件类型为文本文件(*.Txt)

28.在窗体上画一个名称为Command1的命令按钮，然后编写如下大事过程：

OptionBase1

PrivateSubCommand1_Click()

Dima

a=Array(1,2,3,4,5)

Fori=1ToUBound(a)

a(i)=a(i)+i-1

Next

Printa(3)

EndSub

程序运行后，单击命令按钮，则在窗体上显示的内容是___(28)___。

(A)4(B)5(C)6(D)7

29．在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下大事过程,该大事过程的功能是__(29)__

PrivateSubCommand1_Click()

n=Val(Text1.Text)

Fori=2Ton

Forj=2Tosqr(i)

IfiModj=0ThenExitFor

Nextj

Ifj>Sqr(i)ThenPrinti

Nexti

EndSub

(A)输出n以内的奇数(B)输出n以内的偶数

(C)输出n以内的素数(D)输出n以内能被j整除的数

30．设有如下程序：

PrivateSubCommand1_Click()

DimsumAsDouble,xAsDouble

sum=0:n=0

Fori=1To5

x=n/i:n=n+1:sum=sum+x

Next

EndSub

该程序通过For循环计算一个表达式的值，这个表达式是___(30)____

(A)1+1/2+2/3+3/4+4/5(B)1+1/2+2/3+3/4

(C)1/2+2/3+3/4+4/5(D)1+1/2+1/3+1/4+1/5

二、填空题（50分，每空2分）

1、设a=6，则执行x=Iif(a>5,-1,0)后，x的值为_____[1]__________。

2、VisualBasic提供了三种对数据文件的拜访方式，它们是挨次拜访方式、____[2]__拜访方式和二进制拜访方式。

3、赋值语句：a=123&MID("123456",3,2)执行后，a变量中的值__[3]____。

4、假如有以下程序代码，则输出结果是___[4]_____。

x=10

y=5

Printx^2>=y^3

5、运行下面的程序，单击窗体后在窗体上显示的内容是___[5]___；若将程序中的A语句与B语句的位置互换，再次执行程序，单击窗体后在窗体上显示的内容是___[6]___。

PrivateSubForm_Click()

DimaAsInteger,bAsInteger

a=0:b=0

DoWhileaa(j+1)Then

a1=a(j)

a(j)=a(j+1)

a(j+1)=a1

___[21]____

Nextj

Nexti

EndSub

10、在C盘根名目下有一数据文件（cj.dat），内容如下：

9901，56，78

9902，97，89

9903，67，75

9904，78，76

9905，100，90

其中第一列数据表示学号，其次列数据表示数学成果，第三列数据表示语文成果，要求按照学号计算同学的总分，并按总分从高到低次序在窗体上输出。现有程序如下：

Dima(5,4)AsInteger

PrivateSubForm_Click()

DimiAsInteger,jAsInteger

Open"c:\cj.dat"For__[22]___As#1

Fori=1To5

Forj=1To3

Input#1,__[23]___

Nextj

__[24]___=a(i,2)+a(i,3)

Nexti

Sort

Fori=1To5