计算机二级VB弹出式菜单
计算机二级(VB)63_真题(含答案与解析)-交互
计算机二级(VB)63(总分4230, 做题时间90分钟)选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。
1.对下列程序段，说法正确的是（）。
Text1．Top=2000Text1．Left=800SSS_SINGLE_SELA Text1对象的左边界距窗体的左边界是800twip，上边界距窗体的上边界为2000twipB Text1对象的左边界距屏幕的左边界为800twip，上边界距屏幕的上边界为2000twipC Text1对象的宽度为2000twip，高度为800twipD Text1对象的高度为800点，宽度为2000点分值: 70答案:A如果对象为窗体，Left指的是窗体的左边界与屏幕的左边界的相对距离，Top 指的是窗体的顶边与屏幕的顶边的相对距离；而当对象为控件时，Left指的是控件的左边距窗体的左边的相对距离，Top指的是控件的顶边与窗体的顶边的相对距离，另外Top和Left属性值的单位为twip，是1点的二十分之一，Height和Width是指定对象的高度和宽度的属性，所以只有选项A) 正确。
2.以下说法不正确的是（）。
SSS_SINGLE_SELA ④③②①B ①②③④C ④②③①D ④③①②分值: 70答案:A在Access中的事件主要有键盘事件、鼠标事件、对象事件、窗口事件和操作事件。
没有控件事件。
3.下列对于软件测试的描述中正确的是______。
SSS_SINGLE_SELA 软件测试的目的是证明程序是否正确B 软件测试的目的是使程序运行结果正确C 软件测试的目的是尽可能多地发现程序中的错误D 软件测试的目的是使程序符合结构化原则分值: 70答案:C关于软件测试的目的，Grenford J.Myers 在《The Art of Software Testing》一书中给出了深刻的阐述：软件测试是为了发现错误而执行程序的过程；一个好的测试用例是指很可能找到迄今为止尚未发现的错误的用例；一个成功的测试是发现了至今尚未发现的错误的测试。
VB课件弹出式菜单
1 弹出菜单 2 弹出菜单设计方法 3 为文本编辑器添加弹出菜单 4 上机操作
计算机网络教研室
1、弹出式菜单
弹出式菜单设计
也叫快捷菜单，是一组独立的菜单，在窗 体上浮动显示，一般随鼠标右键出现。
2、设计弹出式菜单
①在菜单编辑器中添加菜单，添加的方法与下拉 菜单相同，唯一的区别是顶级菜单不勾选“可见” 选项。 ②在“鼠标”事件中检测到按了鼠标右键，执行 命令：
Private Sub T4_Click() '全选 RTB.SelStart = 0 RTB.SelLength = Len(RTB.Text) End Sub
Private Sub T3_Click() '粘贴 RTB.SelText = Clipboard.GetText
End Sub
思考：这些程序与下拉菜单中的相同菜单命令的程序有什 么共同之处？可用什么方法避免程序的重复编写？
PopupMenu 菜单名，Flags，x，y ③为各菜单编写代码：与下拉菜单的代码编写一 样。
计算机网络教研室
为文本编辑器添加弹出菜单
在“菜单编辑器”末尾添加如下的菜 单：
计算机网络教研室
除“格式设置”项外， 其余菜单项要勾选“可 见”选项。
为文本编辑器添加弹出菜单
在增强文本框的鼠标事件中添加弹出菜单的代码： Private Sub RTB_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
计算机网络教研室
学生上机实战 完善自己的程序 添加更加丰富的快捷菜单
计算机网络教研室
课堂小结 本节主要学习了如下内容： 添加弹出式菜单 弹出式菜单顶级菜单项不可见。用PopupMenu命令弹出快捷菜单。 弹出菜单编程。
计算机二级vb笔记第一章
一.VB界面的构成:(1)标题栏:蓝色(2)菜单栏:由于呈长条形,因此叫条形菜单(也叫主菜单),当单击任何一个菜单项时,会弹出一个新的菜单(叫弹出式菜单),了解:热键,快捷键,分组线,菜单项为灰色(不可使用) 菜单项后面的省略号(……)代表会弹出一个对话框(3)标准工具栏（也叫常用工具栏）：系统将常用的菜单做成图标的样式放在VB的主窗口中，方便用户的操作。
常用的有：打开，保存，启动（运行),工程资源管理器以及工具箱.(4)由三部分构成：左边的为：工具箱，中间的为：窗口（窗体设计区），右边的是工程资源管理器工程资源管理器：用于在不同的窗口之间进行切换二、设计窗体:分为三步：添加控件，设置属性，写代码(1)添加控件:既可以直接画，也可以双击产生常用的控件有：标签(LabeL),文本框(Textbox),命令按钮(Commandbutton)标签：用于直接显示的文字的叫标签文本框：用于输入和显示文字的框叫文本框命令按钮：可以用鼠标点的叫命令按钮(2)设置属性常用的属性有:caption,text,namecaption:直接看到的文字叫captiontext:框中的内容(只有框才有)name:控件的名称。
默认情况下，每一个控件的名称都为该名称的第一个单词后面加1,2,3,4,如第一个标签叫L abe L1,第二个文本框叫text2,第一个命令按钮叫Command1例：新建一个如图所示的窗体sjt1,要求单击“显示”时，则在文本框中显示系统当前的时间.做法:添加一个标签，一个文本框，一个命令按钮，然后设置窗体的caption为当前时间，Label1的caption为:显示时间，Command1的caption为：显示。
然后在显示中书写代码:(双击“显示”按钮，在弹出的框中写代码: text1.text=time对象:具体的事物.如一个学生,一部手机.窗体(Form)以及窗体中的每一个控件都一个具体的事物,也叫对象.任何对象都由两部分构成:对象的特征(即属性)以及对象所具有的功能(即方法),因此我们对任何对象(即控件)所能做的操作无非是设置对象的属性(更改外观)和调用方法(实现功能) (3)写代码:设置对象的属性:对象名(控件名).属性名=值如text1.text=time调用对象的方法:对象名.方法名方法:为了实现某种功能而进行动作.方法只需要调用即可就可以实现.常用的方法有:show-->让窗体显示hide-->让窗口隐藏.如果希望让窗口之外的对象(即其它控件隐藏),只需要将它们的visible属性设置为false即可.setfocus-->让对象得到焦点.(按钮可以有,文本框也可以有焦点)例:新建一个如图所示的窗体,要求显示"隐藏"时,则ABCDEF消失,同时按钮变为"显示"在"隐藏"按钮中写代码(双击"隐藏",在弹出的代码窗口中书写) label1.visible=falseCommand1.caption="显示"如果希望单击"隐藏"时,则ABCDEF消失,按钮变为"显示",而单击"显示"时,ABCDEF重新出现,按钮变为"隐藏"怎么办??if Command1.caption="隐藏" thenlabel1.visible=falseCommand1.caption="显示"else '否则,即按钮的标题为"显示"label1.visible=trueCommand1.caption="隐藏"end if例:新建一个如图所示的窗口,要求:单击"焦点1"时,文本框1消失,光标在文本框2中闪动(即文本框2得到焦点),单击"焦点2"时,文本框2消失,文本框1得到焦点,单击"关闭"时,关闭窗口.在"焦点1"中写代码(双击"焦点1",在弹出的代码窗口中书写)Text1.Visible = FalseText2.Visible = TrueText2.SetFocus焦点2中的代码和焦点1的代码类似,只需要将text1改为text2即可."关闭"的代码为: endPrivate Sub Command1_Click() '在Command1的Click事件中写代码(双击Command1,则会出现private..end sub,用户只需要书写中间的部分Label3.Caption = "锄禾日当午"End SubPrivate Sub Command2_Click() Label3.Caption = "汗滴禾下土" End SubPrivate Sub Command3_Click() Label3.Caption = "谁知盘中餐" End SubPrivate Sub Command4_Click() Label3.Caption = "粒粒皆辛苦" End Sub事件:由系统预先规定好的,而由系统或用户自动引发的操作(如单击).事件(操作)作用于对象,对象识别事件并做出相应的反应(根据书写的代码决定)常见的事件有:click(单击):当用户单击时引发.dbLclick(双击):当用户双击某一对象引发.change:当对象的值发生改变时引发load(加载):运行窗口时,系统会自动将窗口调入内存,发生的是load事件.(总之,如果希望窗口一出现,就实现功能,就在load事件中书写代码)如果希望操作某一对象后有结果,就将可以实现结果的语句写在这步操作对应的事件中,事件发生后,系统自动调用代码执行(如单击按钮时,实现功能,就将可以实现功能的语句写在单击所对应的事件(Click)中即可)例:新建一个窗口,上面有一个标签,要求运行窗口时,标签中的文字是"江南好"(注意:不允许在设计窗口时,更改任何控件的属性)在form1的load事件中写代码(双击窗口,在其中书写)label1.caption="江南好"例:新建一个如图所示的窗口,要求在文本框1中输入时,文本框2中自动显示相同的内容.在文本框1口书写代码(双击文本框1,出现了一个代码窗口,实际上是在change事件中书写)text2.text=text1.text第二章：数据及数据运算数据在VB中有四种表现形式，分别是：常量，变量，表达式和函数一、常量(具体的值，不变的量)在计算机运行过程中，其值永远不会发生改变的量，叫常量。
计算机二级《VB》考试重要知识点
计算机二级《VB》考试重要知识点2016计算机二级《VB》考试重要知识点2016年9月计算机二级考试时间为24日-27日，下面店铺为大家搜索整理了关于计算机二级《VB》考试重要知识点，欢迎参考学习，希望对大家有所帮助!想了解更多相关信息请持续关注我们店铺!知识点一：VisualBasic的集成开发环境VB集成开发环境(IDE——IntegratedDevelopingEnvironment)由以下元素组成：1.标题栏用于显示正在开发或调试的工程名和系统的工作状态(设计态、运行态、中止态)。
2.菜单栏用于显示所使用的VisualBasic命令。
VB6.0标准菜单包括：3.工具栏在编程环境下用于快速访问常用命令。
缺省情况下，启动VB后显示“标准”工具栏，附加的编辑、窗体设计和调试的工具栏可以从“视图”菜单上的“工具栏”命令中移进或移出。
4.窗体设计器用来设计应用程序的界面。
启动VB后，窗体设计器中自动出现一个名为Form1的空白窗体，可以在该窗体中添加控件、图形和图片等来创建所希望的外观，窗体的外观设计好后，从菜单中选择“文件”→“保存窗体”→在保存对话框中给出合适的文件名(注意扩展名)，并选择所需的保存位置→确定。
需要再设计另一个窗体时，单击工具栏上的“添加窗体”按钮即可。
5.控件(工具)箱由一组控件按钮组成，用于设计时在窗体中放置控件。
除了缺省的工具箱布局之外，还可以通过从上下文菜单中选定“添加选项卡”并在结果选项卡中添加控件来创建自定义布局。
6.弹出式(上下文)菜单在要使用的对象上单击鼠标右键即可打开快捷菜单，其上会出现与当前对象相关的经常执行的操作，以加快操作速度。
7.工程管理器窗口用于浏览工程中所包含的窗体和模块，还可以从中查看代码、查看对象。
8.属性窗口是VB中一个比较复杂的窗口，其中列出了对选定窗体和控件的属性设置值。
VB中正是通过改变属性来改变对象的特征，如大小、标题或颜色。
9.对象浏览器列出工程中有效的对象，并提供在编码中漫游的快速方法。
2010年9月计算机等考二级VB真题及答案
2010年9月计算机等考二级VB真题及答案1、若要处理一个值为50000的整数，应采用哪种VB基本数据类型描述更合适？（ B ）A、IntegerB、LongC、SingleD、String2、在程序中执行Close命令，其作用是（ D ）。
A、关闭当前正在使用的一个文件B、关闭第一个打开的文件C、关闭最近一次打开的文件D、关闭所有文件3、形状控件所显示的图形不可能是（ D ）。
A、圆B、椭圆C、圆角正方形D、等边三角形4、表达式16/4-2^5*8/4 MOD 5\2的值为（ B ）。
A、14B、4C、20D、25、设置（A）属性可以使图片显示在图片框或影像框中。
A、PictureB、ImageC、IconD、DownPicture6、执行以下语句后的结果为(C)。
Dim x As IntegerIf x Then Print x Else Print x-1A、1B、0C、-1D、不确定7、当改变目录列表框控件Dir1中的当前目录时，希望同步改变文件列表框File1中显示的文件，在Dir1_change事件过程中使用的命令是（ A ）。
A、File1.Path=Dir1.PathB、Dir1.Path =File1 .PathC、File1.Path = Dir1.DriveD、Dir1.Drive= File1.Path8、滚动条的（ B ）属性用于指定用户单击滚动条的滚动箭头时，Value属性值的增减量。
A、LargeChangeB、SmallChangeC、ValueD、Change9、窗体通用部分的语句“Option Base 1”，决定本窗体中数组下标界（ A ）。
A、下界必须为1B、缺省的下界为1C、下界必须为0D、缺省的下界为010、由“For i=1 T o 16 Step 3”决定的循环结构被执行（ C）次。
A、4B、5C、6D、711、下列（B ）对象具有编辑功能，即运行时可以进行输入或修改。
二级VB 第10章 菜单、工具栏、状态栏、多文档
1. 添加工具栏控件
(1) “工程→部件”，选Microsoft Windows Common
Controls 6.0
用 (2)
在窗体任意位置添加一个ImageList控件，名称默
认为ImageList1
(3) 用
在窗体上添加一个Toolbar控件(该控件自动位于菜
单栏的下面) ，其名称默认为Toolbar1。
MSComctlLib.Button)
End Select
OpenDoc
End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As Select Case Button.Key Case “open” OpenDoc …… “打开”按钮的关键字为open，图像值为 1 '或Case 1，表示单击“打开”按钮
编辑菜单控件
如果菜单 控件的前面 没有内缩符 号“ · · · · ”， 表明该控件 建立的是主 菜单，否则 为菜单命令 或子菜单。
3 方法： 先通过菜单编辑器设计菜单，然后编写各菜单控件的 Click事件过程。
[例] 创建简易编辑器 (1) 设计菜单
(2) 设计界面
菜单下面绘制两条直线 ( 两个 Line 控件 ) ，一条为黑色，一条 为白色。 黑线的Y1和Y2属性设为0 白线的Y1和Y2属性设为10 文本框Text1： MultiLine设为True ScrollBars设为3
(3) 编写菜单控件的Click事件过程
10. 2 弹出菜单的设计
用PopupMenu方法可显示弹出式菜单
[对象.]PopupMenu 菜单控件名称
VB实现窗口的弹出式菜单
VB实现窗口的弹出式菜单在Windows95、Windows98或NT的风格中，有按动鼠标器右键弹出下拉菜单的操作，在VB执行环境下，有一些控件本身具有弹下拉菜单的功能，如T exTbox控件等，但大多数编辑类控件以及窗体本身却没有此功能，要在窗口中任意位置实现PopUpMenu（弹出式菜单），可借助VB的菜单工具来实现。
首先，打开VB的“工具”菜单条，利用“菜单编辑器”为窗体生成一个菜单：标题(Caption) 菜单条名(Name)编辑 menuEdit……复制 mnuCopy……剪切 munCut其次，将生成的menuEdit菜单设置为不可视。
Private Sub Form_Load()Me.menuEdit.Visibe=False′menuEdit菜单设置为不可视End Sub然后，利用MouseDown事件实现任意位置弹出PopUpMenu，如下例：本例中以RichTexBox控件为例，在其上面实现复制、剪切功能。
1．复制功能的实现。
Private Sub MnuCopy_Click()Clipboar.Clear′将剪贴板清空′将RichTexBox控件上选择上的内容复制到剪贴板Clipboard.SetTextRichT exBox1.SelTextEnd Sub2．剪切功能的实现。
Private Sub MnuCut_Click()Clipboard.Clear ′将剪贴板清空′将RichTextBox控件上选择了的内容复制到剪贴板Clipboard.SetTextRichBox1.SelText′将RichTexBox控件上选择了的内容删除SendKeys″{DELETE}″,TrueEnd Sub3．在RichTexBox控件的MouseDown事件中实现任意位置弹出PopUPMenu。
OPrivate Sub RichTexBox1_MouseDown(Button As Integer,Shift As Integer,x As Single,Y As Single)Dim MnuFile AS Menu ′声明一个菜单类型的变量Set munFile=Me.MenuEdit ′将MenuEdit赋给菜单变量if Button=2 Then ′判断是否按动鼠标器右键′判断RichTexBox控件上选择了的内容是否存在，决定复制、剪切菜单条是否可操作。
国家计算机二级(VB)86_真题-无答案
国家计算机二级(VB)86(总分100,考试时间120分钟)选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 表达式x=Sqr(a^2-5)+sqr(b^2-5)的类型是（）。
A. 在Visual Basic 中的对话框分为两种类型：预定义对话框和自定义对话框B. 自定义对话框由用户根据自己需要定义的C. 预定义对话框是用户在设置程序代码后定义的D. MssgBox 函数是用户的自定义对话框的函数2. 在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M(2+M(x)) End Sub 运行程序，单击命令按钮，在窗体上显示的是A. 6B. 5C. 7D. 83. 单击窗体时，下列程序的执行结果是( )。
Private Sub Invert(By Val xstr As String，ystr As String)Dim tempstr AS String Dim I AS Integer I=Len(xstr) Do While I＞=1tempstr=tempstr + Mid(xstr，I，1)I=I - 1Loop yStr=tempStr End Sub Private Sub Form_Click( )Dim s1 As String，s2 As String S1="abcdef"Invert S1，S2Print S2End SubA. blooean isAlive( )B. Thread currentThread( )C. String getName( )D. smtic boolean interrupted( )4. Sub过程与Function过程最根本的区别是（）。
计算机等级考试二级VB基础教程
计算机等级考试二级VB基础教程1.1Visual Basic 概述1.Visual Basic是什么Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言。
“Visual” 指的是开发图形用户界面(GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。
“Basic”指的是BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic 在原有BASIC 语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI 有直接关系。
专业人员可以用Visual Basic 实现其它任何Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。
Visual Basic Scripting Edition (VBScript) 是广泛使用的脚本语言，它是Visual Basic 语言的子集，可嵌入HTML语言中，用于网页设计，如ASP(Active Server Page)文件。
VB简单易学，通用性强，用途广泛。
2.VB的功能VB可以用于可以开发多媒体、数据库、网络、图形等方面的应用程序。
数据访问特性允许对包括Microsoft SQL Server 和其它企业数据库在内的大部分数据库格式建立数据库和前端应用程序，以及可调整的服务器端部件。
有了ActiveX(TM) 技术就可使用其它应用程序提供的功能，例如Microsoft Word 字处理器，Microsoft Excel 电子数据表及其它Windows 应用程序。
Internet 能力强大，很容易在应用程序内通过Internet 或intranet访问文档和应用程序，或者创建Internet 服务器应用程序。
国家计算机二级(VB)91_真题-无答案
国家计算机二级(VB)91(总分100,考试时间120分钟)选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 以下程序段的输出结果为（）。
Dim 1，a(10)，p(3)k=5Fori=0 To 10 a(i)=i Next i For i=0 To 2p(i)=a(i*(i+1))Next i For i=0 To 2 k=k+p(i)*2Next i Frint kA. WHEREB. FROMC. GROUP BYD. ORDER BY2. 有变量定义语句Dim max，min As String，则可以知道max的类型是（）。
A. 除了Click事件之外，菜单项不可以响应其他事件B. 每个菜单项都是一个控件，与其他控件一样也有其属性和事件C. 菜单项的索引号必须从1开始D. 菜单的索引号可以不连续3. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3For j = 2 To 4array1(i, j) = i + j Next j Next i Text1.Text = array1(2, 3) + array1(3, 4)End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（）。
A. 15B. 14C. 13D. 124. 在以下事件过程中，可以在用户按下鼠标右键时，显示一个上边框，以鼠标当前位置为心的弹出式菜单，而且这个弹出式菜单还可以识别右键对菜单命令的选择，相应的选项是( )。
A. x=List1．ListCountB. x=ListCountC. x=List1．ListIndexD. x=ListIndex5. 编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode AS Integer，Shift As Integer)Print Chr(KeyCode)End Sub Private Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按"A"键，则程序输出的结果是（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
弹出式菜单（快捷菜单）：9，[14]
1、在菜单编辑器中建立菜单结构，主菜单设置为不可见
2、在窗体中调用菜单：popupmenu 主菜单的名称
单击右键时调用：对象名称_MouseDown(……)
if button=2 then
popupmenu 主菜单的名称
end if
通用对话框：23，43，[12，14，22]
添加通用对话框控件：P313
在工具箱的空白处单击右键→部件→勾选“Microsoft Common Dialog control 6.0”
CommonDialog1.DialogTitle=”Open”‘标题
CommonDialog1.Filter = "所有文件|*.*|文本文件|*.txt" ‘设置文件过滤器CommonDialog1.FilterIndex = 2 ‘设置默认文件类型
CommonDialog1.InitDir = App.Path ‘设置默认目录
CommonDialog1.ShowOpen ‘设置对话框的类型
Open CommonDialog1.FileName For Input As #1 ‘打开在对话框中选择的文件
Input #1, s
Text1.Text = s
Close #1
例题：将打开对话框中所选择的文件里的内容读到文本框中
CommonDialog1.DialogTitle = "Open"
CommonDialog1.InitDir = "D:\"
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
Text1.Text = ""
Do While Not EOF(1)
Line Input #1, a
Text1.Text = Text1.Text + a + Chr(13) + Chr(10)
Loop
Close #1。