Visual-Basic程序设计模拟练习题一

PAGEPAGE1VisualBasic程序设计模拟练习题一

一、单项选择题（每小题2分，共30分）

1．VisualBasic是一种面向对象的可视化编程语言，采取了（

）的编程机制。A．按过程顺序执行

B．从主程序开始执行

C．事件驱动

D．按模块顺序执行2．要设置命令按钮的背景图形，必须设置的两个属性是（

）A．Caption和Picture

B．、Style和PictureC．Style和Icon

D、Value和Icon3．工程文件的扩展名是（

）。A．.vbp

B．.frmC．.bas

D．.frx4．有程序代码如下：Text1.Text="欢迎学习VB程序设计"则Text1，Text，和"欢迎学习VB程序设计"分别代表（

）。A．对象，值，属性

B．对象，属性，值

C．对象，方法，属性

D．属性，对象，值

5.VisualBasic6.0集成开发环境有三种工作模式，下列不属于三种工作模式之一的是（

）。A．设计模式

B．编写代码模式

C．执行模式

D．中断模式

6．下列控件中，不能改变大小的是（

）。A．TextBox

B．Label

C．Timer

D．PictureBox7．多窗体程序是由多个窗体组成，在缺省情况下，VB在应用程序执行时，总是把（

）指定为启动窗体。A．不包含任何控件的窗体

B．命名为Frm1的窗体C．包含控件最多的窗体

D．设计时的第一个窗体8．DimA(1To4,0To3)定义的数组包含的元素的个数是（

）。A．12

B．16C．15

D．动态变化

9．如果创建了命令按纽控件数组，则Cilick事件的参数是（

）。A．Caption

B．Index

C．Tag

D．没有参数10．不属于VB数据库引擎的是（）A．ODBC

B．Jet引擎C．OLEDB

D．BDE11．要向图片框P1中加载“d:\hainan\zhiwu.bmp”图像文件，应使用语句（

）。A．Picture1.Picture="d:\hainan\zhiwu.bmp"

B．Picture1.Picture=LoadPicture("d:\hainan\zhiwu.bmp")

C．P1.Picture=LoadPicture("d:\hainan\zhiwu.bmp")

D．P1.Picture=LoadPicture(d:\hainan\zhiwu.bmp)

12．.以下属性只能用程序代码设置，不能通过属性窗口设置的是（

）。A．Index属性

B．Pattern属性

C．Visible属性

D．Drive属性13．以下有关VisualBasic语言描述中错误的是（

）。A．语句是一行一句，以回车键结束B．用“,”分隔一行中的多个语句C．不区分大小写D．一条语句放在多行中，则在前一行结束处使用续行符“_”连接下一行13.在下列选项中，不能将图像装入图片框和图像框的是（

）A．在界面设计时，通过Picture属性装入B．在界面设计时，手工在图像框和图片框中绘制图形C．在界面设计时，利用剪贴板把图像粘贴上D．在程序运行期间，用LoadPicture函数把图形文件装入14.使用ADO对象模型时，使Recordset和Connection对象建立连接的属性是（

）。A．Open

B．ExecuteC．CommandType

D．ActiveConnection15．要发送数据，通常使用Winsock控件的（）A．Listen

B．AcceptC．SendData

D．GetData一、单项选择题（每小题2分，共30分）1.C

2.B

3.A

4.B

5.B

6.C

7.D

8.B

9.B

10.D

11.C

12．D

13．B

14.D

15.C二、填空题（每小题2分，共20分）1．每个应用程序必须有一个惟一的

文件。2．表达式13\2-2^3*5MOD6的值是

。3．如果要每隔3s产生一个Timer事件，则Interval属性应设置为

。

4．VB中的程序错误类型主要有实时错误

、

三种。5.控件数组的名字由

属性指定，而数组中的每个元素由

属性决定。6．Winsock控件主要用来编制基于

或

协议的网络应用程序。7．如果不能事先确定变量的数据类型，则可以把它生命为

类型。8．以写方式打开D盘中的Text.dat文件，正确的语句是

9．全局变量是指那些在

中有效的变量，一般在模块代码编辑器的顶部使用

声明。

10．VB中参数传递的机制有两种，一种是

参数，另一种是

参数。二、填空题（每空1分，共15分）1．vbp2．23．30004．逻辑错误

编译错误5．Name

Index6.TCP/IP

UDP7．变体型(或Variant)

8.open"D:\text.dat"ForOutputAs#19.整个应用程序

Public10．引用参数传递（或按址传递）

按值传递三、阅读程序题（共25分）阅读下列程序并写出程序运行结果1．(6分)PrivateSubForm_Click()

DimxAsInteger

StaticyAsInteger

x=x+2

y=y+3

Form1.Print"x=";x,"y=";yEndSub写出程序运行时连续单击三次窗体后，Form1上的输出结果。

2．(6分)PrivateSubCommand1_Click()

x=0

DoWhilex<60

x=(x+3)*(x+4)

n=n+1

Loop

Text1.Text=Str(n)

Text2.Text=Str(x)

Text3.Text=Val(Text1.Text)+Val(Text2.Text)EndSub写出程序运行后，文件框Text3的结果。

3.(6分)PrivateSubForm_Click()

DimA(1To3)AsString

DimcAsInteger

DimjAsInteger

A(1)="4"

A(2)="8"

A(3)="12"

c=1

Forj=1To3

c=c+Val(A(j))

Nextj

PrintcEndSub写出程序运行时单击窗体后，窗体Form1上的结果。

4.(7分)PublicSubchange1(ByValxAsInteger,ByValyAsInteger)

DimtAsInteger

t=x

x=y

y=tEndSubPublicSubchange2(xAsInteger,yAsInteger)

DimtAsInteger

t=x

x=y

y=tEndSubPrivateSubForm_Click()

DimaAsInteger,bAsInteger

a=22:b=33

change1a,b

Form1.Print"A1=";a,"B1=";b

a=22:b=33

change2a,b

Form1.Print"A2=";a,"B2=";bEndSub写出程序运行时，单击窗体Form1上的输出结果。三、阅读程序题（每小题5分，共20分）

1．x=2

y=3x=2

y=6x=2

y=9

2.242

3．

25

4．

A1=22

B1=33A2=33

B2=22

四、完善程序题（共10分）1．列表框应用程序。要求从文本框中输入课程名称，然后按“添加”按钮，将该课程名程添加到列表框中；当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；当选择列表框中某一项后，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。程序运行结果如图1所示。

List1Command3Command2Command1Text1

图1程序如下，请补充完整。PrivateSubForm_Load()

List1.AddItem"VisualBasic程序设计"

List1.AddItem"SQLSERVER数据库应用"

List1.AddItem"信息管理系统"

List1.AddItem"ERP原理与应用"

List1.AddItem"网络实用技术基础"

List1.AddItem"系统开发规范与文档编写"

List1.AddItem"信息系统测试"EndSub

PrivateSubCommand1_Click()

IfText1.Text<>""Then

[1]

’将文本框中的内容加到列表框中

Text1.Text=""

[2]

MsgBox"请在文本框中输入信息！"

EndIfEndSubPrivateSubCommand2_Click()

[3]

’删除选定的项目EndSubPrivateSubCommand3_Click()

IfCommand3.Caption=

[4]

Then

Text1.Text=

[5]

Text1.SetFocus

Command1.Enabled=[6]

Command2.Enabled=False

Command3.Caption=[7]

Else

List1.List(List1.ListIndex)=Text1.Text

Command1.Enabled=True

Command2.Enabled=True

Text1.Text=""

Command3.Caption=[8]

EndIfEndSub四、完善程序题（共10分）[1]List1.AddItemText1.Text[2]Else

[3]List1.RemoveItemList1.ListIndex[4]"修改"

[5]List1.Text

[6]False[7]"修改确认"[8]"修改"

五、编写程序题（共15分）编写一工资调整程序。若基本工资大于等于800元，增加工资20%，若小于800元大于600元，则增加工资15%；若小于600元则增加工资10%。要求在文本框Text1中输入某职工的基本工资，单击“计算”按钮，在标签框Label1中输出增加后的工资。程序运行界面如图4所示。图2五、编写程序题（共15分）