VB练习题含答案
- 格式:doc
- 大小:44.50 KB
- 文档页数:7
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行,目前处于紧张的备考阶段,以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案,供参考练习,预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后,VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中,VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中,要将一个窗体装载到内存进行变量初始化等预处理,但没有显示该窗体,应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段:a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后,单击命令按钮,在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
vb练习题及答案VB(Visual Basic)是一种面向对象的编程语言,被广泛应用于软件开发中。
通过练习题的形式可以巩固和提升对VB语言的理解和应用能力。
本文将提供一些VB练习题及其答案,帮助读者巩固VB编程技巧。
题目一:计算器程序设计一个简单的计算器程序,要求能够进行基本的加、减、乘、除运算。
解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“Calculator”。
首先,在窗体上添加一些按钮来表示数字和运算符。
然后,添加一个用于显示运算结果的文本框控件。
接下来,为数字按钮和运算符按钮分别添加点击事件处理程序。
在点击数字按钮时,将按钮对应的数字追加到文本框中。
在点击运算符按钮时,根据按钮的内容判断并执行相应的运算。
最后,通过运用VB的计算表达式功能和控件之间的交互,实现基本的加减乘除运算。
题目二:学生成绩管理设计一个程序用于管理学生成绩,要求能够输入学生信息、查询学生成绩、计算学生平均成绩等操作。
解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“StudentGrade”。
首先,设计一个学生类(Student),包括学号、姓名、各科目成绩等属性。
然后,创建一个用于存储学生信息的集合(如数组或集合类)。
接下来,在窗体上添加文本框、按钮等控件,用于输入学生信息和进行相关操作。
通过按钮点击事件处理程序,实现以下功能:1.输入学生信息:获取文本框中的学生信息,并创建一个新的学生对象,将其添加到学生信息集合中。
2.查询学生成绩:根据学生学号或姓名等关键信息,在学生信息集合中查找对应学生,并显示其成绩信息。
3.计算学生平均成绩:遍历学生信息集合,计算每个学生的平均成绩,并显示在窗体上。
通过以上步骤,可以实现一个简单的学生成绩管理系统。
题目三:数据排序设计一个程序用于对一组数字进行排序,要求能够实现升序和降序排列。
解答:在VB中创建一个新的Windows窗体应用程序项目,命名为“DataSorting”。
VB简答练习题1 简述Timer控件中Interval属性和Enanbeled属性。
2 简要回答创建MDI应用程序的步骤。
3 用Visual Basic 语言编写-一个有两个整数参数m和n2的名为GetRand的Function的函数,功能是获取任意两个正整数间的随机整数(假如0<n:<m) ?4 简述selet.. .case语句执行流程。
5 引用数组元素时的注意事项有哪些?6 Visual Basic中有几种运算符?7 向文本文件中添加数据分为哪几步?8 Visual Basic 6.0中的动态数组与静态数组有何不同?9 如何创建一-个快速显示窗体?10 循环语句有几种语句?11 Shape 控件可以用来显示哪些图形?12 MDI应用程序有哪些特性?13 访问数组的常用方法有哪些?14 运行程序有哪几种方法?15 VB工程由哪几个模块组成?16 叙述VB的基本的设计机制。
17 叙述VB集成开发环境的组成。
18 叙述文件访间的类型。
19 运行程序有几种方法?20 VB 有哪些基本数据类型?21 标识符的命名规则是什么?22 访问数组的常用方法有哪些?23 VB过程参数有哪几种传递方式?有何不同?24 如何创建控件数组?25 简述For循环的语法格式。
26 通用的Sub过程有哪几种方式?27 打开属性窗口有哪几种方法?28 如何设置控件之间的对齐方式?29 简述运算符从高到低的优先顺序。
30 建立通用过程的操作步骤有哪些?31 打开代码窗口有哪几种方法?32 如何创建MDI应用程序?33 请写出随机文件的读写步骤。
34 请写出If语句的块语法格式。
35 工具箱的标准控件有哪些?36 简述创建动态数组的步骤。
37 建立事件过程有哪些方法?38 FSO对象模型包括哪些对象?答案:1.简述Timer控件中Interval属性和Enanbeled属性答:Timer控件中的Enanbeled设置或返回计时器控件的有效性,该属性值为布尔值,如果设置为True,则每经过指定的时间间隔将触发Timer事件,为False,计时器控件成为无效,停止工作。
vb练习题及答案VB练习题及答案VB(Visual Basic)是一种广泛应用于Windows操作系统的编程语言,它以其简单易学的特点受到了许多初学者和专业开发者的青睐。
为了帮助大家更好地掌握VB编程,下面将提供一些VB练习题及其答案,希望能对大家有所帮助。
练习题一:计算器程序编写一个VB程序,实现一个简单的计算器功能。
要求用户输入两个数字和一个操作符(+、-、*、/),然后根据操作符进行相应的计算,并输出结果。
解答:```vbPrivate Sub btnCalculate_Click(sender As Object, e As EventArgs) Handles btnCalculate.ClickDim num1 As Double = CDbl(txtNum1.Text)Dim num2 As Double = CDbl(txtNum2.Text)Dim operator As String = cmbOperator.SelectedItem.ToString()Dim result As DoubleSelect Case operatorCase "+"result = num1 + num2Case "-"result = num1 - num2Case "*"result = num1 * num2Case "/"result = num1 / num2End SelectlblResult.Text = "Result: " & result.ToString()End Sub```练习题二:学生成绩管理系统编写一个VB程序,实现一个简单的学生成绩管理系统。
要求用户输入学生的姓名和成绩,然后将其保存到数组中。
用户可以通过输入姓名来查询学生的成绩。
解答:```vbPrivate Structure StudentPublic Name As StringPublic Score As DoubleEnd StructurePrivate students() As StudentPrivate Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.ClickDim newStudent As Student = txtName.TextnewStudent.Score = CDbl(txtScore.Text)ReDim Preserve students(students.Length)students(students.Length - 1) = newStudenttxtName.Text = ""txtScore.Text = ""End SubPrivate Sub btnSearch_Click(sender As Object, e As EventArgs) Handles btnSearch.ClickDim searchName As String = txtSearchName.TextDim found As Boolean = FalseFor Each student As Student In studentsIf = searchName ThenlblSearchResult.Text = "Score: " & student.Score.ToString()found = TrueExit ForEnd IfNextIf Not found ThenlblSearchResult.Text = "Student not found."End IfEnd Sub```练习题三:简单的文本编辑器编写一个VB程序,实现一个简单的文本编辑器功能。
vb练习题及答案VB练习题及答案一、选择题1. 在VB中,以下哪个是正确的数据类型?A. IntegerB. IntC. Both A and BD. None of the above答案:C2. VB中,哪个关键字用于声明变量?A. DimB. DeclareC. DefineD. Set答案:A3. 在VB中,以下哪个是正确的循环结构?A. ForB. WhileC. RepeatD. All of the above答案:D4. VB中,以下哪个是正确的条件语句?A. IfB. SwitchC. CaseD. A and B only答案:A5. 在VB中,以下哪个是正确的数组声明方式?A. Dim myArray(5) As IntegerB. Dim myArray As Integer(5)C. Both A and BD. None of the above答案:A二、填空题1. 在VB中,使用________关键字可以定义一个类。
答案:Class2. VB中,使用________方法可以为控件添加事件处理程序。
答案:AddHandler3. 在VB中,________方法用于结束程序的执行。
答案:End4. VB中,________属性用于获取或设置一个控件的文本。
答案:Text5. 在VB中,________方法用于打开一个文件。
答案:Open三、简答题1. 请简述VB中的事件和事件处理程序的概念。
答案:在VB中,事件是用户或程序触发的特定动作,如按钮点击或键盘敲击。
事件处理程序是一个过程,当特定的事件发生时,会被自动调用以响应该事件。
2. 描述VB中如何使用For循环。
答案:在VB中,For循环用于重复执行一段代码直到满足特定条件。
基本语法是:```For counter = start To end [Step increment]' 循环体Next [counter]```3. 解释VB中什么是继承,并给出一个简单的示例。
练习一对象部分的基础练习一1、使用Visual Basic的目的是 AA. 开发Windows应用程序B. 图象处理C. 制作WAV文件D. 文字处理2、Visual Basic 是面向 D 的程序设计语言。
A. 过程B. 工程C. 事件D. 对象3、所谓 A 就上使某个对象进入活动状态的一种操作或动作。
A.事件B.属性C.方法论D.对象4、 C 在用户的应用程序执行期间发生,比如鼠标单击或敲击键盘。
A.方法B.属性C.事件D.工程5、窗体文件名与工程文件名的扩展名分别是 BA. .vbp和.frmB. .frm和.vbpC. .frm和.basD. .vbp和.vbw6、窗体的 C 属性用来设置将出现在窗体标题中的标题。
A.StyleB. TextC.Caption7、启动应用程序,装载和显示窗体,产生 B 和Form_Show 事件。
A.Form_clickB.Form_loadC. Form_GotFocusD. Form_DbClick8、窗体从加载到显示,依次引发的事件 .A. Load Initialize ActivateB. Initialize Activate LoadC. Load Activate InitializeD. Initialize Load Activate9、下列窗体的事件在窗体从加载到卸载过程中只可能触发一次。
A. GotFocusB. ActivateC. LoadD. Initialize10、在VB中,如果要生成一个不依赖于VB环境就可以运行的程序文件,则应选择 DA.“工程”到“属性”B.“工具”到“选项”C.“文件”到“另存为”D. “文件”到“生成.EXE”11、控件的 B 确定当一个事件发生时执行的代码。
A. 函数B. 事件过程C. 子程序D. 调用过程12、 B 的改变可以在设计时和运行进表现出来,而事件过程只有在运行时才执行。
A. 方法B. 控件属性C. 对象D. 事件13、放置控件到窗体中地迅速的方法是 AA. 双击工具箱中的控件B. 单击工具箱中的控件C.拖动鼠标D.单击工具箱中的控件并拖动鼠标14、控件的 A 使用户能够调节其大小。
xx年计算机二级考试《VB》练习题及答案1、一个栈的初始状态为空。
现将元素1、2、3、4、5、A、B、c、D、E依次入栈,然后再依次出栈,那么元素出栈的顺序是( )。
A.12345ABCDEB.EDCBA54321C.ABCDEl2345D.54321EDCBA2、以下表达中正确的选项是( )。
A.循环队列有队头和队尾两个指针,因此,循环队列是非线性构造B.在循环队列中,只需要队头指针就能反映队列中元素的动态变化情况C.在循环队列中,只需要队尾指针就能反映队列中元素的动态变化情况D.循环队列中元素的个数是由队头指针和队尾指针共同决定3、在长度为凡的有序线性表中进展二分查找,最坏情况下需要比拟的次数是( )。
A.0(n)B.O(n2)C.O(1092n)D.0(nlog2n)4、以下表达中正确的选项是( )。
A.顺序存储构造的存储一定是连续的,链式存储构造的存储空间不一定是连续的B.顺序存储构造只针对线性构造,链式存储构造只针对非线性构造C.顺序存储构造能存储有序表,链式存储构造不能存储有序表D.链式存储构造比顺序存储构造节省存储空间5、数据流图中带有箭头的线段表示的是( )。
A.控制流B.事件驱动C.模块调用D.数据流6、在软件开发中,需求分析阶段可以使用的工具是( )。
A.N—s图B.DFD图C.PAD图D.程序流程图7、在面向对象方法中,不属于“对象”根本特点的是( )。
A.一致性B.分类性C.多态性D.标识唯一性8、一问宿舍可住多个学生,那么实体宿舍和学生之间的联系是( )。
A.一对一B.一对多C.多对一D.多对多9、在数据管理技术开展的三个阶段中,数据共享最好的是( )。
A.人工管理阶段B.文件系统阶段C.数据库系统阶段D.三个阶段相同10.栈和队列的共同特点是( )A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素D.没有共同点参考答案: C。
VB1~5章练习题第一章一、单选题1.VB6.0集成开发环境可以()A) 编辑、调试、运行程序,但不能生成可执行程序B)编辑、生成可执行程序、运行程序,但不能调试程序C)编辑、调试、生成可执行程序,但不能运行程序D)编辑、调试、运行程序,也能生成可执行程序2.英文“Visual”的含义是()A)可视化B)集成C)结构化D)调试3.标准模块文件的扩展名是()A).frmB).vbpC).basD).vbg4.与传统的程序设计语言相比,VB最突出的特点是()A)结构化程序设计B)程序开发环境C)事件驱动编程机制D)程序调试技术5.VB6.0是()应用程序的开发工具A)8位B)16位C)32位D)64位6.英文缩写“OOP”的含义是()A)时间驱动的编程机制B)结构化程序设计语言C)面向对象的程序设计D)可视化程序设计二、简答题1.什么是对象的属性、事件和方法?三、编程题1.编写程序,并且有三个功能:①显示“欢迎使用VB6.0中文版”②清除之前显示的“欢迎使用VB6.0中文版”③退出此程序第二章一、单选题1.在Visual Basic中,下列优先级最高的运算符是()A)*B)\C)<D)Not2.以下关系表达式中,其值为假的是()A)”XYZ”<”XYz”B)”VisualBasic”=”visualbasic”C)”the”<>”there”D)”Integer”>”Int”3.在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程:Private Sub Command1_click()Dim b As Integerb = b + 1End Sub运行程序,第3次单击命令按扭后,变量b的值为()A)0 B)1 C)2 D)34.在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程:Private Sub Command1_click()Static a As Integera = a + 1End Sub运行程序,第3次单击命令按扭后,变量a的值为()A)0 B)1 C)2 D)35.在Visual Basic中,数值1234&的类型是()A)整型B)长整型C)字符串型D)双精度型6.从键盘上输入2个字符串,分别保存在变量str1、str2中,则确定第2个字符串在第1个字符串中起始位置的函数是()A)Left B)Mid C)String D)InStr7.设a = ”Visual Basic”,则以下使b = “Basic”的语句是()A)b = Left(a,8,12)B)b = Mid(a,8,5)C)b = Right(a,8,5)D)b = Left(a,8,5)8.设a = 5,b = 10,则执行c = Int((b-a)* Rnd + a) + 1后,c的值为()A)5~10B)6~9C)6~10D)5~99.以下声明语句中错误的是()A)Const varl = 123B)Dim var2 = …ABC‟C)DefInt a-zD)Static var3 As Integer二、简答题1.下列哪些可作为Visual Baisc的变量名,那些不行?4*Delta Alpha 4ABC ABπReadData Filename A(A+B) C254D Read2.Visual Basic中是否允许出现下列形式的数?±25.74 3.457E-10 .368 1.87E+50 10^(1.256) D32 2.5E 12E3 8.75D+6 0.2583.把下面的数写成普通的十进制数:(1)2.65358979335278D-006 (2)1.21576654590569D+019(3)8.6787E+8 (4)2.567E-124.指出下列Visual Basic表达式中的错误,并写出正确的形式。
第一章第二章课后练习题一、选择题1、Visual Basic 6.0分为3种版本,不属于这3种版本的是(D)。
A)学习版B)专业版C)企业版D)业余版2、下列方法中不能退出Visual Basic的是(B)A)按Alt+Q组合键B)按下Alt+F组合键,然后按Esc键C)按F10键,然后按F键,再按X键D)打开“文件”菜单→“退出”命令3、Visual Basic集成的主窗口中不包括(A)A)属性窗口B)标题栏C)菜单栏D)工具栏4、下列操作可以打开立即窗口的是(C)A)Ctrl+D B)Ctrl+F C)Ctrl+G D)Ctrl+E5、下列关于Visual Basic特点的描述,哪个是正确的(D)。
A)面向对象B)可视化C)事件驱动D)以上全部都是6、只有在执行某种动作后,才会执行某段程序,这种机制称为(A)A)事件驱动B)面向对象C)面向过程D)可视化7、在Visual Basic 中建立应用程序所需要的控件,应使用(B)A)属性窗口B)工具箱窗口C)立即窗口D)菜单设计窗口8、通过(B)可以在设计时,直观地调整窗体在屏幕上的位置。
A)代码窗口B)窗体布局窗口C)窗体设计窗口D)属性窗口9、Visual Basic窗体设计器是用来设计(B)A)应用程序的代码段B)应用程序的界面C)对象的属性D)对象的事件10、在Visual Basic 6.0集成开发环境中,按下列组合键可以打开工程管理器窗口的是(C)A)Shift+F7 B)Ctrl+G C)Ctrl+R D)Shift+F411、Visual Basic 6.0集成开发环境中,如果没有显示出某个窗口,可以通过(C)菜单之下的命令使其显示。
A)文件B)编辑C)视图D)工程12、下列不是Visual Basic 6.0中打开工程方法的是(A)A)按Alt+O组合键B)执行文件菜单中的打开工程命令C)按Ctrl+O组合键D)单击标准工具栏上的打开工程按钮13、下面关于Visual Basic 6.0工具栏的说法不正确的是(B)A)工具栏的位置可以任意改变B)工具栏一定在菜单栏的下方C)工具栏可以显示或隐藏D)Visual Basic 有多个工具栏14、在VB中,被称为对象的是(C)A)窗体B)控件C)控件和窗体D)窗体、控件和属性15、关于VB“方法”的概念错误的是(C )A)方法是对象的一部分B)方法是预先定义好的操作C)方法是对事件的响应D)方法用于完成某些特定的功能16、确定窗体控件启动位置的属性是(C)A)Width和Height B)Width或HeightC)StartUpPositon D)Top和Left17、下列说法正确的是(A)A)对象的可见性可设为True或FalseB)标题的属性值不可设为任何文本C)属性窗口中属性只能按字母顺序排列D)某些属性的值可以跳过不设置,自动设为空值18、下列说法错误的是(B)A)方法是对象的一部分B)在调用方法时,对象名是不可缺少的C)方法是一种特殊的过程和函数D)方法调用格式和对象属性使用格式相同19、下列说法错误的是(C)A)窗体文件的扩展名为.frmB)一个窗体对应一个窗体文件C)VB中一个工程只包含一个窗体D)VB中一个工程最多可以包含255个窗体20、一个工程必须包含的文件的类型是(A)A)*.vbp *.frm *.frx B)*.vbp *.cls *.basC)*.bas *.ocx */res D)*.frm *.cls *.bas21、新建一个窗体,其BorderStyle属性设置为Fixed Single,但运行时却无最大化和最小化按钮,可能的原因是(B)A)BorderStyle的值设为Fixed.Single,其设置值的作用即禁止最大化和最小化按钮B)窗体的MaxButton和MinButton值设为FalseC)正常情况下新建的窗体都没有最大化和最小化按钮D)该窗体可用鼠标拖动框的方法改变窗体的大小22、下列不能打开代码窗口的操作是(D)A)双击窗体上的某个控件B)双击窗体C)单击视图菜单中的“代码窗口”D)单击窗体或控件23、下列不能打开属性窗口的操作是(D)A)执行视图菜单中的属性窗口命令B)按功能键F4键C)按Ctrl+T组合键D)单击工具栏上的属性窗口按钮24、确定一个控件在窗体上位置的属性是(D)A)Width和Height B)Width或Height C)Top或Left D)Top和Left25、24、确定一个控件在窗体上大小的属性是(A)A)Width和Height B)Width或Height C)Top或Left D)Top和Left26、为了同时改变一个活动控件的高度和宽度,正确的操作是(A)A)拖拉控件4个角上的某个小方块B)只能拖拉位于控件右下角的小方块C)只能拖拉位于控件左下角的小方块D)不能同时改变控件的高度和宽度27、关于Visual Basic应用程序,正确的叙述是(A)A)Visual Basic程序运行时,总是等待事件被触发B)Visual Basic程序设计的核心是编写事件过程的程序代码C)Visual Basic程序是以线性方式顺序执行的D)Visual Basic的事件可以由用户随意定义,而事件过程是系统预先设置好的28、以下叙述中正确的是(A)A)窗体的Name属性指定窗体的名称,用来标记一个窗体B)窗体的Name属性的值是显示在窗体标题栏中的文本C)可以在运行期间改变对象的Name属性的值D)对象的Name属性可以为空29、窗体的Caption属性的作用是(B)A)确定窗体的名称B)确定窗体标题栏的内容C)确定窗体边界的类型D)确定在窗体输出字符的字体30、要使Form1窗体的标题栏显示“欢迎使用Visual Basic”,以下语句正确的是(D)A)Form1.Caption=“欢迎使用Visual Basic”(注:引号为中文标点)B)Form1.Caption=’欢迎使用Visual Basic’C)Form1.Caption=欢迎使用Visual BasicD)Form1.Caption=”欢迎使用Visual Basic”31、当窗体被加载时运行,发生的事件是(A)A)Load B)Unload C)Resize D)DragDrop32、决定标签内显示内容的属性是(D)A)Text B)Name C)Alignment D)Caption33、为了使标签中的内容居中显示,应将Alignment属性设置为(C)A)0 B)1 C)2 D)3 34、33、为了使标签中的内容居右显示,应将Alignment属性设置为(B)A)0 B)1 C)2 D)335、不论何控件,共同具有的属性是(B)A)Text B)Name C)ForeColor D)Caption36、在设计阶段,当双击窗体上的某个控件时,所打开的窗口是(C)A)工程资源管理器窗口B)工具箱窗口C)代码窗口D)属性窗口37、刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是(C)A)按钮B)标签C)通用对话框D)文本框38、以下不属于同类的是(A)A)Click B)Name C)Caption D)Top39、在Visual Basic环境下,当要编写一个新程序时,所做的第一件事是(B)A)编写代码B)新建一个工程C)打开属性窗口D)打开立即窗口40、为了保存一个Visual Basic应用程序,下列说法中正确的是(D)A)只保存窗体模块文件(.frm)B)只保存工程文件(.vbp)C)分别保存工程文件和标准模块文件(.bas)D)分别保存工程文件、窗体文件和标准模块文件41、Visual Basic的工程文件的扩展名是(C)A).for B).frm C).vbp D).bas42、Visual Basic的文件的扩展名是(B)A).for B).frm C).vbp D).bas43、下列关于面向对象编程的叙述错误的是(D)A)属性是描述对象特征的数据B)方法指示对象的行为C)事件是能够被对象识别的动作D)Visual Basic程序的运行机制是面向对象44、下列叙述中正确的是(C)A)任何一个对象的所有属性既可在属性窗口中设置,也可以以程序代码的方式设置B)在属性窗口中设置的属性是在设计阶段完成的,因而这些属性值不能改变C)在程序中通过编程设置属性值是在运行阶段给属性赋值D)用程序方式给属性赋值的格式是“属性名:属性值”二、填空题1、与传统的程序设计语言相比,Visual Basic最突出的特点是(事件驱动编程机制)。
单项选择题1、VB采用( )的编程机制。
(2 分)A.可视化B.面向图形C.事件驱动D.面向对象我的答案:C得分:2分2、Visual Basic6.0中规定窗体文件的扩展名是( )。
(2 分)A.frmB.vbpC.basD.for我的答案:B得分:0分3、Visual Basic是一种面向( )的程序设计语言。
(2 分)A.用户B.程序C.事件D.对象我的答案:D4、如何使一个标签或按钮控件在运行时不可用( )。
(2 分)A.把它的Visible属性设置成TrueB.把它的Enabled属性设置成TrueC.把它的Visible属性设置成FalseD.把它的Enabled属性设置成False我的答案:C得分:0分5、设有语句:a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是()。
(2 分)A.字符串"20"B.默认值100C.字符串"120"D.数值120我的答案:A得分:2分6、数学表达式X^2+3XY对应的VB算术表达式是( )。
(2 分)A.X*X+3XYB.X*X+3*XYC. X*2+3X*YD.X*X+3*X*Y我的答案:D7、表达式4+5 \ 6 * 7 / 8 Mod 9 的值是( )。
(2 分)A.4B.7C.6D.5我的答案:D得分:2分8、选拔身高T超过1.7米且体重W小于60公斤的人,表示该条件的布尔表达式为( )。
(2 分)A.T>=1.7 Or W<60B.T>1.7 And W<60C.T<=1.7 Or W>=60D.T>=1.7 And W<=60我的答案:B得分:2分9、Sqr(81)+Fix(3.6)的值是( )。
(2 分)A.8B.7C.12D.9我的答案:C10、语句Dim x As Single作用是:将x定义为( )变量。
一、单项选择(每小题2分,共40分)1、窗体文件、标准模块文件的扩展名分别是__D__。
(A) .frm和.mdb (B) .frm和.vbp (C) .bas和.vbp 工程文件扩展名(D) .frm和.bas2、如果要设置窗体的标题栏,应选择_ B__属性。
(A) Name窗体名称(B) Caption (C) Tips (D) Text3、当运行程序时,系统自动执行启动窗体的___ D _事件过程。
(A) Click (B) Unload (C) Gotfocus (D) Load4、Visual basic程序设计语言属于___C_。
(A) 面向过程的语言(B) 面向问题的语言(C) 面向对象的语言(D) 面向机器的语言5、任何控件都具有的属性是___B_。
(A) Text (B) Name (C) ForeColor (D) Caption文本框没有6、VB的一个文本框控件名为mytxt,要使该控件中显示“我的VB程序”,以下__C__语句执行后能正确结果。
(A) Text1.Text = "我的VB程序" (B) Text1.Caption = "我的VB程序"(C) mytxt.Text = "我的VB程序" (D) mytxt.Caption = "我的VB程序"7、Visual Basic程序设计中,构成对象的三要素是___B_。
(A) 属性、控件和方法(B) 属性、事件和方法(C) 控件、过程和模块(D) 窗体、控件和过程8、在语句Public Sub Sort(i As Integer)中的i 是一个按__C__传递的参数。
(A) 地址(B) 值(C) 变量(D) 常量9、要将变量x赋值为50到100之间(含50和100)的一个随机整数,下面语句正确的是___B_。
x=下限+Int(上限-下限+1*Rnd)(A)x=50+Int(50*Rnd) (B) x=50+Int(51*Rnd)(C) x=Int(49+50*Rnd) (D) x=Int(49+51*Rnd)10、在通用声明代码中有以下语句:Option Base 1Dim a (4,-3 to 3) As String则该数组有__ __个元素。
A(A) 28 (B) 24 (C) 35 (D) 3011、要使某控件在运行时不可见,应将其_D___属性设置为False。
(A) Text (B) Caption (C) Enabled (D) Visible12、为了使标签Label1的大小根据其Caption属性的值自动扩大或缩小,应对Label1的何种属性进行怎样的设置?B(A) 将BorderStyle属性设为1有边框(B) 将AutoSize属性设为True(C) 将BorderStyle属性设为0 (D) 将AutoSize属性设为False13、下列哪一个是VB中合法的变量名?D(A) 123abc数字开头(B) a-b 减号(C) Dim VB关键字(D) str_x空格14、以下事件过程中,Private表示__B__。
Private Sub Text1_ChangeP rint "Text1 Changed"End Sub(A)此过程可以被任何其他过程调用(B)此过程只可以被本窗体中的其他过程调用(C)此过程不可以被任何其他过程调用(D)此过程只可以被本工程中的其他过程调用15、下面语句的循环次数为___B_。
For i = -3 To 20 Step 4(A) 5 (B) 6 (C) 7 (D) 816、如果变量a、b、c的值分别为3、2、-3.5,则Abs(b*c-a)+Int(c)的值为__A_。
(A) 6 (B) 7 (C) 14 (D) -13 |2*-3.5-3|-4=6下列函数中_D__的值与其他三个的不一样。
(A) Val ("-1") -1(B) Round (-0.9) -1(C) Int (-0.9) 小于等于N最大整数-1(D) Fix (-0.9) N整数部分017、下列程序代码执行的结果是DConst st As String = "1234"st = st + "5678"Print st(A) 1234 (B) (C) 6912 (D) 出错信息18、用户释放任意一个鼠标按钮时触发的事件是____。
B(A) MouseDown (B) MouseUp (C) MouseMove (D) MouseClick19、当用户在文本框中键入一个字符时,能触发文本框的____事件。
C(A) KeyPress和Click (B) KeyPress和LostFocus(C) KeyPress 和Change (D) Change 和LostFocus二、填空(每空2分,共40分)1、 把数学表达式2b a-+写成VB 表达式是____(1)____ ,把数学表达式 | x + y | + z 7 写成VB 表达式是____(2)____。
(-b+sqr(b^2-4*a*c))/2*a abs(x+y)+z^72、 窗体中有两个命令按钮:“显示”(控件名为cmdDisplay )和“测试”(控件名为cmdTest )。
完成下列事件代码过程,使单击“测试”按钮时,隐藏“显示”按钮。
Private Sub cmdTest_Click ()_____(3)______ cmdDisplay.visible=falseEnd Sub3、 窗体中有图像框Image1,完成下列事件过程代码,使单击Image1时,Image1移到窗体中心。
Private Sub Image1_Click ()Image1. ___ (4)___ = (Form1.ScaleWidth - Image1.Width) \ 2 leftImage1.Top = ___ (5)___ (Form1.ScaleHighth - Image1.Highth) \ 2End Sub4、窗体中有图片框(Picture1)和计时器(Timer1)两个控件。
完成下列事件代码过程,使运行程序时,将指定图片加载到图片框里,然后图片框以每2秒钟一次的速度向窗体的右下角移动(每次向右移动100个twip ,同时向下移动100个twip )。
Private Sub Form_Load ()Picture1.Picture = ___ (6)___ ("c:\white.bmp") LoadPictureTimer1.Interval = ___ (7)___ 2000End SubPrivate Sub Timer1_Timer ()Picture1.Move ___ (8)___ , ___ (9)___ Picture1.Left+100 Picture1.Top+100 End Sub5、 完成以下程序,使其运行后,点击窗体,能打印出如图1所示的结果。
图1Private Sub Form_Click ()Dim se As StringPrint Tab(35); "九九乘法表"For i = ___ (10)___ 1 to 9For j = ___ (11)___ i to 9se = i & "×" & j & "=" & i * jPrint Tab ( (j - 1) * 9 + 1); ___ (12)___; se Next jNext iEnd Sub6、用公式111(1)143521nnπ--=-+-+-……可以计算π的近似值。
请完成下列程序,编写函数Pi(n)求π的近似值,并调用该函数求n=100时π的近似值。
Function Pi (ByVal n As Integer) As DoubleDim i As IntegerPi = 0For i = 1 To nPi = Pi + ___ (13)___ (-1)^(i-1)/(2*n-1)Next iPi =___ (14)___ 4*PiEnd FunctionPrivate Sub Form_Click ()Print "n=100时,π的近似值为:"; ___ (15)___ Pi(100)End Sub7、输入任意一个整数x,将其插入到一个按升序排列的整数数组中,并保证数组在插入之后仍按原来的升序排列,请填写完整程序。
Const n = 9Private Sub Form_Click()Dim aDim i As Integer, j As Integer, x As Integer____(16)____ = Array(1, 3, 4, 5, 9, 15, 22, 28, 30, 60) ax = InputBox("输入一个整数x:")ReDim Preserve a(n + 1)For i = n To 1 ____(17)____ step -1If ____(18)____ Then x<a(i)a(i + 1) = a(i)Else____(19)____ a(i+1)=xExit ForEnd IfNext iIf i < 1 Then ____(20)____ a(1)=xEnd Sub三、程序设计(每题10分,共20分)1、编写程序,使得单击窗体时,产生10个值为100-400之间(含100和400)的随机整数,用冒泡法将10个数从小到大排序后,显示在窗体上。
Private Sub Form_Click()Dim i, x As Integer, a(1 To 10) As IntegerRandomizeFor i = 1 To 10a(i) = Int(Rnd * 301) + 100Print a(i);Next iPrintFor i = 10 To 2 Step -1For j = 1 To i - 1If a(j) > a(j + 1) Then x = a(j): a(j) = a(j + 1): a(j + 1) = xNext jNext iFor i = 1 To 10Print a(i);Next iPrintEnd Sub2、编写程序实现求水仙花数(水仙花数是指一种三位数,其各个数之立方和等于该数)Option ExplicitPrivate Sub Command1_Click()Dim x%Dim hundred%, ten%, one%If Len(Text1) <> 3 ThenMsgBox ("请输入三位数的正整数") '如果Text1中的不是三位数时,则……Text1 = ""Label2 = ""Elsex = Val(Text1)hundred = x \ 100 '百位数上的数ten = (x Mod 100) \ 10 '十位数上的数one = x Mod 10 '个位数上的数If hundred ^ 3 + ten ^ 3 + one ^ 3 = x ThenLabel2.Caption = x & "是水仙花数!"ElseLabel2.Caption = x & "不是水仙花数!"End IfEnd IfEnd SubPrivate Sub Command2_Click()Text1 = ""Label2 = ""End SubPrivate Sub Command3_Click()EndEnd SubPrivate Sub Text1_Change()Dim n% '整型变量n用来存放输入的字符个数If IsNumeric(Text1) Or Text1 = "" Then '如果Text1中的是0~9的数或空字符,则……ElseMsgBox ("无效字符,请输入正整数")Text1 = ""Label2 = "" End IfEnd Sub。