中职VB语言程序设计填空题综合练习一.docx

中职VB语言程序设计填空题综合练习一.docx

《中职VB语言程序设计填空题综合练习一.docx》由会员分享，可在线阅读，更多相关《中职VB语言程序设计填空题综合练习一.docx（11页珍藏版）》请在冰豆网上搜索。

中职VB语言程序设计填空题综合练习一

VB语言程序设计综合练习：

填空题

填空题A

1.在VB中，用来描述一个对象外部特征的量称之为对象的_____。

2.窗体_____决定了窗体的外观。

3.表达式（−10）^−2的值是_____。

4.执行_____语句，可以清除Picture1图片框内的图片。

Picture1.picture=LoadPicture（''''）

5.当复选框被选中时，其Value值为_____。

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

PrivateSubCommand1_Click（）

Dima（）

ReDima（4）

Fori=1To4

a（i）=i

Nexti

ReDimPreservea（6）

Fork=1To6

Printa（k）;

Nextk

Print“end”

EndSub

程序运行后,单击Command1命令按钮,则程序输出的结果是_____.

7.在模块文件中的声明部分用Global或_____关键字声明的变量为全局变量。

8.将通用对话框的类型设置为“字体”对话框可以使用_____方法。

9.下列程序的功能是：

当按下鼠标左键并在窗体上移动时，在鼠标经过的位置画点，松开鼠标移动时，不执行画点操作。

当单击鼠标右键时，清除窗体上的内容。

请在横线的上方填入适当的内容，将程序补充完整。

DimflagAsBoolean

PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,X!

Y!

）

flag=True

If_____Then

Cls

EndIf

EndSub

PrivateSubForm_MouseMove（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）

IfflagThen

PSet（X,Y）'画点语句

EndIf

EndSub

PrivateSubForm_MouseUp（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）

_____

EndSub

填空题B

1窗体的扩展名是_____。

3日期表达式#2/24/02#-#2/12/02#的值为。

4.VB的控件分为、ActiveX控件和可插入对象

5.Style属性设置为，单选按钮和复选框以图形方式显示

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

PrivateSubCommand1_Click（）

DimsAsInteger

Dimarr（3,1To7）AsInteger

ForEachtestInarr

s=s+1

Nexttest

Prints

EndSub

程序运行后,单击Command1命令按钮,则程序输出的结果是.

7声明Integer类型静态变量x，写作

Staticx%

StaticxAsInteger

staticxasinteger。

8如果把一个菜单项的Visible属性设置为False，则

9在执行KeyPress事件过程时，KeyAscii是所按键的码

填空题C

1.面向对象的程序设计是一种以_____为基础，由_____驱动对象的编程技术。

2.一般来说，同一窗体中的各个控件的_____属性应该各不相同；。

如果几个控件具有相同的_____属性，则这些控件称为数组控件。

3.求a与b之积除以c的余数，用VisualBasic表达式可表示为_____。

4.如果要每隔15s产生一个计时器事件，则Interval属性应设置为_____。

5.组合框的Style属性的取值有_____种

6.用ReDim语句重新分配动态数组时,如果要保留数组内容,即不清除数组中的内容,应使用的选择项是_____.

7.调用过程时对形参的改变不会导致相应实参变量的改变，则该形参

采用_____（按值传递/按地址传递）方式。

8.在设计菜单时，可在VisualBasic主窗口的菜单栏中选择_____，单击后从它的下拉菜单中选择“菜单编辑器”菜单项。

填空题D

1设置对象的属性有两种办法，一种是在设计时在属性窗口窗口中设置；另一种是在运行时设置，设置格式为。

大部分属性可以用以上两种方法进行设置，而有些属性只能用其中一种方法设置。

2决定窗体标题栏显示内容的属性是

3已知a=2.5，b=5.0，c=2.5，d=True，则表达式：

a>=0ANDa+c>b+3ORNOTd的值是

4Shape属性决定形状控件的形状，当Shape属性值为0时，它的表现形式是。

5方法用来向列表框中加入列表项

7在窗体Form1的过程中引用窗体Form2中的全局变量y，写作

8将控件CommonDialog1设置为"颜色"对话框，可使用

CommonDialog1.Action=3

commondialog1.action=3

CommonDialog1.ShowColor

填空题E

1.面向对象的程序设计是一种以_____为基础，由_____驱动对象的编程技术。

1.控件的Top属性是指控件的_____（上、下）边至窗体标题栏_____（上、下）边的距离；Left属性是指控件_____（左、右）边到窗体_____（左、右）边的距离。

2.访问键是通过键盘来访问控件，访问键是设置是在控件的_____属性中用_____字符加在访问字符的前面，运行时按_____键+访问字符。

5.在使用VisualBasic提供的列表框时，当列表框中的项目超过了列表框的长度时，

系统会自动在列表框的边上加上一个_____。

6.默认情况下,数组下标的下界是_____，若要使下标的下界为1,应该使用的语句是_____

7.下面程序的运行结果为_____。

PrivateSubCommand1_Click（）

Dimx%,y%

x=18

y=25

Callswap（x,y）

Printx

EndSub

PrivateSubswap（a%,b%）

Dimt%

t=a

a=b

b=t

EndSub

填空题F

1，VB的对象主要分为窗体和_____两大类。

2，在VisualBasic中，要将一个窗体从内存中卸载，应该使用_____语句。

3，声明单精度常量PI代表3.1415926的语句是_____。

4．要使用鼠标或空格键同时选择列表框中的多个选项，必须把_____属性设置为1。

5.fee=countl（title）

Printfee

EndSub

PublicFunctioncountl（x%）AsSingle

Dimpay!

Ifx<40Then

pay=x/2

Else

pay=2*x

EndIf

countl=pay

EndFunction

填空题G

1.要使输入文本框的字符靠右对齐，可修改文本框的____属性。

2.语句PrintNot10>15And8<5+2的输出结果为_____。

3在程序运行时，如果将框架的_____属性设为False，则框架的标题是灰色，表示框架内的所有对象均被屏蔽，不允许用户对其进行操作。

4.以下程序的功能是：

分别计算给定的10个数中正数之和与负数之和。

请将程序补充完整。

OptionBase1

PrivateSubCommand1_Click（）

Dimww

ww=Array（12,−6,15,34,−32,47,13,9,6,−3）

s1=0

s2=0

Fork=1To10

If（ww（k）>0）Then

s1=_____

Else

s2=____

EndIf

Nextk

Print"正数之和为";s1

Print"负数之和为";s2

EndSub

5.当列表框的MultiSelect属性值为1时，单击列表项或按空格键可以实现复选。

6.若已建立了Form1、Form2两个窗体，默认启动窗体设置为Form1。

通过_____菜单的_____的_____选项卡，可将启动窗体设置为Form2。

7用类型说明符来标识数据类型时，表示单精度使用的符号是

8.如果工具箱中还没有CommonDialog控件，则应从菜单中选定部件，并将控件添加到工具箱中。

9.要使一个控件不可用，应将该控件的enabled属性设为

10.假设a="A"，表达式：

a>="0"anda<="9"anda>="A"anda<="Z"的值

11.列表框中第一项的索引值是

12.选择了一个新的目录路径后，为了及时更新文件列表框的显示，可选用目录列表框的事件来驱动。

13.由VisualBasic预先设置好的、能够被对象识别的动作叫。

14.一个变量未被显示定义，末尾也没跟类型说明符，则变量的默认类型是变体类型。

15.图片框内可使PictureBox根据图片调整大小的属性为autosize；图像框为stretch，若使Image控件可根据图片调整大小，该属性值应为_____。

16.设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从1到5，第二维下标从-2到6，则相应的数组声明语句为。

17.过程形参为整型，对应实参为5.64，传递给形参的值为。

18.VB是一种面向对象的可视化程序设计语言，采取了。

19.定时器的Interval属性值为时，表示计时器停止工作

20.用方法只能隐藏一个窗体，不能从内存中清除该窗体。

。

21.长整型变量（Long类型）占用个字节。

22.列表框的最后一项的索引号是。

23.VB应用程序中标准模块文件的扩展名是。

24.若用户单击了窗体Form1，则启动的事件名为

25.设从键盘上输入20，下面程序的运行结果为

PrivateSubForm_Click（）

Dimtitle%,fee!

title=Val（InputBox（"请输入一个数"））

fee=countl（title）

Printfee

EndSub

PublicFunctioncountl（x%）AsSingle

Dimpay!

Ifx<40Then

pay=x/2

Else

pay=2*x

EndIf

countl=pay

EndFunction

26.multiline属性决定文本框是否可以接受多行文本。

27.alignment属性设置为单选按钮和复选框的标题显示在左边。

.

28.设a$="VisualBasicPrograming":

b$="Turbo"

c$=b$&Space

（1）&UCase（Mid$（a$,12,1））&Right（a$,11）

则变量c$的值是

29.下面程序的运行结果为

PrivateSubCommand1_Click（）

Dimx%,y%

x=18

y=28

Callswap（x,y）

Printx

EndSub

PrivateSubswap（a%,b%）

Dimt%

t=a

a=b

b=t

30．执行下面程序，第一行输出结果是第二行输出结果是。

OptionExplicit

PrivateSubForm_Click（）

DimMAsInteger，NAsInteger，KAsInteger

N=-3

ForM=6To1StepN

M=M+1

N=N-M

K=K+1

NextM

PrintK

PrintN

EndSub

31．执行下面程序，第一行输出结果是，第三行输出结果是。

PrivateSubForm_Click（）

DimNAsInteger，IAsInteger

N=2

ForI=9To1Step-1

CallSub2（I,N）

PrintI，N

NextI

EndSub

PrivateSubSub2（XAsInteger,YAsInteger）

StaticNAsInteger

DimIAsInteger

ForI=3To1Step-1

N=N+X

X=X-1

NextI

Y=Y+N

EndSub

32.执行下面程序，单击窗体，则在窗体上显示的内容是__。

PrivateSubForm_Click（0

DimaAsInteger,bAsinteger,cAsInteger

b=6:

c=6.5

a=b=c

Printa

EndSub