vb期末复习题.docx
- 文档编号:30007087
- 上传时间:2023-08-04
- 格式:DOCX
- 页数:52
- 大小:238.77KB
vb期末复习题.docx
《vb期末复习题.docx》由会员分享,可在线阅读,更多相关《vb期末复习题.docx(52页珍藏版)》请在冰豆网上搜索。
vb期末复习题
1.由Array函数建立的数组,其变量必须是__c____类型
A、字符型
B、整型
C、变体型
D、字符串类型
2.通用过程可以通过执行“工具”菜单中的_d_____命令来建立。
A、添加模块
B、添加窗体
C、通用过程
D、添加过程
3.在参数传递过程中,使用关键字_d____来修饰参数,可以使之按地址传递。
A、Reference
B、Value
C、ByVal
D、ByRef
要想从子过程用后指定回两个结果,下面子过程语句说明合法的是_B___________。
A、Subf1(n%,ByValm%)
B、Subf1(n%,m%)
C、Subf2(ByValn%,ByValm%)
D、Subf1(ByValn%,m%)
如果列表框List1中已有10项数据,应使用语句_C_____将数据"Mydata"插入到列表框的第3项。
A、List1.Insert"Mydata",3
B、List1.Insert"Mydata",2
C、List1.AddItem"Mydata",2
D、List1.AddItem"Mydata",3
用户在组合框中输入或选择的数据可以通过__B____属性获得。
A、List
B、Text
C、ListIndex
D、ListCount
下列控件中,没有Caption属性的是_D__________。
A、复选框
B、单选按钮
C、框架
D、列表框
若使图片框(PictureBox)的大小能随图像的大小而变化,要定义图片框的___D______属性为True。
A、Stretch
B、Autosize
C、Visible
D、Picture
如果列表框(List1)中没有被选定的项目,则执行List1.RemoveItemList1.ListIndex语句的结果是_A_______。
A、以上都不对
B、移去最后加入列表的一项
C、移去最后一项
D、移去第一项
使用菜单编辑器设计菜单时,必须输入的项是D_______。
A、快捷键
B、索引
C、标题
D、名称
在菜单编辑器中定义了一个菜单项,名为menu1,为了在运行时隐藏该菜单项,应使用的语句_C___。
A、Menu1.Enabled=False
B、Menu1.Enabled=True
C、Menu1.Visible=False
D、Menu1.Visible=True
程序题(69)
在窗体上画一个名称为Command1的命令按钮,编写下列程序:
PrivateSubCommand1_Click()
DimaAsInteger
StaticbAsInteger
a=a+b
b=b+4
Printa,b
EndSub
程序运行后,单击该命令按钮三次后,屏幕上显示的值是___A_____。
A、812
B、48
C、04
D、412
i=i+1
EndIf
i=i+1
Loop
Prints
EndSub
运行后,输出的结果是__D_____
A、13
B、9
C、11
D、7
程序题(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
Nexti
EndSub
A、Int(Rnd*9)+1
B、Int(Rnd*9)
C、Int(Rnd)
D、Rnd*9
a=InputBox("a=")
Ifx=aorx=-aThen
y=0
Else
Ifx>-a_B___x y=a-x Else y=x-1 EndIf EndIf Print"y=";y EndSub A、not B、and C、or D、xor 程序题(22). 下列VisualBasic程序段运行后,变量s、t的值为__A____。 s=0: t=1 Fork=2To4 s=s+k t=t*k Nextk A、924 B、56 C、22 D、01 程序题(46) 执行后,s的值为10,请填空 PrivateSubform_Click() s=0 Fori=1_B_____ s=s+i Nexti Prints EndSub A、To3 B、To4 C、To5 D、To2 程序题(51) 执行下面程序段后,X的值为21,请填空 X=5 Fori=1To20Step2 x=x+_A___ NextI A、i\5 B、i+5 C、i*5 D、i-5 判断题: 当k=2时,执行语句: Ifk<4Thenn=9: Ifk<4Thenn=8: Ifk<5Thenn=7后n的值为7。 T 判断题: 设A=7,B=3,C=4,则AMOD3+B^3/C\5的值是2。 T 判断题: SelectCase的结束语句应该是EndCaseF 判断题: VB中的数组声明时可根据需要声明为定长数组和动态数组。 T 判断题: 若对话框是模式型,则打开后无法将鼠标移到其它窗口。 T 判断题: 日期/时间型常量应使用井号(#)将其括起来。 T 判断题: 若X=5,Y=6,则表达式X+Y=11的值是X+Y=11。 F MsgBox函数的返回值的类型为_数值型____。 标签控件的默认属性是Caption _____。 如果菜单标题的某个字母前输入一个__&___符号,那么该字母就成了热键字母。 为了使列表框中的项目分为多列显示,需要设置的属性是_Columns___。 如果要将变量a在过程中定义为静态的整型变量,应使用的语句是__StaticaAsInteger___。 '【程序设计】 '------------------------------------------------- '题目: (事件)双击窗体。 '(响应)把一元钞票换成一分、二分和五分的硬币 '(每种至少有一枚),求出其所有的换法, '把结果输出在窗体上。 '将所有的换法的数目存入变量N中 【参考代码】 Dimi,j,kAsInteger Fori=1To100 Forj=1To50 Fork=1To20 If((i+2*j+k*5)=100)Then Print(CStr(i)) Print(CStr(j)) Print(CStr(k)) n=n+1 EndIf Next Next Next 编写一个华氏温度和摄氏温度之间转换的程序,在窗体上添加2个标签、2个文本框、2个命令按钮, 如图1所示,在属性窗体修改控件的属性,使其运行时图2所示。 要使用的转换公式是: 其中F为华氏,C摄氏。 要求用按钮实现转换。 图1 图2 【控件属性评分】错误 【控件】VB.CommandButton_ 标准答案: Caption=摄氏转华氏 学生答案: Caption= 【控件属性评分】错误 【控件】VB.CommandButton_ 标准答案: Caption=华氏转摄氏 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=摄氏温度 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=华氏温度 学生答案: Caption= 【事件评分】错误 【事件】PrivateSubCommand2_Click() 标准答案: Text1.Text= 学生答案: 【事件评分】错误 【事件】PrivateSubCommand1_Click() 标准答案: Text2.Text= 学生答案: 文本框没有____A______属性 A、Caption B、Visible C、Enabled D、BackColor 下列控件中可用于接受用户输入文本,又可用于显示文本的是A_____。 A、TextBox控件 B、CommandButton控件 C、Label控件 D、Timer控件 当文本框的MaxLength属性值取_C_______时,该文本框能容纳的字符数最多。 A、256 B、512 C、0 D、-1 要求改变窗体的标题时,应当在属性窗口中改变的属性是___A__。 A、Caption B、Label C、Name D、Text a+b小于10,且a-b大于1的逻辑表达式是_C________。 A、(a-b>1)To(a+b<10) B、a+b<10.And.a-b>1 C、a+b<10Anda-b>1 D、a+b<10Ora-b>1 表达式Len("VB程序设计ABC")的值是__D_______。 A、14 B、20 C、10 D、9 下面___C_______是合法的单精度型变量 A、sum% B、xinte$ C、num! D、mm# 表达式10\8Mod9的值是___B______。 A、2 B、1 C、9 D、0 MsgBox函数返回值的类型是B__________ A、数值或字符串 B、整型数值 C、字符串 D、变体 赋值语句: a=123&Mid("123456",3,2)执行后,a变量中的值是A__________ A、"12334" B、12334 C、123 D、157 循环语句Fori=-3To20Step4的循环次数为_B________。 A、4 B、6 C、3 D、5 循环语句Fori=20To10Step-2的循环次数为__A________。 A、6 B、4 C、不循环 D、5 设有数组说明语句: Dim c(1To10),则下面表示数组c的元素选项中错误的是__B______。 A、c(i) B、c(0) C、c(10) D、c(3+4) 设有数组说明语句: Dim b(-1To2,-2To2),则数组b中元素的个数是___D_______。 A、16 B、15 C、12 D、20 在参数传递过程中,使用关键字D_____来修饰参数,可以使之按地址传递。 A、Reference B、Value C、ByVal D、ByRef 在参数传递过程中,使用关键字_B____来修饰参数,可以使之按值传递。 A、Reference B、ByVal C、ByRef D、Value 如果单击一个当前没有被选中的复选框,其它已被选中的复选框会处于____C____。 A、禁止 B、不选中 C、选中 D、不显示 下列语句中__A____可以把当前目录下的图形文件pic1.jpg装到入Picture1中。 A、Picture1.Picture=LoadPicture("pic1.jpg") B、Picture.Handle="pic1.jpg" C、Picture=LoadPicture("pic1.jpg") D、Picture="pic1.jpg" 单选按钮(OptionButton)用于一组互斥的选项中。 若一个应用程序包含多组互斥条件,可在不同的__A_________中 A、框架控件(Frame)或图片框(PictureBox) B、框架控件(Frame)或图象控件(Image) C、组合框(ComboBox)或图片框(PictureBox) D、组合框(ComboBox)或图象控件(Image) 若要使单选按钮具有图形特性可通过___C_______属性来进行。 A、Appearance B、BackStyle C、Style D、Bordestyle 使用___B_____方法将新的项添加到一个列表框中。 A、Print B、AddItem C、Insert D、Add 在设计菜单时,如果要在菜单中加入一个菜单分隔项,则菜单分隔项的标题必须设置为__B___。 A、加号(+) B、减号(-) C、感叹号(! ) D、冒号(: ) 程序题(70)的功能是: D 在窗体上画一个名称为Command1的命令按钮,编写下列程序: PrivateSubCommand1_Click() DimaAsInteger,bAsInteger a=45: b=36 dountila=b ifa>bthena=a-belseb=b-a loop Printa Endsub A、求a,b的最小公倍数 B、比较a,b大小 C、比较a,b是否相等 D、求a,b的最大公约数 程序题(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 程序题(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 程序题(34) 输入一串字符,统计各字母出现的次数,请填空将程序补充完整 PrivateSubCommand1_Click() Dima(1To26)AsInteger,cAsString*1 le=Len(Text1)'求字符串的长度 ForI=1Tole c=UCase(________D______________)'取一个字符,转换成大写 Ifc>="A"Andc<="Z"Then j=Asc(c)-65+1'将A~Z大写字母转换成1~26的下标 a(j)=a(j)+1'对应数组元素加1 EndIf NextI Forj=1To26'输出字母及其出现的次数 Ifa(j)>0ThenPicture1.Print"";Chr$(j+64);"=";a(j); Nextj EndSub A、以上都不对 B、Left(c,n,1) C、Right(c,n,1) D、Mid(Text1,I,1) 程序题(32) 下列程序执行后M,N,D的值分别为: B PrivateSubForm_click() t=365 M=tMod60 N=Int(t/60) D=t\60 PrintM;N;D EndSub A、666 B、566 C、656 D、5;6;6 程序题(66) PrivateSubform_click() s=0 i=1 DoWhilei<=10 IfiMod2<>0Then s=s+i i=i+1 Else i=i+1 EndIf Loop Prints EndSub 运行后,输出的结果是____C___ A、20 B、10 C、25 D、55 程序题(49) 执行下列程序段后,输出结果7,请填空 x=1 Fori=0To20Step5 x=x+iB____4 Nexti Printx A、8 B、mod C、\ D、/ 判断题: Int(6*Rnd)+1的值在[1,6]范围内。 T 判断题: 安装VB6.0后,系统默认目录为VB98。 T 判断题: 语句: Fori=20To1是错误的。 F 判断题: 子过程必须指定类型,而函数过程可以不指定其类型。 F 判断题: Cls方法可以清除窗体或图形框中程序运行时产生的图形和文字的内容。 T 判断题: 语句If0 F 判断题: 语句A=C: C=B: B=A的作用是实现A、B的值互换。 F 在窗体上有一个命令按钮,其名称为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_____。 为了使列表框中的项目分为多列显示,需要设置的属性是___columns __。 如果建立菜单时在标题文本框中输入一个__-___,那么显示时将形成一行分隔符。 组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和__下拉式组合框___。 '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目: (事件)双击窗体。 '(响应)求100以内奇数的和,并将结果输出在窗体上。 '将结果存入变量SUM中 参考代码】 DimiAsInteger Fori=1To100 IfiMod2=1Then sum=sum+i EndIf Next Printsum 在窗体上添加5个标签、3个文本框、2个命令按钮,如图1;在属性窗口里设置相关属性, 运行时显示如图2所示,功能是: 计算某个学生奖学金的等级(假定只考虑一等奖),以 三门功课成绩为评奖依据,奖学金一等评定标准如下: 1、平均分大于95者; 2、有两门是100分,且第三门功课不低于80分者。 符合上述标准之一,输出“一等奖”否则输出“非一等奖”。 图1 图2 【控件属性评分】错误 【控件】VB.CommandButton_ 标准答案: Caption=结束 学生答案: Caption= 【控件属性评分】错误 【控件】VB.CommandButton_ 标准答案: Caption=评定 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=学生成绩评定程序 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=程序设计: 太原理工大学理学院计算机基础教学部 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=计算机 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=英语 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_ 标准答案: Caption=数学 学生答案: Caption= 【事件评分】错误 【事件】PrivateSubCommand1_Click() 标准答案: "一等奖" >95 =100 学生答案: 不论何控件,共同具有的是_D________属性 A、Caption B、Text C、ForeColor D、Name 如果文本框的Enabled属性设为False,则___B_____。 A、文本框的文本将变成灰色,用户仍然能改变文本框中的内容。 B、文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上 C、文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容。 D、文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容。 一条语句要在下一行续写,用__A________符号作为续行符 A、_ B、… C、+ D、- 下列各赋值语句,语法不正确的是_D____。 A、sLength=x+y B、iNumber=15 C、Labell.Caption=time D、x+y=5 表达式10\8Mod9的值是__B_______。 A、2 B、1 C、9 D、0 a+b小于10,且a-b大于1的逻辑表达式是__C_______。 A、(a-b>1)To(a+b<10) B、a+b<10.And.a-b>1 C、a+b<10Anda-b>1 D、a+b<10Ora-b>1 在VB中,对于已经声明但没有赋值的布尔型变量,系统的默认值是__C_________。 A、1 B、0 C、False D、True 以下关系表达式中,其值为False的是A A、"ABC">"AbC" B、"中国">"中东" C、"BASIC"=Ucase("basic") D、"123"<"23" 在VB集成环境中,调试程序可以设置跟踪点。 如果设置了跟踪点,那么当程序运行至该跟踪点时,会出现一条黄色C A、下一行语句 B、当前行语句 C、上一句语句 D、当前语句 下面语句正确的是A________。 A、Ifx<>ythenprint"x不等于y" B、Ifx≠y
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 期末 复习题
![提示](https://static.bdocx.com/images/bang_tan.gif)