(完整word版)VB程序设计试题题库及答案.doc

第一套试题一、选择题（每题2分，共30分）1.在VB环境中，工程文件的扩展名是( C )（A）.frm （B）.bas （C）.vbp （D）.frx2.下面4项中不属于面向对象系统三要素的是( A )（A）变量（B）事件（C）属性（D）方法3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C )（A）\ （B）/ （C）Mod （D）*4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor（C）AutoRedraw （D）Caption5.不论何控件，共同具有的属性是( B )（A）Text （B）Name（C）ForeColor （D）Caption6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D )（A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构（C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D )（A）“12334”（B）123 （C）12334 （D）1579.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D )（A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1（C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+110.若要清除列表框的所有内容，可用来实现的方法是( C )（A）RemoveItem （B）Cls（C）Clear （D）以上均不可以11.要使时钟控件Timer1的Timer事件不起作用，以下正确的语句是( B ) （A）Timer1.Visible=False （B）Timer1.Enabled=False（A） Timer1.Interval=1000 （D）Timer1.Index=012.引用列表框(List1)最后一个数据项应使用的语( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount) (D)List1.List(ListCount-1)13.如下数组声明语句，正确的是( B )（A）Dim a[3,4]As Integer （B）Dim a(3,4)As Integer（C）Dim a(n,n) As Integer （D）Dim a(3,4)As Integer14.下面子过程语句说明合法的是(A、D )（A）Sub f1(ByVal n%) （B）Sub f1(n%)As Integer（C）Function f1%(f1%) （D）Function f1(ByVal n%)15.假定有如下的命令按钮(名称为Command1)事件过程：Private Sub Command1_Click()x=InputBox("输入："，"输入整数")MsgBox"输入的数据是：”，，”输入数据："+xEnd Sub16.程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是( A )（A）x的值是数值10 （B）输入对话框的标题是“输入整数”（C）信息框的标题是“输入数据：10”（D）信息框中显示的是“输入的数据是：”二、填空题（每题2分，共20分）1、当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择视图菜单的工具箱选项，使“工具箱”窗口显示。

vb语言程序设计考试及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. OptionB. DimC. FunctionD. Sub答案：B2. VB中的哪种数据类型用于存储字符？A. StringB. IntegerC. CharD. Double答案：C3. 在VB中，哪个函数用于将字符串转换为数值？A. CIntB. CStrC. ValD. Chr答案：C4. 在VB中，以下哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. ListBox答案：B5. VB中哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. KeyPress答案：A6. 在VB中，以下哪个关键字用于循环结构？A. IfB. ForC. WhileD. Select答案：B7. VB中哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Today答案：D8. 在VB中，哪个属性用于设置控件的可见性？A. EnabledB. VisibleC. CaptionD. Text答案：B9. VB中哪个函数用于获取系统时间？A. NowB. DateC. TimeD. Today答案：C10. 在VB中，以下哪个控件用于选择一个项目？A. TextBoxB. ComboBoxC. ListBoxD. CheckBox答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量i，应使用关键字________。

答案：Dim2. VB中，将字符型变量转换为整型，可以使用函数________。

答案：CInt3. VB中，用于显示消息框的函数是________。

4. VB中，用于打开文件的函数是________。

答案：Open5. VB中，用于关闭文件的函数是________。

vb程序设计书习题和参考答案练习题习题⼀⼀、判断题1．Visual Basic是以结构化的Basic语⾔为基础、以事件驱动作为运⾏机制的可视化程序设计语⾔。

2．⾯向对象的程序设计是⼀种以对象为基础，由事件驱动对象的编程技术。

3．事件是由Visual Basic预先定义的对象能够识别的动作。

4．新建⼯程时系统会⾃动将窗体标题设置为Form1。

5．控件的属性值不可以在程序运⾏时动态地修改。

6．决定对象是否可见的属性为Visible属性，决定对象可⽤性的属性是Enabled属性。

7．保存Visual Basic⽂件时，若⼀个⼯程包含多个窗体或模块，则系统先保存⼯程⽂件，再分别保存窗体或模块⽂件。

8．单击“启动”菜单项将窗体装⼊内存时，⼀定触发窗体的Load事件。

9．“事件过程”是⽤来完成事件发⽣后所要执⾏的程序代码。

10．在打开某窗体时，初始化该窗体中的各控件，应选⽤Load事件。

⼆、选择题1．⼯程⽂件的扩展名为。

A、.frxB、.basC、.vbpD、.frm2．下列不属于对象的基本特征是。

A、属性B、⽅法C、事件D、函数3．在设计模式双击窗体将显⽰的窗⼝是A、⼯程窗⼝B、⼯具箱C、代码窗⼝D、属性窗⼝4．VB中运⾏程序的快捷键是A、F2B、F5C、Alt+F35．改变控件在窗体中的上下位置应修改该控件的属性。

A、TopB、LeftC、WidthD、Right6.窗体模块的⽂件扩展名是A、.exeB、.basC、.frxD、frm7．设置窗体的字体⽤属性。

A、FontNameB、FontSizeC、FontBoldD、FontItalic8.设置窗体的字号⽤属性。

A、FontNameB、FontSizeC、FontBoldD、FontItalic9．下列选项中不属于事件的是。

A、DblclickB、LoadC、ShowD、KeyUp10．VB编制的程序保存在磁盘上，⾄少会产⽣何种⽂件。

A、.doc与.txtB、.com与.exe.C、.bat与.frmD、.vbp与.frm三、程序设计题1．新建⼀个⼯程，单击窗体时，在窗体上显⽰“欢迎使⽤Visual Basic程序”。

vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。

答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。

_ _ _ _ _ _ _ _ _ _ _ _号学_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _名姓_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _级班_ _ _ _ _ _ _ _ _ _ _ _ _部系----------------------《 VB程序设计》试卷（ A 卷）------（时间 90 分钟满分 100 分）-------线-题号一二三四五合计-----分数-----阅卷人------一、选择题：（ 30 分，每题 2 分）-----阅卷人得分------------1、“x 是小于 100 的非负数”，用 VB表达式表示正确的是（）-----A、 0≤ x<100 B 、0<=x<100C、0<=x or x<100 D 、0<=x and x<100-封--2、下面哪组语句可以将变量 A 和 B 的值互换？（）-----A、 A=B: B=A B、 A=(A+B)/2: B=(A-B)/2------C、 A=A+B:B=A-B:A=A-B D、 A=C:C =B:B=A-----3、在 Select Case X 结构中，描述判断条件 3≦X ≦7的测试项应该写成------____________ 。

----A、 Case 3 ≦ X ≦ 7B、 Case 3 To 7------ C 、 case Is≦3, Is ≧ 3D、 Case 3 ≦ X ， X ≦ 7--密4、下面（）是算术运算符？-----A、mod B 、 imp C、not D、like-----5、以下控件中可以入选为容器控件的是() 。

------A、Image 图像框控件B、 ListBox列表框控件-----C、TextBox 文本框控件D、Picture图片框控件--------------------第 1 页----6、下列操作不能打开代码窗口的是( )A、选中对象 , 单击鼠标右键 , 在弹出的快捷菜单中选择“查看代码”命令B、选中对象 , 双击鼠标左键C、按F7键D、按F4键7、函数 Mid(" 山羊上山山碰山羊脚 ", 3, 2)的结果是（）A、山羊B、羊上C、上山D、山山8、窗体运行后，要使窗体自动显示在屏幕的中央位置，应设置窗体的（）属性？A、WindowstateB、StartuppositionC、IconD、mousePointer9、下列哪个语句是错误的VB语句（）A、 Text1.Text = " 你好！ " ； Text1.BackColor = RedB、 Text1.Text = " 你好！ " ： Text1.BackColor = RedC 、Text1.Text = "你好！"D 、 Option Explicit10、以下描述中错误的是 ( )A、符号常量的使用和变量的使用没有差别B、常量可分为字符型常量，数值常量，时间/ 日期型常量，布尔型常量C、符号常量是用一个标识符来代表一个常量D、常量在程序执行期间其值不会发生变化11、若想要建立一个学生管理的输入界面，其中要求选择学生的性别/ 政治面貌（党 / 团/ 群众）及选课情况（共有 5 门课，可任选），应如何在窗体中利用单选钮和选择框来实现（）。

VB 程序设计编程考试题及答案1. 输入3 个数，输出最大的数Private Sub command1_click()Dim maxFor i = 1 To 3 n = Val(InputBox(" 输入第" & i & " 个数"))If n > max Then max = nEnd IfNextPrint " 三个数中最大的数是" ; maxEnd Sub2. 有一元二次方程：aX2+bX+c=0 ,依次输入a, b , c,判断此方程是否有实根Private Sub Command1_Click()Dim a, b, c, na = Text1b = Text2c = Text3n = b * b - 4 * a * cIf n >= 0 ThenLabel4 = "方程有根"ElseLabel4 = " 方程无根"End IfEnd Sub3. 输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜！成绩通过！若小于60,则弹出消息框,显示“抱歉！成绩没有通过！Private Sub Form_Load()Text1 = ""End SubPrivate Sub Command1_Click()Dim nn = Text1If n > =60 ThenVal (MsgBox(" 恭喜！成绩通过！"))ElseVal (MsgBox(" 抱歉！成绩没有通过！"))End IfEnd Sub4. 输入一年份，判断它是否为闰年，并显示有关信息。

除但不判断闰年的条件是：年份能被 4 整能被100 整除，或者能被400整除）Private Sub Command1_Click（）Dim y%y = InputBox（" 请输入年份"）If y Mod 4 = 0 And y Mod 100 <> 0 Or y Mod 400 = 0 ThenVal （MsgBox（" 闰年！"））ElseVal （MsgBox（" 平年！"））End IfEnd Sub5. 输入学生的百分制成绩，转换输出为五级制成绩，90〜100分转换为优秀，80〜89转换为良好，70〜79转换为中等，60〜69转换为及格，0〜60转换为不及格。

vb考试题库及答案word版一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. DoubleD. All of the above答案：D2. VB中的哪个函数可以用来计算一个数的平方？A. SqrB. PowC. SquareD. Both A and B答案：D3. 在VB中，以下哪个是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D4. VB中用于声明变量的关键字是什么？A. DimB. VarC. DeclareD. Let答案：A5. 在VB中，哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. VB中的哪个事件是在窗体加载时触发的？A. LoadB. ClickC. ChangeD. Activate答案：A7. 在VB中，以下哪个选项是正确的逻辑运算符？A. AndB. OrC. NotD. All of the above答案：D8. VB中用于打开文件的函数是什么？A. OpenB. CreateC. CloseD. Both A and B答案：D9. 在VB中，以下哪个是正确的数组声明方式？A. Dim arr(10)B. Dim arr(0 To 10)C. Dim arr(1 To 10)D. All of the above答案：D10. VB中用于输出信息到立即窗口的函数是什么？A. Debug.PrintB. PrintC. MessageBox.ShowD. MsgBox答案：A二、填空题（每题2分，共20分）1. VB中的________关键字用于声明常量。

答案：Const2. 在VB中，________事件是在按钮被点击时触发的。

《vb程序设计》期末复习题及答案一、填空题1．创建一个VB应用程序三个主要的步骤是__________________、________________和_____________________。

2．当程序运行时，要求窗体中的文本框呈现空白,则在设计时，应当在此文本框的__________窗口中，把此文本框的_____________属性设置成空白.3．Label和TextBox控件用来显示和输入文本,如果仅需要让应用程序在窗体中显示文本信息，可使用___________控件；若允许用户输入文本，则应使用_____________控件。

4．窗体的常用方法有__________、___________、___________和___________.5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是____________________________________。

6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时,打开一个窗口frm1，请对以下事件过程填空。

Private Sub Cmdopen_ ________________________________End Sub7．Visual Basic 6种类型的表达式是______________、______________、______________、________________、_________________、____________________。

Visual Basic根据表达式的___________来确定表达式的类型.8．表达式93 \ 7 Mod 2 ^ 2 的值是___________。

9．已知a=3，b=4，c=5，表达式a〉b and Not c>a Or c〉b And c〈a+b的值是_________。

表达式c>a And Not b〈c的值是___________。

程序设计第一题、题目：（事件）单击窗体（响应）求50以内所有偶数的和，并在窗体上输出来。

将结果存入变量S中。

代码：Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目：（事件）双击窗体（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码：Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。

将结果存入变量SUM中代码：Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+iEnd IfNextPrint sum第四题题目：（事件）单击窗体（响应）编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。

将结果存入变量M中。

代码：Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目：（事件）双击窗体（响应）求100以内奇数的和，并将结果输出在窗体上。

将结果存入变量SUM中。

代码：Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目：（事件）单击窗体（响应）已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码：Dim s As SingleFor i=1 To 10a=i*iSum =1/a + SumNextPrint Sum第七题题目：（事件）双击窗体（响应）求1+1*2+1*2*3+....+1*2*3*. (10)并将结果存到变量S中代码：Dim s As Longj=1For i = 1 To 10j= j*iSum = Sum + jNextPrint Sum第八题题目：（事件）单击窗体（响应）求1—1/2+1/3—1/4+….+1/99—1/100的值。

VB程序设计考试试题及答案月考上机试题一．选择题：(10*2)1由单精度浮点型的数据组成的字节数是A.2B.4C.8D.162.可以同时删除字符串前导和尾部空白的函数是A．LtrimB．RtrimC．TrimD．Mid3.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口4.在窗体上添加如下命令按钮，然后编写如下事件过程：C Private Sub Command1 _ Click()Dim a(10)As IntegerDim p(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub该过程的运行结果为:A.35B.33C.31D.295.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是A.1B. -1C. 0D. 26.若m，x，y，均为Integer型变量，则执行下面语句后m值是m=1：X=2：Y=3m=IIf(X＞Y，X+Y，X-Y)A.-1B.0C.1D. 27.设a=″Visual Basic″，下面使b=″Basic″的语句是A.b=Left(a，8，12)B.b=Mid(a，8，5)C.b=Right(a，5，5)D.b=Left(a，8,5)8.以下不能运行工程的操作是A..执行"运行"菜单中的"启动"命令B.单击工具栏中的"启动"命令D.按下F5键 C.按下Ctrl+F5键9.下列关于面向对象程序设计的叙述不正确的是A.对象具有属性、方法等特性B.对象之间的通信产生了消息C.一个对象是一个软件构造块，它包含数据与相关的操作D.对象的属性不能被改变10.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1 _ Click（）Static X As IntegerStatic Y As IntegerClsY=lY=Y+5X=5+XPrint X，YEnd Sub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为:A.15 16B.15 6C.15 15D.5 6二．填空题（3*4）1.计算1*2*3*...*3000，当积大于3000时停止计算。