vb试题1.docx
《vb试题1.docx》由会员分享,可在线阅读,更多相关《vb试题1.docx(77页珍藏版)》请在冰豆网上搜索。
![vb试题1.docx](https://file1.bdocx.com/fileroot1/2023-2/22/4b8474ac-0e7f-4820-aed8-1e9a3d6c753d/4b8474ac-0e7f-4820-aed8-1e9a3d6c753d1.gif)
vb试题1
下列关于VB编程的说法中,不正确的是_D_______。
A.事件是能被对象识别的动作
B.方法指示对象的行为
C.属性是描述对象特征的数据
D.VB程序采用的运行机制是面向对象
在VisualBasic中最基本的对象是__B_____,它是应用程序的基石,是其他控件的容器。
A.文本框
B.窗体
C.标签
D.命令按钮
VB6.0的__A_____版本,可供专业编程人员开发功能强大的组内分布式应用程序。
A.企业版
B.学习版
C.专业版
D.初级版
有说明语句:
Dimx!
,则x是__B______类型的变量。
A.整型
B.单精度浮点型
C.长整型
D.双精度浮点型
下面所列符号中,__C_______不是数据类型说明符。
A.!
B.%
C.?
D.#
为了给x,y,z三个变量赋初值1,下面的赋值语句正确的是______C___。
A.x=y=z=1
B.xyz=1
C.x=1:
y=1:
z=1
D.x=1,y=1,z=1
判断整型变量x是奇数的表达式是_D_______。
A.xMod2!
=0
B.xMod2=0
C.xMod3=0
D.xMod2<>0
用来确定一个控件在窗体上位置的属性是_D_______。
A.Width和Height
B.Width或Height
C.Top或Left
D.Top和Left
在默认情况下,InputBox()函数返回值的类型为___D_____。
A.逻辑类型
B.变体类型
C.数值型
D.字符串型
在使用InputBox时,必须设置的参数是___B_____。
A.无
B.提示
C.标题
D.缺省
以下Case语句中错误的是__A_____。
A.CaseIs>10AndIs<5
B.Case3,5,Is>10
C.CaseIs>10
D.Case0to10
当字符型变量中第三个字符是"C"时,利用MsgBox过程显示"Yes",否则显示"No",正确的条件语句是___A_____。
A.IfMid(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"
B.IfLeft(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"
C.IfRight(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"
D.Ifstring(c,3,1)="C"ThenMsgBox"Yes"ElseMsgBox"No"
执行下列程序段输出的结果是_A_。
X%=2
DoWhilex<8
Print"*";
X=x+2
Loop
A.***
B.****
C.*
D.**
要使For语句fork=__To-5Step-2循环执行20次,循环变量的初值应是___B______。
A.35
B.33
C.32
D.31
声明一个长度为10个字节的字符串变量mstr,应使用____D____。
A.DimmstrAsString(10)
B.Dimmstr(10)AsString
C.DimmstrAs10
D.DimmstrAsString*10
语句DimAbc(5)所定义的数组元素个数是__A______。
A.6
B.5
C.4
D.10
下面叙述中,错误的是____A______。
A.自定义类型只能在窗体模块的通用声明段进行声明
B.在窗体模块中定义自定义类型时必须使用Private关键字
C.自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型
D.自定义类型必须在窗体模块或标准模块的通用声明段进行声明
由Array函数建立的数组,其变量必须是__C_______类型。
A.字符型
B.整型
C.变体型
D.字符串类型
子过程Sub...EndSub的形式参数可以是____D_______。
A.常数、简单变量、数组变量
B.常数、简单变量、数组变量和运算式
C.简单变量、数组变量和运算式
D.简单变量、数组变量
编写如下事件过程:
PrivateSubForm_Click()
Dimx$,y$,Z$,i%
x="祝你成功"
y="1234"
Fori=1To4
Z=Z+Mid(x,i,1)+Right(y,1)
Nexti
PrintZ
EndSub
程序运行后,单击窗体,则窗体上显示的内容是___B________。
A.祝你成功1234
B.祝4你4成4功4
C.祝1你1成1功1
D.1234祝你成功
设已定义函数过程f,它有三个整型数值参数,再设a,b和c为实型变量,则调用该函数过程使用的语句为___D_____。
A.fa+b,b+c,c+a
B.f
C.f(a+b,b+c)
D.f(a+b,b+c,c+a)
有如下程序:
PrivateSubForm_Click()
a=1:
b=2:
c=3
Callss(a,b,c)
Printa;b;c
EndSub
PrivateSubss(ByValx,ByRefy,z)
x=x+1:
y=y+1:
z=z+1
EndSub
程序运行后,单击窗体,则输出的结果是_D_______。
A.224
B.123
C.133
D.134
在过程的定义中,使用关键字___A_____来修饰形式参数,可以使之按地址传递。
A.ByRef
B.ByVal
C.Reference
D.Value
以下描述中,正确的是___D_____。
A.过程的定义和过程的调用均可以嵌套
B.过程的定义可以嵌套,但过程的调用不能嵌套
C.过程的定义和过程的调用均不能嵌套
D.过程的定义不可以嵌套,但过程的调用可以嵌套
在VisualBasic中,要使一个窗体不可见,但不从内存中释放,应使用的语句是___D______。
A.UnLoand
B.Show
C.Load
D.Hide
VisualBasic控件分为3类,它们分别是标准控件、ActiveX控件和可插入对象。
其中只有___D_______是由系统提供的。
A.ActiveX控件
B.可插入对象
C.以上都可以
D.标准控件
为了装入一个VisualBasic应用程序,下列说法中,正确的是__C______。
A.分别装入工程文件和标准模块文件(.bas)
B.只装入窗体文件(.frm)
C.只装入工程文件(.vbp)
D.分别装入工程文件、窗体文件和标准模块文件
当组合框的_C_____属性值为2时,不允许用户在组合框中输入任何文本。
A.Text
B.List
C.Style
D.ListCount
滚动条的默认属性是__C____。
A.Name
B.Min
C.Value
D.Max
在使用多组Option控件时,可以选用___C_____控件,对这些Option控件分组。
A.Check
B.Line
C.Frame
D.Shape
下列___D_____事件是菜单项可以触发的事件。
A.MouseUp
B.MouseDown
C.KeyPress
D.Click
用户按下并且释放一个会产生ASCII码的键时,被触发的事件是____C___。
A.Key
B.KeyUp
C.KeyPress
D.KeyDown
下面所列中,鼠标单击事件名为___D_____。
A.DblClick
B.MouseUp
C.MouseDown
D.Click
程序题(12)
PrivateSubform_click()
s=0
i=1
DoWhilei<=100
IfiMod10<>0Then
s=s+i
i=i+1
Else
i=i+1
EndIf
Loop
Prints
EndSub
运行后,输出的结果是__C_____
A.4000
B.4050
C.4500
D.5050
程序题(14)
建立并输出10*10的方阵,其中每个数都是随机数且范围是[1,9],把下面程序补充完整
PrivateSubForm_click()
Dima%(1to10,1to10),i%,j%
Randomize
Fori=1To10
Forj=1To10
a(i,j)=___A______
PrintTab(j*5);a(i,j);
Nextj
Print
Nexti
EndSub
A.Int(Rnd*9)+1
B.Int(Rnd*9)
C.Int(Rnd)
D.Rnd*9
程序题(11)
PrivateSubForm_click()
Dims%,i%
s=0
i=100
DoWhilei<=120
If(i\3)*3=iThen
s=s+1
i=i+1
EndIf
i=i+1
Loop
Prints
EndSub
运行后,输出的结果是__D_____
A.13
B.9
C.11
D.7
程序题(48)
执行下列程序段后,输出结果为__C____
x=1
Fori=0To20Step10
x=x+iMod4
Nexti
Printx
A.5
B.30
C.3
D.7
程序题(46)
执行后,s的值为10,请填空
PrivateSubform_Click()
s=0
Fori=1__B____
s=s+i
Nexti
Prints
EndSub
A.To3
B.To4
C.To5
D.To2
程序题(39)
下列程序运行后文本框中显示的内容是___A__________。
PrivateSubCommand1_Click()
a=""
Forn=1To100
IfnMod37=0Then
a=a&Trim(Str(n))
EndIf
Next
Text1.Text=a
EndSub
A.3774
B.37
C.74
D.3774
从字符串中任意位置截取字符的函数是____B_____。
A.Left()
B.Mid()
C.Str()
D.Right()
从字符串变量Cstr中取左边4个字符,应使用__A______。
A.Left(Cstr,4)
B.Left(Cstr,1,4)
C.Mid(Cstr,3,4)
D.Mid(Cstr,4,3)
结构化程序由三种基本结构组成,下面术语中是三种基本结构之一的是___B____。
A.递归结构
B.选择结构
C.输入输出结构
D.过程结构
在VisualBasic中注释语句使用____B____符号来标志。
A.@
B.'
C.*
D.#
VisualBasic程序设计语言中,响应对象的外部动作称为____D_____,而对象可以执行的动作或对象本身的行为则称为________。
A.属性,方法
B.过程,事件
C.方法,事件
D.事件,方法
在VisualBasic中称对象的数据为_D_________。
A.方法
B.事件
C.封装
D.属性
下面所列中,合法的变量名是_____A_____。
A.x_yz
B.integer
C.X+Y
D.123abc
下列所列符号中,____B_____是VB中的合法变量名。
A.7AB
B.AB7
C.IF
D.A[B]7
下面所列中,__C________是合法的字符常数。
A.ABC
B.'ABC'
C."ABC"
D.ABC$
判断题:
语句A=C:
C=B:
B=A的作用是实现A、B的值互换。
F
判断题:
语句Ifx>0Theny=7x-1是正确的。
F
判断题:
若要清除列表框的所有项目内容,可以使用Clear方法。
T
判断题:
若有数组说明语句:
Dima()则a被定义为变体型数组。
T
判断题:
VB中的数组声明时可根据需要声明为定长数组和动态数组。
T
判断题:
不能用于列表框控件的方法是AddItemF
判断题:
VB中可以同时删除字符串前导和尾部空白的函数是trim()。
T
判断题:
语句DimB(-1To5,4)AsInterger所定义的数组B的元素个数是25个。
F
判断题:
若使命令按钮Command1重新生效,则使用的赋值语句为Command1.Enabled=falseF
判断题:
日期/时间型常量应使用井号(#)将其括起来。
T
一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picturel),应执行的语句是__Picture1.Picture=LoadPicture("pic2.gif")
picture1.picture=loadpicture("pic2.gif")
___。
VB6.0识别对象靠的是对象的__NAMENamename___属性。
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和__下拉式组合框
___。
如果菜单标题的某个字母前输入一个__&
___符号,那么该字母就成了热键字母。
如果建立菜单时在标题文本框中输入一个__-___,那么显示时将形成一行分隔符。
在窗体上有一个命令按钮,其名称为Command1,然后编写如下程序:
FunctionM(xAsInteger,yAsInteger)AsInteger
M=IIf(x>y,x,y)
EndFunction
PrivateSubcommand1_Click()
DimaAsInteger,bAsInteger
a=100
b=200
PrintM(a,b)
EndSub
结果为:
200_____。
当用__APPEND
append
Append
___方式打开文件时,如果对文件进行写操作,则写入的数据附加到原来文件的后面。
在程序运行中,要想使用按钮变成看得见但不可操作,则应设置__ENABLED
Enabled
enabled
____的属性是False。
MsgBox函数的返回值的类型为___数值型
__。
文本框的默认属性是_Text
text
TEXT
____。
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目:
(事件)双击窗体。
'(响应)求s=1+1×2+1×2×3+…+1×2×3×…×10,
'并将结果存到变量S中
'-------------------------------------------------
PrivateSubForm_dblClick()
DimsAsLong
'********Begin*******
Dimi,jAsInteger
DimkAsLong
k=1
s=0
Fori=1To10
Forj=1Toi
k=k*j
Next
s=s+k
k=1
Next
Print(CStr(s))
'*********End************
TestFunc(s)
EndSub
PrivateSubTestFunc(iAsLong)
DimOUTAsInteger
OUT=FreeFile
OpenApp.Path&"\7.out"ForOutputAs#OUT
Print#OUT,i
Close#OUT
EndSub
【窗体设计】
------------------------------------------------
题目:
请按照题目要求设计指定的窗体。
建立如(图1)所示界面:
请按所给窗体的样子设计
窗体,不要求控件的尺寸一样,运行时得到所给
窗体即可。
------------------------------------------------
【控件】VB.TextBox_Text1
标准答案:
Name=Text1
【控件】VB.TextBox_Text1
标准答案:
Text=字体和字形练习
【控件】VB.CheckBox_Check4
标准答案:
Name=Check4
【控件】VB.CheckBox_Check4
标准答案:
Caption=下划线
【控件】VB.CheckBox_Check3
标准答案:
Name=Check3
【控件】VB.CheckBox_Check3
标准答案:
Caption=删除线
【控件】VB.CheckBox_Check2
标准答案:
Name=Check2
【控件】VB.CheckBox_Check2
标准答案:
Caption=倾斜
【控件】VB.CheckBox_Check1
标准答案:
Name=Check1
【控件】VB.CheckBox_Check1
标准答案:
Caption=加粗
【控件】VB.OptionButton_Option2
标准答案:
Name=Option2
【控件】VB.OptionButton_Option2
标准答案:
Caption=黑体
【控件】VB.OptionButton_Option1
标准答案:
Name=Option1
【控件】VB.OptionButton_Option1
标准答案:
Caption=宋体
下属选项中,属于VB的程序设计方法是__C_____。
A.面向过程,事件驱动
B.面向对象、顺序驱动
C.面向对象,事件驱动
D.面向过程,顺序驱动
以下叙述错误的是___A_____。
A.打开一个窗体文件时,系统自动装入与该窗体有关的工程文件
B.事件可以由用户激发,也可由系统激发
C.打开一个工程文件时,系统自动装入与该工程有关的窗体等文件
D.保存VB应用程序时,应分别保存窗体文件和工程文件
表达式10\8Mod9的值是___B______。
A.2
B.1
C.9
D.0
要在窗体Form1内显示字符串"MyForm",可以使用的语句是___B_____。
A.Form1.Caption="MyForm"
B.Form1.Print"MyForm"
C.Form.Caption="MyForm"
D.Form.Print"MyForm"
下面程序段的功能是求两个数中的大数,其中__B_______是不正确的。
A.Max=IIf(x>y,x,y)
B.Ify>=xThenMax=y:
Max=x
C.Ifx>yThenMax=xElseMax=y
D.Max=x:
Ify>=xThenMax=y
执行语句"Fori=1to3:
i=i+1:
Nexti"后变量i的值是C__。
A.6
B.4
C.5
D.3
关于Do...LoopUntil循环正确的描述是_C_。
A.如果"条件表达式"的值为真,则一次循环也不执行
B.如果"条件表达式"的值为真,则要继续执行循环体
C.不论"条件表达式"是否为"真",至少要执行一次循环体
D.如果"条件表达式"的值为假,则一次循环也不执行
语句DimAbc(5)所定义的数组元素个数是___A_____。
A.6
B.5
C.4
D.10
在使用动态数组前,需要对动态数组进行重新定义,使用____B_____语句。
A.Unload
B.Redim
C.Load
D.Dim
下列叙述中,错误的说法是____D_______。
A.使用Redim语句可以改变数组每维数的大小
B.使用Redim语句可以对数组的元素初始化
C.使用Redim语句可以改变数组的维数
D.使用Redim语句可以改变数组的类型
在代码中,定义了一个子过程:
SubP(a,b)
…
EndSub
下面调用该过程的格式正确的___D________。
A.P()
B.P10,20,30
C.P10
D.P10,20
PrivateSubCommand1_Click()
DimxAsString*1,yAsString,i%
x="a"
Fori=Asc(x)ToAsc(x)+4
y=y&Chr(i)
Nexti
Printy
EndSub
程序运行后,单击命令按钮,则窗体上显示的内容是____D_______。
A.a
B.aaaa
C.32
D.abcde
通用过程可以通过执行"工具"菜单中的___B_____命令来建立。
A.通用过程
B.添加过程
C.添加窗体
D.添加模块
设有如下两个过程:
PrivateSubForm1_Click()
Dimx$,y%
x=18:
y=10
CallPPP((x),y)
Printx,y
EndSub
PrivateSubPPP(aAsSingle,bAsSingle)
a=a+b
Printa,b
b=a+b
Printa,b
EndSub
运行程序后,则输出结果是___A_____。
A.2810
2838
1838
B.2810
2838
1810
C.2810
2838
2838
D.2810
2838
2810
在过程的定义中,使用关键字___A_____来修饰形式参数,可以使之按值传递。
A.ByVal
B.ByRef
C.Reference
D.Value
下列叙述中,正确的是___C_____。
A.在调用过程时,所有局部变量被系统初始化为0或空字符串
B.在窗体的Form_Load事件过程中定义的变量是全局变量
C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名,但其作用域只限于该过程
D.局部变量的作用域可以超出所定义的过程
要使窗体在运行时不可改变窗体的大小和没有最