VB大题解析
VB第2版习题与解答

VB习题与解答第1章了解Visual Basic1. Visual Basic 6.0有哪些主要特点?解答:主要有如下的特点:⑴面向对象的可视化设计平台;⑵事件驱动的编程机制;⑶结构化的程序设计语言;⑷开放的数据库功能与网络支持;⑸充分利用WINDOWS资源;⑹方便实用的程序向导等。
2. 如何启动Visual Basic 6.0?解答:选择【开始】│【程序】│【Microsoft Visual Basic 6.0中文版】│【Microsoft Visual Basic 6.0中文版】命令,即可启动VB。
3. Visual Basic 6.0集成开发环境中有哪些常用窗口?它们的主要功能是什么?解答:VB集成开发环境主要包含以下窗口:主窗口、工具箱、窗体窗口、工程资源管理器窗口、【属性】窗口以及【窗体布局】窗口等。
⑴主窗口:由顶部的标题栏、菜单栏和工具栏以及下面的工作区组成。
主窗口是VB 集成开发环境的主界面,VB程序的设计及调试均在此进行。
⑵工具箱:标准工具箱中含有一个指针图标和20个内部(标准)控件的图标。
除指针图标外,每一个图标代表一种控件,每个控件都是已经定义好的对象,它们有自己的属性、方法和事件。
⑶窗体窗口:窗体窗口又称为“对象窗口”或“窗体设计器”。
窗体窗口是设计用户界面的地方。
⑷工程资源管理器窗口:工程资源管理器窗口(简称工程窗口)用于显示和管理当前程序中所包含的全部文件。
⑸【属性】窗口:用于设置窗体和控件的属性,如名称、外观、位置、字体等。
⑹【窗体布局】窗口:用于指定程序运行时窗体的初始位置。
⑺代码窗口:代码窗口又称为代码编辑器,用于输入和编辑程序⑻【立即】窗口:使用【立即】窗口可以在中断状态下监视对象属性、变量或表达式的值,也可以在设计时查询表达式的值或命令的执行结果。
4. 工程资源管理器和属性窗口各有哪些组成部分?它们的主要功能是什么?解答:工程资源管理器窗口由三部分组成,自上而下分别为标题栏、工具栏和文件列表,分别用于显示当前工程名称、切换代码和对象窗口、管理工程中的所有文件。
计算机二级(VB)22_真题(含答案与解析)-交互

计算机二级(VB)22(总分1780, 做题时间90分钟)选择题(每小题2分,共70分) 下列各题四个选项中,有一个是正确的,请选择正确答案。
1.以下为Visual Basic学习版的控件的是()。
SSS_SINGLE_SELA //B / *C * /D |分值: 70答案:A此题主要考查对象的正确使用,其格式为对象名.调用的方法名或变量名。
在static方法中,不能使用this。
变量m和f都不是静态成员,所以不能用类名.成员方式访问。
2.Print方法可以在对象上输出数据,这些对象包括()。
SSS_SINGLE_SELA 图片框B 状态栏C 标题栏D 代码窗口分值: 70答案:APrint方法可以在窗体、立即窗口、图片框、打印机这些对象上输出数据。
3.下列程序段的执行结果为( )。
a=5For k=1 To 0a=a * kNext kPrint k;aSSS_SINGLE_SELA 2 2B 4 3C 4 2D 3 2分值: 70答案:CC++语言中全局变量是任何函数都可以改变的量,静态变量的有效范围在定义它的类中,而普通的变量的有效性只在使用它的函数中,在本题中c为全局变量,b为静态变量,a为普通变量,b和c在类A的对象a1和a2中都自加1。
所以b,c为2,a为1。
4.下列说法不正确的是()。
SSS_SINGLE_SELA 对象的可见性可设为True或FalseB 标题的属性值可设为任何文本C 属性窗口中属性可以按字母顺序排列D 某些属性的值可以跳过不设置,系统之不理自动设为空值分值: 70答案:D在vieual Basic中,对象具有Visible属性,它有两个值True和False,决定时象是否可见.如果设置为True,则可见.如果设置为False,则是不可见的,所以选项A)是正确的;标准.即Caption属性,可设为任何文相.包括空字符串,所以选项B)是正确的;属性的值可以不设置,但是系统会设为默认值.而不是空值,所以选项D)不正确;属性窗口除按字母排列外,还可以有其他类型的排列方式.所以选项C)是正确的。
全国计算机等考试VB语言笔试试题及答案(一)

全国计算机等考试VB语言笔试试题及答案(一)全国计算机等级考试(VB语言)笔试试题及答案为了让广大考生能更好的备考,本文将为大家提供全国计算机等级考试VB语言笔试试题及相关答案解析。
VB语言考试是比较热门的一种考试,因此备考也是非常重要的。
下面是试题及答案解析,希望对大家有所帮助。
一、单选题1、在VB语言中,执行时间比较久的程序可以采用的方法是:A.增加循环次数B.加快程序运行速度C.使用进度条等控件D.以上都不对【答案及解析】C。
在程序运行期间,如果程序执行时间太长,可以使用进度条控件使用户知道程序正在执行,以及当前运行到哪一步,提升程序的运行效率和用户体验。
2、在VB语言中,某控件的Tag属性表示:A.控件的位置B.控件所在窗口的名称C.控件的类型D.控件存储数据的指针【答案及解析】D。
在VB语言中,每个控件都可以设置其Tag属性,Tag属性可以存储控件相关的任何数据,该属性非常灵活方便。
3、在VB语言中,数组存储数据的方式是:A.栈存储B.堆存储C.静态存储D.以上都错【答案及解析】B。
在VB语言中,数组存储在堆中,即动态内存分配,这样以便在程序运行时更好地管理和利用内存。
二、多选题1、在VB语言中,下列哪些是合法的数组定义方式?()A. Dim arr(3,5) As IntegerB. Dim arr(3)(5) As IntegerC. Redim arr(3,5)D. Dim arr() As Integer【答案及解析】A、D。
A、D都是合法的数组定义方式。
选项B是二维数组,但是定义方式不合法。
选项C是改变数组大小的方式,不是定义数组的方式。
2、在VB语言中,下列哪些事件是窗体的事件?( )A.LoadB.MouseMoveC.ClickD.Resize【答案及解析】A、D。
Load和Resize是窗体的事件,B和C是每个控件都有的事件。
三、判断题1、在VB语言中,Option Explicit语句可以保证变量在使用前被声明,从而减少程序出错的几率。
计算机二级(VB)49_真题(含答案与解析)-交互

计算机二级(VB)49(总分100, 做题时间120分钟)选择题(每小题2分,共70分) 下列各题四个选项中,有一个是正确的,请选择正确答案。
1.表达式(7\2+1)*(8\2+2)的值为()。
SSS_SINGLE_SELA 在活动窗体中只能通过拖拉右上角和左下角的小方块来同时在高度和宽度上缩放控件B 若一个控件上有4个黑色的小方块,表明该控件是活动的C 窗体中活动控件只能有一个D 非活动控件在窗体是隐藏的分值: 2答案:C属性是一个对象的特性,不同的对象有不同属性,故选项C)是不正确的;引用属性的一般格式为:对象名.属性名称,故选项A)不正确;对象的属性值可以在属性窗口中设置,也可以在程序语句中设置,故迭项D)是不正确的;对象是有特殊属性和行为方法的实体,不同的对象有不同的属性,选项B)是正确的。
2.下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是( )。
Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii> =65 And KeyAscii<=122 ThenKeyAscii=42End IfEnd SubSSS_SINGLE_SELA ComputerB 什么都没有C * * * * * * * *D 程序出错分值: 2答案:C此事件过程是KeyPress事件过程,所以参数KeyAscii得值是键盘输入的字符得ASCII码值,上述过程对输入得字符进行判断,如果其ASCII码大于65(大写字母“A”)并小于122(小写字母“a”),则用星号(ASCII码为42)代替,而运行过程中,题意是要从键盘上输入" Computer ",则应在文本框中显示“* * * * * * * *”。
3.下面的属性中,用于自动调整图像框中图形内容的大小的是()。
SSS_SINGLE_SELA PictureB CurentYC CurrentXD Stretch分值: 2答案:D本题的目的在于考查学生对图形控件的属性设置。
对口VB程序题解析

3.用VB语言编写一个计算梯形面积的程序本题解析:,用VB表达式来表示就是(a+b)*h/2, 首先我们知道梯形面积的计算公式是:S=(上底+下底)×高2然后我们只要获取上底、下底和高的值进行计算即可,不过要注意这里的上底、下底和高是小数,所以获取时要用Csng函数。
故这道题的代码可以写为:Private Sub Form_Click()a = Csng(InputBox("请输入上底长"))b = Csng(InputBox("请输入下底长"))h = Csng(InputBox("请输入高"))s = (a + b) * h / 2Print "梯形的面积为" & sEnd Sub4.已知二次系数a、一次项系数b和常数项c的值,用VB语言编写一个程序,利用求根公式求解一元二次方程ax2+bx+c=0并显示求解结果本题解析:求一元二次方程的解,首先我们要确定方程解的情况,即Δ的大小,他的计算公式为∆=b2−4ac,先判断是否有解,然后分情况进行求解和输出,即Δ<0、Δ>0和Δ=0,若有解,则先用求)进行计算,然后根据解的情况输出结果,若无解则直接输出无解方程根公式(x=−b±√b2−4ac2a故这道题的代码可以写为:Private Sub Form_Click()a = CInt(InputBox("请输入二次项系数a", , 1))b = CInt(InputBox("请输入一次项系数b", , 1))c = CInt(InputBox("请输入常数项c", , 1))d = b ^ 2 - 4 * a * c’计算Δ的值If d >= 0 Then ’判断Δ的大小,若大于等于零则用求根公式计算X1 = (-b + Sqr(d)) / (2 * a)X2 = (-b - Sqr(d)) / (2 * a)If X1 = X2 Then ’判断Δ是否等于0Print a & "x^2+" & b & "x+" & c & "的解为"Print "x="; X1Else ’若Δ大于1则输出两种情况Print a & "x^2+" & b & "x+" & c & "的解为"Print "x1="; X1, "x2="; X2End IfEnd IfIf d < 0 Then’如果Δ小于0则输出无解Print a & "x^2+" & b & "x+" & c & "的解为无解"End IfEnd Sub5.把下列命题用VB语言描述:a小于b或小于c;a或b都大于c;a和b中有一个小于c;a不能被b整除答案:a <b Or a < ca > c Orb > ca < c Orb < ca Modb <> 06.用VB语言编写一个程序,求一个数的绝对值。
计算机二级(VB)9_真题(含答案与解析)-交互

计算机二级(VB)9(总分1780, 做题时间90分钟)选择题(每小题2分,共70分) 下列各题四个选项中,有一个是正确的,请选择正确答案。
1.下列程序的运行结果为( )。
Dim a(-1 To 6)For i=LBound(a,1)To UBound(a,1)a(i) = iNext iPrint a (LBound(a,1));a(UBound(a,1))SSS_SINGLE_SELA 选择查询B 删除查询C 更新查询D 追加查询分值: 70答案:A本题应该把swap( )函数改成这样:swap(int * P,int * q){int t ; t= * p; * p=*q;*q=t;}执行程序时,先将a的地址传递给指针变量p,b的地址传递给指针变量q,然后将*p(a的值)的值传递给t,将*q(b的值)传递给 * p,将t的值传递给 * q,从而将a值和b值互换。
2.可以在常量的后面加上类型说明符以显示常量的类型,可以表示整型常量的是()。
SSS_SINGLE_SELA %B #C !D $分值: 70答案:A下面是常量类型及其类型说明符:整型%长整型&单精度浮点数! 双精度浮点数#货币型@ 字符串型$字节型、布尔型、日期型、对象及变体型常量没有类型说明符。
3.有如下事件过程:Private Sub Command1_Click( )Dim m AS Integer,n AS Integerm=2:n=1Print "m=";m;"n=";nCall TOD(m,n)Print "m=";m;"n=";nEnd SubSub TOD(x,y)x=x^2y=y^3End Sub程序运行后,输出的结果为( )。
SSS_SINGLE_SELA Swing胜过AWT的主要优势在于MVC体系结构的普遍使用B MVC用户界面存在3个通讯对象:模型、视图和控件C MVC其思想是把数据的内容本身和显示方式分离开来D 以上说法都正确分值: 70答案:DApplet参数的名字不区分大小写,这点不同于应用程序。
计算机二级考试VB精选题及答案解析
2013年计算机二级考试VB精选题及答案解析(1)一、选择题【例1】结构化程序设计方法提出于_______。
(考点1)A)20世纪50年代B)20世纪60年代C)20世纪70年代D)20世纪80年代解析:20世纪70年代提出了"结构化程序设计(structuredprogramming)"的思想和方法。
结构化程序设计方法引入了工程化思想和结构化思想,使大型软件的开发和编程得到了极大的改善。
答案:C)【例2】结构化程序设计方法的主要原则有下列4项,不正确的是_______。
(考点1)A)自下向上B)逐步求精C)模块化D)限制使用goto语句解析:结构化程序设计方法的主要原则为:(1)自顶向下:即先考虑总体,后考虑细节;先考虑全局目标,后考虑局部目标。
(2)逐步求精:对复杂问题,应设计一些子目标作过渡,逐步细化。
(3)模块化:把程序要解决的总目标分解为分目标,再进一步分解为具体的小目标,把每个小目标称为一个模块。
(4)限制使用goto语句。
答案:A)【例3】面向对象的开发方法中,类与对象的关系是_______。
(考点2)A)抽象与具体B)具体与抽象C)部分与整体D)整体与部分二、填空题【例1】在面向对象方法中,使用已经存在的类定义作为基础建立新的类定义,这样的技术叫做_______。
(考点2)解析:继承是面向对象方法的一个主要特征。
继承是使用已有的类定义作为基础建立新类的定义技术。
已有的类可当作基类来引用,则新类相应地可当作派生类来引用。
答案:继承【例2】对象的基本特点包括_______、分类性、多态性、封装性和模块独立性好等5个特点。
(考点2)解析:对象具有如下的基本特点:(1)标识惟一性。
对象是可区分的,并且由对象的内在本质来区分;(2)分类性。
可以将具有相同属性和操作的对象抽象成类;(3)多态性。
同一个操作可以是不同对象的行为;(4)封装性。
只能看到对象的外部特征,无需知道数据的具体结构以及实现操作的算法;(5)模块独立性。
大学vb操作题解析
1,下面程序对已知数组a,删除数组中数组元素中某个元素Private Sub Command1_Click()Dim a(), key%, i%, j%a = Array(1, 6, 8, 3, 5, 9, 10, 2, 7, 4)key = Val(InputBox("输入要删除的值"))For i = 0 To UBound(a)If key = a(i) T henFor j = i + 1 To UBound(a)a(j - 1) = a(j)Next jReDim Preserve a(UBound(a) - 1)MsgBox ("删除完成")Exit SubEnd IfNext iMsgBox ("找不到要删除的元素")End Sub2,下列程序表示将输入的一个数插入到按递减的有序数列中,插入后使该序列仍有序Private Sub Form_Click()Dim a, i%, n%, m%a = Array(19, 17, 15, 13, 11, 9, 7, 5, 3, 1)n = UBound(a)ReDim Preserve a(n + 1)m = Val(InputBox("输入欲插入的数"))For i = UBound(a) - 1 To 0 Step -1If m >= a(i) Thena(i + 1) = a(i)If i = 0 Then a(i) = mElsea(i + 1) = mExit ForEnd IfNext iFor i = 0 To UBound(a)Print a(i)Next iEnd Sub3,下列程序在1000~9999之间查找满足如下条件的整数:该整数,逆向排列得到的另一个四位数是它自身的倍数(2倍以上)。
查找结果和逆向排列数分别显示在对应的列表框Private Sub Command1_Click()Dim n As IntegerDim m As IntegerDim i As IntegerFor i = 1000 To 9999m = 0n = iDo While n > 0m = m * 10 + n Mod 10n = n \ 10LoopIf m Mod i=0And m \ i > 1 Thenlist1.AddItem ilist2.AddItem m & "=" & i & "*" & m \ iEnd IfNext iEnd Sub4,将100~150之间的偶数,拆分成两个素数之和,最后输出格式如图。
VB笔试模拟试卷276(题后含答案及解析)
VB笔试模拟试卷276(题后含答案及解析)题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.下列对于软件测试的描述正确的是()。
A.软件测试的目的是证明程序是否正确B.软件测试的目的是使程序运行结果正确C.软件测试的目的是尽可能多地发现程序中的错误D.软件测试的目的是使程序符合结构化原则正确答案:C解析:软件测试是保证软件质量的关键环节,直接影响着软件的质量评估。
软件测试不仅要讲究策略,更要讲究时效性。
软件测试的目的是尽可能多地发现程序中的错误。
2.设A=“12345678”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为( )。
A.123456B.123445C.8D.6正确答案:B3.下列关于类、对象、属性和方法的叙述中,错误的是( )。
A.类是对一类具有相同的属性和方法对象的描述B.属性用于描述对象的状态C.方法用于表示对象的行为D.基于同一个类产生的两个对象不可以分别设置自己的属性值正确答案:D解析:类是对一类具有相同的属性和方法对象的描述,属性用于描述对象的状态,方法用于表示对象的行为,基于同一个类产生的两个对象是可以分别设置自己的属性值的。
4.以下关于函数过程的叙述中,正确的是()。
A.函数过程形参的类型与函数返回值的类型没有关系B.在函数过程中,过程的返回值可以有多个C.当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递D.如果不指明函数过程参数的类型,则该参数没有数据类型正确答案:A5.如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后()。
A.发生一个运行时错误B.发生一个编译时错误C.在所有的初始化代码运行后Form1是活动窗体D.在所有的初始化代码运行后Form2是活动窗体正确答案:C6.在VB中设计程序时,能自动被检查出来的错误是()。
VB笔试模拟试卷160(题后含答案及解析)
VB笔试模拟试卷160(题后含答案及解析) 题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.算法一般都可以用哪几种控制结构组合而成______。
A.循环、分支、递归B.顺序、循环、嵌套C.循环、递归、选择D.顺序、选择、循环正确答案:D解析:算法的控制结构给出了算法的基本框架,它不仅决定了算法中各操作的执行顺序,而且也直接反映了算法的设计是否符合结构化原则。
一个算法一般都可以用顺序、选择、循环三种基本控制结构组合而成。
2.模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准是模块的______。
A.抽象和信息隐蔽B.局部化和封装化C.内聚性和耦合性D.激活机制和控制方法正确答案:C解析:模块的独立程序是评价设计好坏的重要度量标准。
衡量软件的模块独立性使用耦合性和内聚性两个定性的度量标准。
3.下列不属于结构化解析的常用下具的是______。
A.数据流图B.数据字典C.判定树D.PAD图正确答案:D解析:结构化解析的常用工具有数据流图、数据字典、判定树和判定表。
而PAD图是常见的过程设计工具中的图形设计。
4.在面向对象方法中,一个对象请求另一对象为其服务的方式是通过发送______。
A.调用语句B.命令C.口令D.消息正确答案:D解析:面向对象的事件是通过对象与对象间彼此的相互合作来推动的,对象间的这种相互合作需要一个机制协助进行,这样的机制称为消息。
消息是一个实例与另一个实例之间传递的信息,它请求对象执行某一处理或回答某一要求的信息,它统一了数据流和控制流。
5.下列关于队列的叙述中正确的是______。
A.在队列中只能插入数据B.在队列中只能删除数据C.队列是先进先出的线性表D.队列是先进后出的线性表正确答案:C解析:队列是指允许在一端进行插入、而在另一端进行删除的线性表。
它又称为“先进先出”或“后进后出”的线性表,体现了“先来先服务”的原则。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
第一题在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。
请编写适当的事件过程,在运行时当用鼠标右键单击文本框时,弹出此菜单,选中一个菜单项后,则进行菜单标题所描述的操作,如图所示。
*注意:存盘时必须存放在考生文件夹下,工程文件名为sj23.vbp,窗体文件名为sj23.frm。
解题步骤:新建一个工程sjt3.vbp,打开其中的Form1窗体,执行“工具”菜单中的“菜单编辑器”命令,打开菜单编辑器。
在“名称”栏中输入“Format”;点击“下一个”按钮,再点击编辑区的“→”按钮,然后在“标题”栏中输入“加粗”,在“名称”栏中输入“M1”;点击“下一个”按钮,在“标题”栏中输入“斜体”,在“名称”栏中输入“M2”;点击“下一个”按钮,在“标题”栏中输入“下划线”,在“名称”栏中输入“M3”。
在窗体上添加一个文本框。
在代码窗口中输入如下代码:Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 ThenPopupMenu FormatEnd IfEnd SubPrivate Sub M1_Click()Text1.FontBold = TrueEnd SubPrivate Sub M2_Click()Text1.FontItalic = TrueEnd SubPrivate Sub M3_Click()Text1.FontUnderline = TrueEnd Sub按要求保存文件即完成本题。
第二题在名称为Form1的窗体上建立一个文本框(名称为Text1,MultiLine属性为True,ScrollBars 属性为2)和两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为"读入数据"和"排序显示保存")(如图所示)。
程序运行后,如果单击"读入数据"按钮,则读入"in3.txt"文件中的100个整数,放入一个数组中(数组下界为1);如果单击"排序显示保存"按钮,则对这100个整数按从大到小进行排序,把排序后的全部数据在文本框Text1中显示出来,然后存入考生文件夹的"out3.txt"中。
(考生的文件夹下的标准模块mode1.bas其中的putdata过程可以把指定个数的数组元素存入out3.txt文件,考生可以把模块文件添加到自己的工程中)。
注意:文件必须存放在考生文件夹下,窗体文件名为wy18.frm,工程文件名wy18.vbp,排序结果存入out3.txt,否则没有成绩。
解题步骤:新建工程,双击控件面板中的TextBox控件,在窗体上添加一个名称为Text1的文本框,在属性窗口中设置MultiLine属性为True,ScrollBars属性为2,建立两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为"读入数据"和"排序显示保存"。
双击窗体进入代码窗口填入以下代码:Option ExplicitDim i(1 To 100) As IntegerPrivate Sub Cmd1_Click()Dim j As IntegerOpen App.Path & "\in.txt" For Input As #1For j = 1 To 100Input #1, i(j)Text1.Text = Text1.Text & i(j) & Space(5)NextClose #1End SubPrivate Sub Cmd2_Click()Dim j As IntegerDim k As IntegerDim temp As IntegerDim flag As BooleanFor j = 1 To 100flag = FalseFor k = 1 To 100 - jIf i(k) < i(k + 1) Thentemp = i(k)i(k) = i(k + 1)i(k + 1) = tempflag = TrueEnd IfNextIf Not flag ThenExit ForEnd IfNextText1.Text = ""For j = 1 To 100Text1.Text = Text1.Text & i(j) & Space(5)Nextputdata i, 100End Sub第三题:请根据以下要求设计Visual Basic应用程序(包括界面和代码)。
在Form1的窗体上建立一个主菜单,标题为"操作",名称为Op,该菜单有两个子菜单,其标题分别为"显示"和"清除",其名称分别为 Dis和Clea,编写适当的事件过程。
程序运行后,如果单击"操作"菜单中的"显示"命令,则在窗体上显示"等级考试";如果单击"清除"命令,则清除窗体上显示的内容。
程序的运行情况如图所示。
*注意:存盘时必须存放在考生文件夹下,工程文件名为sjt13.vbp,窗体文件名为sjt13.frm。
解题步骤:菜单的"标题"与"名称"属性:菜单的"标题"是程序运行和设计过程中用户所看到的菜单项显示的文字信息;菜单的"名称"是菜单控件名,是该菜单项区别于其他菜单项以及其他控件的重要标识。
相当与一般控件的Name属性。
Cls方法清除运行时窗体上或PictureBox中所生成的图形和文本。
解题方法:新建一个名为Form1的窗体,执行"工具"菜单中的"菜单编辑器"命令,打开菜单编辑器。
在"标题"栏中输入"操作",在"名称"栏中输入"Op";点击"下一个"按钮,再点击编辑区的"→"按钮,在"标题"栏中输入"显示",在"名称"栏中输入"Dis";点击"下一个"按钮,在"标题"栏中输入"清除",在"名称"栏中输入"Clea"。
打开代码窗口,输入如下的代码:Private Sub Clea_Click()ClsEnd SubPrivate Sub Dis_Click()Print "等级考试"End Sub按要求保存文件即完成本第四题:在名称为Form1的窗体上画一个名称为Text1的文本框;画两个标题分别为"对齐方式"、"字体",名称分别为Frame1、Frame2的框架;在Frame1框架中画三个单选按钮,标题分别为"左对齐"、"居中"、"右对齐",名称分别为Option1、Option2、Option3;在Frame2框架中画两个单选按钮,标题分别为"宋体"、"黑体",名称分别为Option4、Option5。
要求:编写五个单选按钮的Click事件过程,使程序运行时,单击这些单选按钮,可以对文本框中的文字实现相应的操作(如图所示)。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。
存盘时必须存放在本题主要考查了Frame控件属性的使用及OptionButton控件、Text控件的使用。
其中Frame 控件为控件提供可标识的分组。
Frame可以在功能上进一步分割一个窗体,把OptionButton 控件分成几组,各单选按钮的Click事件过程代码如下:Private Sub Option1_Click()Text1.Alignment = 0End SubPrivate Sub Option2_Click()Text1.Alignment = 2End SubPrivate Sub Option3_Click()Text1.Alignment = 1End SubPrivate Sub Option4_Click()Text1.FontName = "宋体"End SubPrivate Sub Option5_Click()Text1.FontName = "黑体"End Sub按要求保存文件即完成本题。
第五题:请根据以下要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上放置两个列表框,名称分别为List1和List2。
在List1中添加"第一题"、"第二题"…"第八题",并设置MultiSelect属性为2(要求在控件属性中设置实现)。
再放置一个名称为Cmd1,标题为"复制"的命令按钮。
程序运行后,如果单击"复制"按钮,将 List1中选中的内容(至少两项)复制到List2中。
如果选择的项数少于2项,用消息框提示"请选择至少两项"。
*注意:保存时必须存放在考生文件夹下,窗体文件名为wy52.frm,工程文件名为wy52.vbp。
ListBox控件:ListBox控件显示项目列表,从其中可以选择一项或多项。
如果项目总数超过了可显示的项目数,就自动在ListBox控件上添加滚动条。
语法:ListBoxMultiSelect属性:返回或设置一个值,该值指示是否能够在FileListBox或ListBox控件中进行复选以及如何进行复选。
在运行时是只读的。
在窗体上画一个文本框,名称为Text1,Text属性为空白。
再画一个列表框,名称为L1,通过属性窗口向列表框中添加4个项目,分别为"AAAA"、 "BBBB"、"CCCC"和"DDDD",编写适当的事件过程。
程序运行后,在文本框中输入一个字符串,如果双击列表框中的任一项,则把文本框中的字符串添加到列表框中。