VB模拟题.docx

上传人:b****3 文档编号:4865919 上传时间:2022-12-11 格式:DOCX 页数:12 大小:44.52KB
下载 相关 举报
VB模拟题.docx_第1页
第1页 / 共12页
VB模拟题.docx_第2页
第2页 / 共12页
VB模拟题.docx_第3页
第3页 / 共12页
VB模拟题.docx_第4页
第4页 / 共12页
VB模拟题.docx_第5页
第5页 / 共12页
点击查看更多>>
下载资源
资源描述

VB模拟题.docx

《VB模拟题.docx》由会员分享,可在线阅读,更多相关《VB模拟题.docx(12页珍藏版)》请在冰豆网上搜索。

VB模拟题.docx

VB模拟题

VB模拟题

一、计算机基础部分(选择题30*1=30分)

1、在下面关于计算机系统硬件的说法中,不正确的是()

A)CPU主要由运算器、控制器和寄存器组成

B)当关闭计算机电源后,RAM中的程序和数据就消失了

C)软盘和硬盘上的数据均可由CPU直接存取

D)软盘和硬盘驱动器既属于输入设备,又属于输出设备

2、在计算机运行时,把程序和数据一起放在内存中,这是1946年由()所领导的研究小组正式提出并论证的。

A)冯。

诺依曼B)图灵C)布尔D)爱因斯坦

3、操作系统的主要功能是()

A)管理系统所有的软、硬件资源B)实现软、硬件转换C)把源程序转换为目标程序D)进行数据处理

4、下列关于存储器读写速度的排列,正确的是()

A)RAM>Cache>硬盘>软盘B)Cache>RAM>硬盘>软盘C)Cache>硬盘>RAM>软盘D)RAM>硬盘>软盘>Cache

5、文件型病毒的主要传播对象是()

A)EXE和PRG文件B)DBF和COM文件C)EXE和COM文件D)EXE和DAT文件

6、下列关于Windows98文件名的说法中,不正确的是()

A)Windows98的文件名可以用汉字B)Windows98的文件名可以用空格

C)Windows98的文件名最长可达255个字符D)Windows98的文件名最长可达256个字符

7、Windows操作的一般方式是()

A)先选择操作命令,再选择操作对象B)先选择操作对象,再选择操作命令

C)需同时选择操作命令和操作对象D)允许用户任意选择

8、在Windows98操作中,若鼠标指针变成“I”形状,则表示()

A)当前系统正在访问磁盘B)可以改变窗口的大小

C)可以改变窗口的位置D)鼠标指针出现处可以接受键盘的输入

9、在Windows98的许多应用程序的“文件”菜单中,都有“保存”和“另存为”两个命令,下列说法正确的是()

A)“保存”命令只能用原文件名存盘,“另存为”命令不能用原文件名

B)“保存”命令不能用原文件名存盘,“另存为”命令只能用原文件名

C)“保存”命令只能用原文件名存盘,“另存为”命令也能用原文件名

D)“保存”和“另存为”命令都能用任意文件名存盘

10、在下列关于Windows98菜单命令的说法中,不正确的是()

A)带省略号(…)的命令执行后会打开一个对话框B)命令前有符号(√)表示改命令有效

C)当鼠标指向带符号(▲)命令时,会弹出一个子菜单D)命令项呈暗淡的颜色,表示相应的程序被破坏

11、第一代计算机主要使用的编程语言是()

A)BASIC语言B)C语言C)机器语言D)高级语言

12、字母“B”的ASCII码比字母“b”ASCII码值()

A)小B)相等C)大D)不能比较

13、下列域名中,表示教育机构的是()

A)B)C)D)

14、网址中的http是指()

A)超文本传输协议B)文本传输协议C)计算机主机名D)TCP/IP协议

15、在Windows98中,可以打开“开始”菜单的组合键是()

A)ALT+ESCB)CTRL+ESCC)TAB+ESCD)SHIFT+ESC

16、在Windows98中,按PrintScreen键,则使整个桌面内容()

A)打印到打印纸上B)打印到指定文件C)复制到指定文件D)复制到剪贴板

17、“Windows98是一个多任务操作系统”指的是()

A)Windows98可运行多种类型各异的应用程序B)Windows98可同时运行多个应用程序

C)Windows98可供多个用户同时使用D)Windows98可同时管理多种资源

18、中国公用信息网是()

A)NCFCB)CERNETC)ISDND)CHINANET

19、在Windows98中,程序窗口最小化后()

A)程序转为后台运行B)程序仍在前台运行C)程序运行被终止D)程序运行被暂时中断,但可随时恢复

20、在Windows98中,对话框允许用户()

A)最大化B)最小化C)移动其位置D)改变其大小

21、下列关于Word“文档窗口”的叙述中,错误的是()

A)可以同时打开多个文档窗口B)可以进行文档窗口的重排

C)一个文档窗口最多可以拆分为2个窗口D)以同时编辑的文档窗口最多只能有2个

22、在Word编辑状态下,给当前打开的文档加上页码,应使用的下拉菜单是()

A)编辑B)插入C)格式D)工具

23、Word的“替换”功能所在的下拉菜单是()

A)视图B)编辑C)插入D)格式

24、在Word编辑状态下,只想复制选定文字的内容而不需要复制选定文字的格式,则应()

A)直接使用粘贴按钮B)选择“编辑”→“粘贴”操作

C)选择“编辑”→“选择性粘贴”操作D)在指定位置按鼠标右键

25、在Word中可看到分栏效果的视图是()

A)普通视图B)连机版式视图C)大纲视图D)页面视图

26、在Word编辑状态下,若要将另一文档的内容全部添加在当前文档的光标处,应该选择的操作是()

A)单击“插入”→“文件”B)单击“文件”→“新建”

C)单击“文件”→“打开”D)单击“插入”→“超级链接”

27、在Excel工作表中,单元格区域E2:

F4所包含的单元格个数是()

A)5B)6C)7D)8

28、在Excel工作表中,不正确的单元格地址是()

A)C$66B)$C66C)C6$6D)$C$66

29、在PowerPoint演示文稿中,将某张幻灯片版式更改为“垂直排列文本”,应选择的拆爱单是()

A)视图B)幻灯片放映C)格式D)插入

30、在PowerPoint中,若为幻灯片中的对象设置“飞入”,应选择的对话框是()

A)自定义动画B)幻灯片版式C)自定义放映D)幻灯片放映

二、程序设计语言部分(70分)

选择题(每题1分共25分)

1、VisualBasic是面向()的程序设计语言

A)窗口B)方法C)对象D)过程

2、VisualBasic6.0默认的工具栏是()工具栏

A)文件B)数据库C)格式D)标准

3、在VisualBasic中,当给指定的对象赋值时,应使用()语句

A)InputB)SetC)PublicD)Integer

4、下列变量名中,合法的是()

A)?

ClassB)Class#room1C)ClassAD)8Class

5、能产生[50,500]之间随机整数的函数表达式是()

A)Int(450*Rnd)+50B)Int(450*Rnd)C)Int(451*Rnd)+50D)Int(451*Rnd)

6、表示学习成绩(score)在75分90分之间的布尔表达式是()

A)score>=75ANDscore<=90B)score>=75ORscore<=90

C)score<=75ANDscore>=90D)score<=75ORscore>=90

7、要使标签中的文本靠右显示,则应将其Alignment属性设置为()

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

8、下列控件中能自动设置滚动条的使()

A)复选框B)框架C)文本框D)标签框

9、命令按钮不支持的控件是()

A)ClickB)LostFocusC)DblClickD)MouseDown

10、现有一菜单项Menu1,若想在程序的运行过程中选中该菜单项,即在该菜单项前面显示“√”,应执行下面的()语句。

A)Menu1.Checked=FalseB)Menu1.Checked=TrueC)Menu1.Enabled=FalseD)Menu1.Enabled=True

11、能使Form1窗体重现的代码是()

A)Form1.HideB)Form1.clsC)Form1.showD)Me.cls

12、下面各方法中,()不能打开某一对象中的属性窗口

A)选择对象,按下确定键B)选取“视图”菜单中的“属性窗口”命令

C)选择对象,单击鼠标右键,弹出上下文菜单,选取“属性”菜单项

D)单击工具栏中的”属性窗口”图标2

13、选择工具箱中的Timer控件是指()

A)图象控件B)文件列表框控件C)形状控件D)时钟控件

14、以下叙述中错误的是()

A)VisualBasic是事件驱动型可视化编程工具B)VisualBasic应用程序不具有明显的开始和结束语句

C)VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性

D)VisualBasic中控件的某些属性只能在运行时设置

15、以下叙述中错误的是()

A)双击鼠标可以触发DblClick事件B)窗体或控件的事件的名称可以由编程人员确定

C)移动鼠标时,会触发MouseMove事件D)控件的名称可以由编程人员确定

16、以下声明语句中错误的是()

A)Constvar1=123B)Dimvar2=‘ABC’C)Publicconst=“计算机考试”D)Staticvar3asInteger

17、程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是()

A)MouseUpB)MouseDownC)KeyDownD)Click

18、如果要改变窗体的标题,要设置的属性是()

A)CaptionB)NameC)IconD)FontName

19、以下能判断是否到达文件尾的函数是()

A)BOFB)ASCC)NEWD)EOF

20、“GUI”的含义是()

A)图形用户界面B)图形设备接口C)图形拖动方法D)面向对象的程序设计

21、在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:

PrivateSubCommand1-Click()A$=”12345共5个数字”:

Printlen(a$):

ENDSUB

程序运行后,单击命令按钮,窗体上显示的是()

A)10B)14C)15D)12

22、以下关于变量作用域的叙述中,不正确的是()

A)在过程中只能定义局部变量B)全局变量只能Public来定义

C)在模块中的声明部分可用Private或Dim定义模块级变量D)在窗体中的声明部分可以定义窗体级变量

23、Publicconters(2to14)AsInteger声明正确的是()

A)定义一个公用变量conters,其值可以是2到14之间的一个整型数

B)定义一个公用数组conters,数组内可存放14个整数C)定义一个公用数组conters,数组内可存放13个整数D定义一个公用数组conters,数组内可存放12个整数

24、abc%,abc!

,abc$,abc#分别声明abc是()

A)整型、单精度、字符串、双精度变量B)整型、整型、字符串、双精度变量

C)单精度、整型、字符串、双精度变量D)整型、双精度、字符串、双精度变量

25、在VisualBasic中数组分类方法有多种,下面错误的提法是()

A)依数组的大小确定与否将其分为静态数组和动态数组两类

B)依据数组的维数不同可以分为一维数组,二维数组,直至最大为60维数组

C)依据数组的维数不同可以分为一维数组,二维数组,直至最大为81维数组

D)依据对象不同,将其分为变量数组和控件数组两类

三、程序阅读选择题(15*2=30分)

1、下面程序的功能是:

计算1到50之间的偶数和及偶数平方和,并显示出来。

请在处选择正确答案。

PrivateSubForm_Click()

DimSUM1AsInteger,SUM2AsInteger,IAsInteger

SUM1=0:

SUM2=0

ForI=2To50Step2

SUM1=

(1)

SUM2=

(2)

NextI

Print"偶数和=";SUM1

Print"偶数平方和=";SUM2

EndSub

(1)A)IB)I*IC)SUM1+ID)SUM2+I*I

(2)A)IB)I*IC)SUM1+ID)SUM2+I*I

2、下面程序的功能是:

读入n后,求算式1+1/2!

+1/3!

+……+1/n!

的值。

请在处选择正确答案。

PrivateSubForm_Click()

DimSUMAsSingle,ITEMAsSingle

DimNNAsString

DimIAsInteger,JAsInteger,NAsInteger

NN=InputBox("请输入求的项数n")

N=

(1)

SUM=1

ForI=2ToN

ITEM=1

ForJ=1ToI

ITEM=

(2)

NextJ

SUM=(3)

NextI

Print"SUM=";SUM

EndSub

(1)A)VAL(nn)B)Inputbox(nn)C)Asc(nn)D)Len(nn)

(2)A)ITEM*JB)ITEM+JC)J*JD)ITEM*ITEM

(3)A)1/ITEMB)SUM+1/ITEMC)ITEM*ITEMD)SUM+ITEM

3.在窗体上有一个名称为command1的命令按钮,然后编写如下事件过程。

请在______处选择正确答案。

PrivateSubCommand1_Click()

DimaAsInteger,sAsInteger

a=8:

s=1

___

(1)________

s=s+a:

a=a-1

LoopWhilea<=0

Prints,a

EndSub

程序运行后,单击命令按钮,窗体上显示s的值为__

(2)____,a的值为__(3)___。

(1)A.ForB.DoC.WhileD.DoWhile

(2)A.7B.34C.9D.死循环

(3)A.9B.0C.7D.死循环

4.在窗体上有一个名称为text1的文本框和一个名称为command1的命令按钮,然后编写如下的通用过程和事件过程:

PublicSubfun(a(),ByValxAsInteger)

Fori=1To5:

x=x+a(i):

Nexti

EndSub

PrivateSubCommand1_Click()

Dimar(5)AsVariant

Fori=1To5:

arr(i)=I:

Next

n=10:

callfun(_

(1)__,n):

text1.Text=n

EndSub

程序运行后,单击命令按钮,则在文本框中显示的内容是__

(2)_____。

(1)A.a()B.arr()C.arr(5)D.arr(i)

(2)A.10B.15C.25D.24

5.在窗体上画一个名称为Command1的命令按钮,一个名称为Picture1的图片框。

运行程序后,单击命令按钮后打印出如图所示杨辉三角形。

根据题意,请在_____处选择正确答案。

OptionBase1

PrivateSubCommand1_Click()

Dima(11,11)AsInteger

_

(1)___

Fori=1Tom

a(i,1)=1:

a(i,i)=1

Nexti

Fori=3Tom

Forj=2to__

(2)___

a(i,j)=a(i-1,j-1)+__(3)___

Nextj

Nexti

n=30

Fori=1Tom

picture1.PrintTab(n);

__(4)____

Forj=1Toi

picture1.PrintTab(k);

picture1.PrintFormat(a(i,j),"@@@@@@");

k=k+6

Nextj

__(5)___

n=n-3

Nexti

EndSub

(1)A.m=11B.m=7C.n=7D.n=11

(2)A.i-1B.iC.j-1D.j

(3)A.a(i,j-1)B.a(i,j)C.a(i-1,j-1)D.a(i-1,j)

(4)A.n=kB.k=nC.k=iD.k=j

(5)A.PrintB.Pictrue1.PrintC.Print;D.Picture1.Print;

四、综合应用题

1、输入一元二次方程AX2+BX+C=0的系数A,B,C,计算该方程的二个实数根,若方程无实根则显示提示信息“方程无实根”。

程序窗口如下图所示,试写出两个命令按钮的VisualBasic代码,完成窗口的要求,其中“计算”要求输入A,B,C,输出两个实根,“清除”要求重新开始计算。

(注:

文本框名称从上到下依次为TxtA,TxtB,TxtC,TxtX1,TxtX2,命令按钮由上到下依次为CmdCa1,CmdClear)。

 

2、编程实现将任意的十进制数转换成二进制数。

程序窗口如下图所示,要求在第一个文本框中输入一个十进制,然后用“转换”按钮实现将十进制数转换成二进制数,并在第二个文本框中输出转换后的结果,再用“清除”按钮实现重新开始输入。

试写出这两个命令按钮的VisualBasic代码,完成程序的要求。

(注:

文本框名称从上到下依次为TxtNum,TxtResult,命令按钮由上到下依次为CmdCovert,CmdClear)。

 

3、如下图,设计一个名为“学生食堂售菜机”的窗体,有二个标签Label1、Label2,二个文本框(初始显示为空)Text1、Text2,一个图片框Picture1,一个命令按钮Command1。

要求在Text1、Text2中分别输入单价、数量后,单“总价”按钮后,在图片框中显示总价。

请写出Form_Load()、Command1_Click()代码。

 

答题卡

一、选择题

1-10CAABC,DBDDD11-20CADAB,DBDAC

21-30DBBCD,ABCCA

二、选择题

1-10CDBCC,ABCCB11-20CADCB,BCADA

21-25ADCAC

三、程序阅读

1、

(1)C

(2)D

2、

(1)A

(2)A(3)B

3、

(1)B

(2)C(3)C

4、

(1)B

(2)A

5、

(1)A

(2)A(3)D(4)B(5)B

四、综合应用题:

1、

Txta.text=””:

txtb.text=””:

txtc.text=””:

txtx1.text=””:

txtx2.text=””:

txta.setfocus

Endsub

Privatesubcmdcal_click()

A=val(txta.text):

b=val(txtb.text):

c=val(txtc.text)

D=b*b-4*a*c

Ifd<0then:

then:

msgbox“方程无实根”

exitsub

Else:

txtx1.text=(-b+sqr(d))/(2*a)txtx2.text=(-b-sqr(d))/(2*a):

endif

Endsub

2、

Privatesubcmdconvert_click()

Dimaaslong,nasstring

A=val(txtnum):

n=””

Do

N=(amod2)&n:

a=a\2

LOOPUNTILA=0

Txtresult=n

Endsub

Privatesubcmdclear_click()

Txtnum=””:

txtnum.setfocus

Txtresult=””

Endsub

3、

Privatesubform_load()

Caption=”学生食堂售菜机”:

label1

 

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 法律文书 > 调解书

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1