《VB章节练习题.doc》由会员分享，可在线阅读，更多相关《VB章节练习题.doc（47页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、第一章练习题一、选择题1 VB6.0集成开发环境可以D 。 A）编辑、调试、运行程序，但不能生成可执行程序 B）编辑、生成可执行程序、运行程序，但不能调试程序 C）编辑、调试、生成可执行程序，但不能运行程序 D）编辑、调试、运行程序，也能生成可执行程序2.英文“Visual”的含义是 A 。 A）可视化 B）集成 C）结构化 D）调试3.不能打开属性窗口的操作是D。 A）单击工具栏中的“属性窗口”按钮 B）选取“视图”菜单中的“属性窗口“子菜单项 C）在对象上单击右键，从弹出的快捷菜单中选择“属性窗口”选取项 D）选取“工程”菜单中的“属性窗口”子菜单项4.标准模块文件的扩展名是C。A）frm
2、 B）vbpC）bas D）vbg5. VB60集成开发环境有三种工作状态，工作状态显示在D。A）状态栏的最左方 B）状态栏的最右方C）状态栏的中括号内 D）标题栏的中括号内6.打开属性窗口的热键是D 。A）F1 B）F2C）F3 D）F47英文缩写“OOP”的含义是C 。A）事件驱动的编程机制B）结构化程序设计语言C）面向对象的程序设计D）可视化程序设计8VB60集成开发环境的工作状态有C 。A）一种 B）两种C）三种 D）四种9VB60是_C 应用程序的开发工具。A）8位 B）16位C）32位 D）64位二、填空题1.VB60保存窗体文件的快捷键是Ctrl+S 。2.VB60保存工程文件的
3、快捷键是_ Ctrl+O 。3.VB6.0的主窗口由标题栏、菜单栏和工具栏 组成。4.在 VB60集成开发环境中，可以编辑程序代码，但不能修改用户界面的工作状态是中断状态 。5新建工程的热键是 Ctrl+N 。6打开工程的热键是_ Ctrl+O 。7运行程序的热键是_F5_。8.工具栏中图标 的作用是。9工具栏中图标 的作用是 。第二章练习题一、选择题1下面是窗体的四个属性，在界面设计时，改变属性值看不到窗体变化的是 D A）Top B）WidthC）Left D）Enabled2下面四个选项，不是窗体属性的是 A）MinButton B）MaxButtonC）Caption D）Load3下
4、面四个选项，不是事件的是 B A） Load B） EnabledC）UnloadD）DblCllck4用来设置窗体背景图片的属性是 B A）MoveableB）PictureC）ForeColor D）Windowstate5Load事件是在窗体被装入工作区时D 触发的事件。A）用户B）程序员C）手工D）自动6修改控件属性，一般可以使用属性窗口，也可以通过D 为属性赋值。A）命令B）对象C）方法D）代码7在 VB 60中的每一个对象都具有自己的属性、C 和方法。A）控件B）函数C）事件D）公用过程8图案 表示工具箱中的控件。A）标签B）文本框C）框架D）复选框9在设计VB 60应用程序界面时
5、，改变窗体下面的属性看不到效果的是 C A）Left B）TopC）Visible D）BackColor二、填空题1窗体被装入工作区时自动触发的事件是Load事件 。2 表示工具箱中的控件。3当程序运行后用鼠标双击对象时触发的事件是Dblclick事件 。4VB 60识别对象靠的是对象的名称 属性。5VB 6对的对象包括窗体 和控件 。第三章练习题一、选择题1已知字母A的 ASCll码为十进制的 65，表达式 ASC（”A”） ASC（”C) 的值是B 。A） 6567 B）132C）“AC” D）AC2在VB 60中，下列不正确的 Integer型常数是A 。A） 32768 B） 0C）
6、 037 D）Haf3在 VB 60中，下列不正确的字符串型常数是D 。A）” B）“0”C）”a” D）HAB4在 VB 60中， 的类型是D 。 A）整数型B）长整数型 C）字符常数 D）双精度常数5下列四组（八进制或十六进制）常数中，正确的一组是C 。 A）o88 obf h017 B）oabc o17 oa C）o010 o11 h11D）h12 o7FF h1236下列四组整型常量中，合法的一组是A 。 A） 160 hffff o11B） ocdf 01 32768C） 01 986,012 0668 D） o47 2e5 117以下选项中合法的字符串常数是B 。 A） ABC B
7、）“34“ C）ABC D）348以下选项中不合法的变量名是C 。 A） a B） A123 C）sgn D）C_E！9下列四个叙述中，错误的是A 。A）在VB60中，无论是整数还是实数，都能被准确地表示B）在 VB 60中，变量名代表存储器中的一个位置C）过程内用Dim语句定义的变量，它的生存期与整个过程的运行期相同D）在VB6.0中，若模块的“通用_声明”中写上语句： Option Explicit，则该模块的所有变量必须先说明后引用10已知变量A 、B和C中C最小，则判断A B，C可否构成三角形的逻辑表达式为B 。A） AB And BC And C0 B） ACB And BCA An
8、d C0C）（ABC Or A-BC） And C0D）ABC And A-BC And C011当用 Const A As integer9.8定义后，下列叙述正确的是B 。 A）A是整型常数 B）A是整型常量 C）A是字符型常数 D）A是变体类型的常数12 26 MOD 7运行时输出的结果为C 。 A） 3 B） 4 C） 5 D） 613若X5，Y6，则表达式XY11的值是C 。 A）XY11 B）11 C) True D）Flase14设A10，B20，则可以实现变量A，B值交换的程序是C 。 A） A10 B） A10 B20 B20 BA CA A=B B=C A=B C）A10
9、D）A10 B20 B20 CA CA AB DB BC BC AB 15执行下列语句后，V的值是B 。 A”56789” VVal（Mid（A, 3，2） A） 89 B） 78 C) 67 D） 0 16执行下列程序段后，E，F，G的值分别是C 。 E3：F4：G= 5 EF：FG：G= E A） 3 4 5 B） 4 5 3 C） 4 5 4 D） 4 5 5 17m，n是整数，且nm，在下面四个语句中，能将x赋值为一个mn之间（含m，n）的任意整数，即满足mxn的是A 。 A）xINT（RND*（nm1）m B）xINT（RND*n）m C）xINT（RND*m）n D）xINT（RN
10、D*（nm）m18 VB 6对表达式 Log（l） Abs（l） Int（Rnd（1）的值是 C。 A）l B）0 C） l D） 219 VB 6对表达式 Log（1） Abs（l） Int（Rnd（1）的类型是 A A）算术表达式 B）关系表达式 C）错误表达式 D）逻辑表达式20 VB 6.0表达式”123” Abs（l）的值是D 。 A） 1231 B） 1231 C）错误表达式 D） 124二、填空题1数学式 2cos2ye2x的 VB 60表达式为2*Cos(2*y)+exp(2*x) 。2. VB 6.0表达式-729/3 Mod（12* 32）的值为-7 。3执行以下程序段后，
11、G的值是15 。 a”1”： b”2” c Val（a） Val（b） d Val（a b） gcd4执行以下程序段后，G的值是 32 。 Dim a As Date， b As Date a”2002/05/08”： b”04/06/2002” gab5VB 6.0表达式Len（Left（”abed”， 3）Right（”北京大学”， 4）的值为7 。6设已定义 Len（Chr（65）Chr（66）的值是2 。7VB 6.0表达式 Len（Trim（”ABC”） RTrim（“ABC”）的值为6 。第四章练习题 一、选择题 1下面四个语句中，能打印显示 2030字样的是A 。 A） Prin
12、t ”2030” B） Print 2030 C） Print Chr（20）”Chr（30）D） Print Val（”20”）Val（”30”） 2下列事件过程 Private Sub CommandlClick（） Dim sum As Integer sum19 sum2.32 Print sum；sum End Sub 运行后输出结果是D 。 A） 19 2.32 B） 19 19 C） 2.32 2.32 D） 2 23.下列代码 Defstr C-F Private Sub CommandlClick（） C”123” D”4 5 6” Print CD End Sub 运行后输
13、出结果是D 。 A） B） ” C） 123”456” D）显示出错信息4下列代码 Defstr C-F Private Sub CommandlClick（） C”123” D”4 5 6” Print CDEnd Sub运行后输出结果是A 。 A） B） ” C） 123”456” D）显示出错信息5下列事件过程 Private Sub CommandlClick（） Dim sum As Integer sum 19 sum2.52 Prrnt sum； sumEnd Sub运行后输出结果是 C 。 A） 19 2 B） 19 19 C）3 3 D）显示出错信息6下列事件过程Privat
14、e Sub CommandlClick（） n=”nnnnn” Mid（n， 2， 2）=”NN Print n End Sub运行后输出结果是 C 。 A）”nNNnn” B）”nnNNn” C） nNNnn D） nnNNn7下列事件过程Private Sub CommandlClick（） Print Format（123.456，”. ”）End Sub运行后输出结果是 D A） 123.46 B） 123.45 C） 123.456 D） 12345.68下列事件过程Private Sub CommandlClick（） a”12” b=”34” c=ab d=Val（c） Prin
15、t d10End Sub运行后输出结果是A 。 A）123 B）123.4 C） 123410 D）”123410”9下列事件过程Private Sub CommandlClick（） a=”Bird” c=”fly” Print a ”can” c “!”End Sub运行后输出结果是 B 。 A） Bird can fly! B） Birdcanfly！ C） Birdcanfiy！ D） Bird Can Fly！10下列事件过程Private Sub CommandlClick（） Print 25 Mod（l2 3）End Sub运行后输出结果是A 。 A）4 B）4 C）0 D）0
16、11可以用InputBOX函数产生“输入对话框”。若执行下列语句：stInputBOX（“请输入字符串”，”字符串对话框”，“字符串“）当用户输入完毕，按“确定”按钮后，st变量的内容是D 。 A）字符串 B）请输入字符串 C）字符串对话框 D）用户输入内容12下面四个语句中，输出逻辑值为“真”的是D 。 A） Print Not（3546） B）Print 2lAnd 32 C） Print 12 Or 23 D） Print Not（12） 13下列事件过程Private Sub CommandlClick（） a 3： b 4 Print ba End Sub运行后，输出的结果是C 。
17、A）43 B）True C）False D）显示出错信息14下列事件过程Private Sub CommandlClick（） Dim zxs As Integer zxs % = 232 zxs = 232.32 Print zxs； zxsEnd Sub运行后，输出的结果是B 。 A） 232 232.32 B） 232 232 C）232.32 232.32 D）显示出错信息15下列程序Private Sub CommandlClick（） DefStl C-F d”321” f”654” Print d f$End Sub运行后，输出的结果是D 。 A） B）” C）321”654”
18、D）显示出错信息16下列程序Private Sub CommandlClick（） Const st”CHINA” st ”GREAT” st”HeBei” Print stEnd Sub运行后，输出的结果是D 。 A）CHINA B）GREAT C）HeBei D）显示出错信息17下列程序Private Sub CommandlClick（） X1 = InputBox（”请输入”） Print Xl 123End Sub运行时，若输入123，将输出B 。 A） B） 246 C） 123 D）显示出错信息18下列程序Private Sub CommandlClick（） X1 = Inpu
19、tBox（”请输入”） Print Xl “123”End Sub运行时，若输入123，将输出A 。 A） B） 246 C） 123 D）显示出错信息19下列程序Private Sub CommandlClick（） X1 = InputBox（”请输入”） Print Xl & “123”End Sub运行时，若输入123，将输出A 。 A） B） 246 C） 123 D）显示出错信息二、填空题1. Printer.Print”，星号输出到打印机 。2. PrintForm将打印活动窗口 。3.下列程序Private Sub CommandlClick（） X1 = InputBox（”
20、请输入”） MsgBox（X1）End Sub运行时，若输入123，输出对话框的提示信息是123 。4下列程序Private Sub CommandlClick（） X1 = InputBox（”请输入”） MsgBox（”X1”）End Sub运行时，若输入123，输出对话框的提示信息是X1 。第五章练习题 一、选择题 1以下选项中，不是 VB 60控件的是D 。 A）单选按钮 B）命令按钮 C）滚动条 D）窗体 2以下 VB 60控件中，有 Caption属性的是D 。 A）组合框 B）列表框 C）计时器 D）单选按钮 3不能作为容器使用的对象是C 。 A）Picture B）Form C
21、）Image D） Frame 4能作为容器使用的对象是A 。 A）图片框 B）图像框 C）标签框 D）文本框 5在程序运行中，要想使可操作的按钮变成看得见但不可操作，则应设置为False的属性是B 。 A）Visable B） Enabled C） Default D）Cancled 6在程序运行中，要想使可操作的按钮变成看不见，则应设置为False的属性是A 。 A） Visable B） Enabled C）Default D）Cancled 7若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是C 。 A）Enabled B）Cancel C）Defaul D）Value 8
22、能触发滚动条Scroll事件的操作是 A 。 A）拖动滚动条中滑块 B）单击滚动条中滑块 C）单击滚动条两端箭头 D）单击箭头与滑块之间的滚动条9命令按钮不能响应的事件是 A 。 A）DblClick B）Click C）MouseDown D）Mouseup10若要设置标签框的背景颜色，使用的属性是 B 。 A） ForeColor B） BackColor C） FontBold D） Color 11使控件能自动按图形大小而改变的控件是 a 。 A）图像框 B）图片框 C）文本框 D）框架12下面选项中，不能将图像装入图片框和图像框的方法是 A 。 A）在界面设计时，手工在图片框和图像框
23、中绘制图形 B）在界面设计时，通过Picture属性装入 C）在界面设计时，利用剪贴板把图像粘贴上 D）在程序运行期间，用LoadPicture函数把图形文件装入13下面选项中，不能用于列表框控件的方法是 D 。 A） AddItem B） RemoveItem C）Clear D）Cls14下面选项中，不能使控件得到焦点的操作是 D 。 A）在程序运行期间，用鼠标单击对象B）在程序运行期间，用快捷键选择对象 C）在程序运行期间，按Tab键D）在程序运行期间，按回车键15计时器控件，如果希望每秒产生10个事件，则要将Interval属性的值设置为 A 。 A） 100 B） 200 C）300
24、 D）400二、填空题1列表框的FOntBold属性的类型是 逻辑类型或布尔类型 。2图像框控件使用系统资源比图片框 少 。3删除列表框中的所有项目使用的方法是Clear方法 。4从列表框中删除项目使用的方法是 RrmovItem方法 。5向列表框添加项目使用的方法是 AddItem方法 。6在命令按钮释放鼠标按钮时，所触发的事件称为 MouseUp事件 。7工具箱中的图标是控件。8文本框能返回按键的ASCII码值的事件是 KeyPress事件 。第六章练习题 一、选择题 1下列程序 Private Sub Form_Click（） For i 1 To 3 For j 5 To 1 Step
25、 l Print i*j Next j Next i End Sub 运行时，执行 Print i*j的次数是C 。 A） 13 B） 14 C） 15 D） 16 2下面程序运行的输出结果是 D 。 Private Sub Form_Click（） X 3： y 0： Z 0 If XyZ Then Print ” Else Print ” ” End If End Sub A）有语法错误，若设置了编辑时自动检查语法，编辑时表现出错误 B）输出 C）编辑时语法检查查不出错误，但不能运行 D）输出3下面的程序运行时，若从键盘输入3和4, 则输出为B 。Private Sub Form_Clic
26、k（） a=Val（InputBoX（”请输入a”） b=Val（InputBoX（”请输入b”） ca If bc Then c=b ccc Print cEnd Sub A）14 B） 16 C）18 D）204下面的程序执行时，若从键盘输入5，则输出为A 。Private Sub Form_Click（） X=Val（InputBoX（”请输入X”） For i=1 To 20 Step 2 XXi5 Next i Print XEnd Sub A）21 B）22 C）23 D）245下列程序Private Sub Form_Click（） For i=1 To 10 Step 2 Fo
27、r j=1 TO 5 Prrnt i*j； Next j Prrnt Next iEnd Sub该程序运行时输出的行数是A 。 A）5 B）25 C）30 D）506下面程序运行的输出结果是、 A 。Private Sub Form_Click（） X=100： a10： b20： ok1=True： ok2=False If ab Then If b15Then If Not ok1 Then x1 Else If ok2 Then x=10 x-1 End If End If End If Print xEnd Sub A）1 B） 0 C） 1 D）不确定的值7下面程序执行时，输入4和2
28、, 输出是_C _。Option ExplicitPrivate Sub Command1_Click（） Dim m As Integer， n As Integer Dim a， b， r mInputBox（”请输入第一个正整数：”） nInputBox（”请输入第二个正整数：”） a = m: b = n: r = a Mod b Do While r 0 ab br r a Mod b Loop Print bEnd Sub A） 0 B） l C） 2 D） 38下列程序Private Sub Fom_Click（） b =1 a =1 DO While bmmm then mmm=b if cmmm then mmm=c Print mmmEnd Sub运行时，输入数据是：100，200，300，输出的结果是D 。 A）-300 B） 0 C）100 D）200 12下列程序 Private Sub form_Click（） S=0 n 100 For i1 to n SS+i If i Mod 50 then print “*” Next i Print s End Sub 运行后输出的星号个数是 B 。 A） 15 B） 20 C）25 D）30 13下列程序 Private Sub Form_Click（） For i=1 to 10 For