我是蜜桃桃
2017年3月计算机二级VB上机操作题库及答案
一、基本操作题
(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。组合框中的文本内容为空,表项内容有“乒乓球”、“羽毛球”和“网球”3项。运行后的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为,窗体文件名为。
(2)在名称为Forml、标题为“转换”的窗体上,画1个名称为Shapel、边框宽度为3的形状。再画两个标题分别为“椭圆”和“圆”的命令按钮。如下图所示。
要求:编写适当的事件过程,使得单击“椭圆”按钮时,Shapel的形状变换为椭圆;单击“圆”按钮时,Shapel的形状变换为圆。程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为,窗体文件名为。
二、简单应用题
(1)在考生文件夹下有一个工程文件。窗体Forml上有两个标题分别是“读数据”和“查找”的命令按钮。请画1个名称为Textl、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。程序功能如下。
①在考生文件夹下的文件中存有100个正整数。单击“读数据”按钮,则将文件中的数据读入数组a中。
②单击“查找”按钮,则查找数组a中所有为7的倍数的数据,并将这些数据顺次显示在Textl文本框内(数据之间用空格隔开)。“读数据”按钮的Click事件过程已经给出,请编写程序完成“查找”按钮的Click事件过程,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须使用“查找”按钮完成查找过程,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后将程序按原文件名存盘。
(2)考生文件夹下有一个工程文件。在窗体Forml上有两个名称为Commandl和Command2、标题分别为“重输”和“查找”的命令按钮。程序功能如下。
单击“重输”按钮,则清空Textl中的内容,等待用户输入由空格隔开的若干个英文单词;单击“查找”按钮,则找出Textl中最长的单词,并将其显示在Text2中。某一次的运行效果如图所示。请将“查找”按钮的Click事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的.控件和程序,最后将程序按原文件名存盘。
三、综合应用题
考生文件夹下有一个工程文件。在窗体Forml上有两个标题分别是“产生数据”和“重新排列”的命令按钮,有两个标题为“原始数据”和“排列数据”的标签。程序功能如下。
①单击“产生数据”按钮,则随机产生20个一位整数,存人数组a中,并同时显示在Textl中。
②单击“重新排列”按钮,则重新排列数组a中的元素:使等值的元素相邻存放,并且保持它们在数组a中首次出现的相对次序;最后将排列结果显示在Text2中。某一次运行结果如图所示。
请将“重新排列”按钮的Click事件过程中的注释符去掉,把“?”改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
【参考答案】
一、基本操作题
(1)【解题思路】新建一个空白窗体,添加一个组合框控件,根据题目要求修改窗体和控件的属性值。
【操作步骤】
步骤1:新建一个空白窗体,设置窗体的属性,属性设置如表所示。
步骤2:添加一个组合框控件,设置控件的属性,属性设置如表所示。
完成设置后界面效果如图所示。
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
(2)【解题思路】新建一个空白窗体,添加一个形状控件和两个命令按钮,设置好窗体和控件的属性,对两个命令分别添加事件代码,使单击按钮时,窗体中的形状控件能够产生变化。
【操作步骤】
步骤1:新建一个空白窗体,设置窗体的属性,属性设置如表所示。
步骤5:调试并运行程序,单击“椭圆”按钮,如图所示,单击“圆”按钮,如图所示,关闭程序后按题目要求存盘。
二、简单应用题
(1)【解题思路】本题主要考查利用循环及分支结构处理数组中的数据,使用For循环遍历数组中的全部值,然后使用If语句判断数组中每个元素是否是7的倍数,若是,则将数组保存在文本框中。
【操作步骤】
步骤1:打开本题项目工程。
步骤2:在窗体中添加一个文本框控件,控件属性的设置如表所示。
步骤3:打开代码编辑窗口,在程序代码区域编写如下代码。
所示,单击“查找”按钮,如图所示,关闭程序后按题目要求存盘。
三、综合应用题
【解题思路】本题利用三重循环对数组中的元素进行移动操作,按照题目的要求移动结束后,将数组元素依次显示到Text2文本框中。
胖纸没烦恼
一、填空题 Basic语言是以结构化Basic语言为基础,以(事件)驱动为运行机制。 2.若要将窗体Form1隐藏起来,课可调用其方法(Hide)来实现,具体调用格式为:() 3.数据控件本身不具有数据显示能力,要显示工作表的数据,需借助(treeview)控件来实现。 Basic对象主要分为(内部控件)和(ActiveX控件)两大类。 5.在Visual Basic中若要让某对象获取焦点,则可通过(Setfocus)方法来实现。 6.显示快捷菜单的方法是(PopupMenu)。 7.调试应用程序时,其处于(break)模式。 Basic中若要产生以消息框,可用(msgbox)函数来实现。 二、单选 1.若要卸除窗体,则实现的语句为___ 2.若要使用命令钮失效,则可设置 __属性为Flase来实现。 3.设置或返回文本框中的文本,可通过文本框对象的 __属性来实现。 4.设置定时器控件的定时时间,可通过 ___属性来设置。 5.包含Activex控件的文件的扩展名是_C..ocx __。 6.下列哪个关键字定义的变量可以由其他模块访问_ __ 7.图像框或图片框中显示的图形文件,由他们的 __属性值决定。 8.创建工具栏之前,应选中〖部件〗对话框中的 windows common control _复选框才能在工具箱中添加相应的控件按钮。 Basic中可通过 __方法画圆。 10.用下面语句定义的数组的元素个数是_ Dmi M (-5 to 3) AS integer 三、多选 1.当用户在窗体上单击鼠标时,触发的事件 2.在运行时,若要以程序代码的方式调整窗体的大小,则改变下列属性或事件中的代码可实现的有 _ 3.当窗体被启动,将会发生的事件 4.下列控件不具有text属性的是 B.标签_C.图片框__ 5.下列变量名正确的有 ___ 四、判断题 1.所有的对象都具有caption属性和name属性。(错) 2.在VB应用程序之外删除工程中的一个文件时,不能更新此工程文件。(对) 3.一个应用程序只能有一个mdi窗体。(错) 4.在设计段通过用对话框控件的大小不能改变,用户也无法指定对话框在屏幕上的显示位置。(对) 5.数据库中的健必须是唯一的。(对) 五、简答题: 从书上找,略六、编程题: 1.求1到100内所有能被3整除的数。 dim i as integer for i=1 to 100 if i mod 3=0 then print i; next i print2.随机生成10个50以内的整数,并按递增顺序排序。dim i as integer ,A(9) as integer,T as integerfor i=0 to 9randomizea(i)=int(rnd*50)next ifor i=0 to 8for j=i+1 to 9if a(i)>a(j) thenT=a(i):a(i)=a(j):a(j)=Tend ifnext jnext ifor i=0 to 9print a(i);next i说明:可能有个别题与答案不符,你最后好好看看书,确认一下,不要一味照搬。
傻傻的双子
与传统的程序设计语言相比,VisualBasuc最突出的特点是事件驱动编程机制。 正确 欲设置定时器的时间间隔为1秒,则属性的Interval属性设置为1。 错误 用鼠标双击窗体的任何部位都可以激活属性窗口。 错误 可视化编程是指无需编程,仅通过直观的操作方式即可完成界面的设计工作。 正确 MsgBox函数的返回值为整型。 正确 当运行程序时,系统自发执行启动窗体的load事件过程。 正确 .要使标签框的大小随Caption属性作自动调整,应将AutoSize属性设置为true。 正确 能够改变标签(Label)控件显示标题的属性是Name。 错误 面向对象编程方法的基本机制是方法、事件、属性、名称。 错误 应用程序打包后,其包文件的后缀为exe。 错误 一个VB应用程序可以包含几个.vbp文件?( 1个 ) VisualBasic是一种面向对象的可视化编程语言,采取了( 事件驱动)的编程机制。 如果想让文本框中的内容在运行时不能编辑,需将文本框的(Locked )属性设置为True。 VisualBasic应用程序处于运行模式时,这时(既不能设计界面,也不能编写代码 )。 后缀为.frm的文件表示( 窗体文件 )。 工程文件的扩展名是(.vbp )。 VB集成开发环境中用于编写程序代码的窗口是(代码编辑器窗口 )。 如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是( )。 假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应制造的操作是(单击窗体上没有控件的地方 )。 VB提供控件的窗口是(工具箱 )。 计时器控件响应的事件是(Timer )。 后缀为.cls的文件表示VB的(类模块文件) 如果在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的( PasswordChar )属性。 下列正确的赋值语句是(y=x+20 )。 .在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是( 工程资源管理器窗口 )。 对象的性质和状态特性称为(属性 )。 将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后,将该可执行文件拿到其它机器上不能运行的主要原因是(运行的机器上无VB系统 )。 要在窗体Form1内显示“myfrm”,使用的语句是( “myfrm” )。 对于定时器(Timer)控件,设计其定时是否开启的属性是( Enabled )。 有程序代码如下: "欢迎学习VB程序设计"则Text1,Text,和"欢迎学习VB程序设计"分别代表(对象,属性,值 )。 多选题:集成开发环境有三种工作模式,分别是( )。 设计模式执行模式中断模式 关于窗体的Load事件的触发时,错误是( )。 用户单击窗体时窗体显示之后 窗体被卸载时 下列属于VB应用程序构成的是( )。 cls文件res文件ocx文件 在VisualBasic中,关于程序的执行顺序,错误是( )。 由事件驱动由代码行的顺序决定随意执行 对象是代码和数据的集合,例如,VisualBasic中的( )等都是对象。 窗体文本框命令按钮标签 以下属于VisualBasic中变量的数据类型是( )。 IntegerDoubleVariant Currency 集成开发环境的主窗口包括( )。 标题栏菜单栏状态栏工具栏 下列赋值语句错误的是( )。 B+C=A–B=A2=A+B 在下列有关VisualBasic的叙述中,正确的是( )。 采用了事件驱动的编程机制是面向对象的编程语言是可视化的程序设计语言 下列控件中,能改变大小的是( )。 TextBox LabelPictureBox
妳是在誇我咩
文件大用网盘,这里有一份最全的考研历年真题资料分享给你
链接:
通过不断研究和学习历年真题,为考生冲刺阶段复习提分指点迷津,做真题,做历年真题集,对照考纲查缺补漏,提高实战素养,制定做题策略,规划方向;
若资源有问题欢迎追问!
可怜的tina
VB历年真题集真题一一、选择题在下列各题的A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确的选项涂写在答题卡相应位置上,答在试卷上不得分。(1)为了避免流程图在描述程序逻辑时的灵活性,提出了用方框图来代替传统的程序流程图,通常也把这种图称为 A)PAD图B)N-S图 C)结构图D)数据流图(2)结构化程序设计主要强调的是 A)程序的规模 B)程序的效率 C)程序设计语言的先进性 D)程序易读性 (3)为了使模块尽可能独立,要求 A)模块的内聚程度要尽量高,且各模块间的耦合程度要尽量强 B)模块的内聚程度要尽量高,且各模块间的耦合程度要尽量弱 C)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱 D)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强(4)需求分析阶段的任务是确定 A)软件开发方法 B)软件开发工具 C)软件开发费用 D)软件系统功能(5)算法的有穷性是指 A)算法程序的运行时间是有限的B)算法程序所处理的数据量是有限的 C)算法程序的长度是有限的D)算法只能被有限的用户使用 (6)对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是 A)快速排序 B)冒泡排序 C)直接插入排序 D)堆排序 (7)如果进栈序列为e1,e2,e3,e4,则可能的出栈序列是 A)e3,e1,e4,e2 B)e2,e4,e3,e1 C)e3,e4,e1,e2 D) 任意顺序 (8)将E-R图转换到关系模式时,实体与联系都可以表示成 A)属性 B)关系 C)键 D)域 (9)有三个关系R、S和T如下: 由关系R和S通过运算得到关系T,则所使用的运算为 A)并 B)自然连接 C)笛卡尔积 D)交 (10)下列有关数据库的描述,正确的是 A)数据处理是将信息转化为数据的过程 B)数据的物理独立性是指当数据的逻辑结构改变时,数据的存储结构不变 C)关系中的每一列称为元组,一个元组就是一个字段 D)如果一个关系中的属性或属性组并非该关系的关键字,但它是另一个关系的关键字,则称其为本关系的外关键字 (11)窗体文件的扩展名是 A) .bas B) .cls C) .frm D) .res (12)设y是整形变量,能判断y为奇数的表达式是 A)Not(y Mod 2<>0) B)y Mod 2<>0 C)(y-1)Mod 2<>0 D)y Mod 2<>1 (13)下面说法不正确的是 A) 变量名的长度不能超过255个字符 B) 变量名可以包含小数点或者内嵌的类型声明字符 C) 变量名不能使用关键字 D) 变量名的第一个字符必须是字母 (14)定义有5个整数型元素的数组,正确的语句是 A)Dim a(4) As Integer B)Option Base 1:Dim a(5) C)Dim a &(5) D)Dime a(5) As Integer (15)设a=6,则执行 x=IIF(a>5,-1,0) 后,x的值为 A)5 B)6 C)0 D)-1 (16)如果将文本框的Locked属性设置为True,则以下说法正确的是 A) 此时在属性窗口不可以修改文本框的Text属性值 B) 运行时用户不可以在界面修改文本框中的内容 C) 在程序代码中不可以修改文本框的内容,如不可以使用语句"aaa" D) 以上均不正确(17)编写如下事件过程: 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键和锁定大写键时) 运行程序,若按"T"键,则程序输出的结果是 A) T B) t T T C) T D) t t t(18)以下事件过程可以将打开对话框的标题改为"新时代"的是 A) Private Sub Command2_Click() "新时代" End Sub B) Private Sub Command2_Click() "新时代" End Sub C) Private Sub Command2_Click() "新时代" End Sub D) Private Sub Command2_Click() "新时代" End Sub (19)如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的什么属性 A) Value B) Visible C) Enabled D) Default (20)要使文本框可输入多行文字,要更改的默认选项是 A) SorollBoars和MultiLine B) Visible C) ScrillBoars D) 以上都不是 (21)要触发组合框的DblClick事件,只有将组合框的Style属性设置为 A) 0 B) 1 C) 2 D) 3 (22)在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timer1_ _________( ) End Sub 在下划线上应填入的内容是 A) Enabled B) Visible C) Interval D) Timer (23)要使文本框获得输入焦点,则应采用文本框控件的方法是 A) GotFocus B) LostFocous C) KeyPress D) SetFocus (24)假定有如下的窗体事件过程: Private Sub Form_Click() a$="MicrosoftVisual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是 A) Microsoft Visual B) Microsoft C) Basic D) 5 (25)下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print "fail" End Select A) excellent B) good C) pass D) fall (26)设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为 A)123456 B)123445 C)5 D)6 (27)在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。 Private Sub Command1_Click() "All Files(*.*) |*.*|Text Files(*.txt)|*.txt MsgBox End Sub 程序运行后,单击命令按钮,将显示一个"打开"对话框,此时在"文件类型"框中显示的是 A) All Files(*.*) B) Text Files(*.txt) C) Batch Files(*.bat) D) All Files(*.*) |Text Files(*.txt) (28)如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的哪个属性 A) Value B) Visible C) Enabled D) Default(29)函数过程Fun1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。 Function Fun1(b As Integer) if _____ Then Fun1=0 Else Fun1=1 End If End Function 使该功能完整,应在空行处填入以下哪条语句 A)b Mod 2<>0 B)b Mod 2=0 C)b / 2=1D)b (30)假定有下表所列的菜单结构: 要求程序运行后,如果单击菜单项"大图标",则在该菜单项前添加一个"√"。以下正确的事件过程是 A) Private Sub bigicon_Click() End SubB) Private Sub bigicon_Click() End Sub C) Private Sub bigicon_Click() End SubD) Private Sub bigicon_Click() End Sub (31)下列对变量的定义中,不能定义a为变体变量的是 A)Dim a As Double B)Dim a As Variant C)Dim a D)a=24 (32)有如下程序: Private Sub Command1_Click()a$="A WORKER IS HERE" x=Len(a$) For i=1 To x - 1 b$=Mid$(a$, i, 3) If b$="WOR" Then S=S + 1 Next Print S End Sub 单击命令按钮,程序运行结果为A) 1 B) 2 C) 3 D) 5 (33)Mid("Hello Everyone",7,3)的执行结果是 A)yon B) every C) Eve D) one (34)在窗体上有一个命令按钮,然后编写如下事件过程。 Private Sub Command1_Click()Dim a(5)As String FOR i=1 To 5 a(i)=Chr(Asc("A")+ (i-1)) Next For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是 A)ABCDE B)1 2 3 4 5 C)abcde D)出错信息 (35)在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click()For i=1 To 4 x=4 For j=1 To 2 x=x+6 Next Next Print x End Sub 程序运行后,单击命令按钮,输出结果是 A)12 B)13 C)16 D)17 二、填空题请将每一个空的正确答案写在答题卡序号的横线上,答在试卷上不给分。(1)测试的目的是暴露错误,评价程序的可靠性;而 【1】 的目的是发现错误的位置并改正错误。 (2)某二叉树中度为2的结点有18个,则该二叉树中有 【2】 个叶子结点。(3)当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行入队运算。这种情况称为 【3】 。(4)在关系模型中,把数据看成一个二维表,每一个二维表称为一个 【4】 。 (5)在计算机软件系统的体系结构中,数据库管理系统位于用户和 【5】 之间。 (6)下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。 例如: a=5 , n=4时,则Sn=5+55+555+5555。请在空白处填入适当的内容,将程序补充完整。 Private Sub Command1_Click()Dim a As Integer, n As Integer, Cout As Integer Dim Sn As Long, Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox("请输入a的值:") n = InputBox("请输入n的值!") Do Tn=Tn * 10 + a Sn=Sn + Tn Cout=Cout + 1 【6】 a, n, Sn End Sub (7)用户可以用 【7】 语句定义自己的数据类型。(8)下列程序运行后的输出结果是 【8】 。 Private Sub f(k,s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Command1_Click()Sum=0 For i=1 To 3 Call f(i,s) Sum=Sum+s Next Print Sum End Sub (9)函数Int(Rnd*10)+10的值为范围是 【9】 。(10)有如下 函数过程: Function gys(By Val x As Integer, ByVal y As Integer) As Integer Do While y<>0 preminder=x / y x=Y y=preminder Loop gys=x End Function 以下是调用该函数的事件过程,该程序的运行结果是 【10】 。 Private Sub Command1_Click Dim a As Integer,b As Integer a=10:b=2 x=gys(a,b) Print x End Sub (11)语句 0 表示 【11】 ; 语句 1 表示 【12】 ;(12)下列程序的功能是:将数据1,2,…,8写入顺序文件中,请补充完整。 Private Sub Form_Click()Dim i As Integer Open ""For Output As #1 For i=1 To 8 � 【13】 � Next Close #1 End Sub (13)下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form Dim Y As Single Open � 【14】 � Y= / 180 For i=1 To 90 (i * Y) (i * Y) � 【15】 � Next i Close #2 End Sub 真题二一、选择题在下列各题的A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确的选项涂写在答题卡相应位置上,答在试卷上不得分。(1)程序流程图中带有箭头的线段表示的是 A)图元关系 B)数据流 C)控制流 D)调用关系 (2)下面不属于软件设计原则的是 A)抽象 B)模块化 C)自底向上 D)信息隐蔽(3)下列选项中,不属于模块间耦合的是 A)数据耦合 B)标记耦合 C)异构耦合 D)公共耦合(4)下列叙述中,不属于软件需求规格说明书的作用的是 A)便于用户、开发人员进行理解和交流 B)反映出用户问题的结构,可以作为软件开发工作的基础和依据 C)作为确认测试和验收的依据 D)便于开发人员进行需求分析 (5)算法的时间复杂度是指 A)执行算法程序所需要的时间 B)算法程序的长度 C)算法执行过程中所需要的基本运算次数 D)算法程序中的指令条数(6)已知数据表A中每个元素距其最终位置不远,为节省时间,应采用的算法是 A)堆排序 B)直接插入排序 C)快速排序 D)B)和C)(7)栈底至栈顶依次存放元素A、B、C、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是 A)ABCED B)DCBEAC)DBCEAD)CDABE (8)数据库设计包括两个方面的设计内容,它们是 A)概念设计和逻辑设计 B)模式设计和内模式设计 C)内模式设计和物理设计 D)结构特性设计和行为特性设计 (9)关系表中的每一横行称为一个 A)元组B)字段C)属性D)码 (10)设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字 (键或码)为 A)课号,成绩 B)学号,成绩 C)学号,课号 D)学号,姓名,成绩(11)下列选项中,不属于模块间耦合的是 A) 数据耦合 B) 同构耦合 C) 异构耦合 D) 公用耦合 (12)设a=5,b=4,c=3,d=2,则表达式3>2*b Or a=c And b<>c Or c>d的值是 A) 1B) TrueC) False D) 2(13)以下合法的变量名是 A)A%B B)Test1 C)1cost D)And (14)下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click()Dim x(10) As Integer,y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i= 1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i= 1 to 5 Print y(i) Next End Sub A) 3 7 11 45 19 B) 19 15 11 7 3 C) 1 3 5 7 9 D) 不确定的值 (15)在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox("请输入日期 (1~31)") t="旅游景点:"& IIf(a>0 And a<=10, "长城","") & IIf(a>10 And a<=20, "故宫","") & IIf(a>20 And a<=31, "颐和园","") End Sub 程序运行后,如果从键盘上输入16,则在文本框中显示的内容是 A) 旅游景点:长城故宫 B) 旅游景点:长城颐和园 C) 旅游景点:颐和园 D) 旅游景点:故宫 (16)若要求从文本框中输入密码时在文本框中只显示"*"号,则应当在此文本框的属性窗口中设置 A)Text属性值为* B)Caption属性值为* C)password属性值为空 D)Passwordchar属性值为* (17)编写如下两个事件过程: 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"键,则程序输出的结果是 A)AA B)aA C)Aa D)aa (18)单击滚动条的滚动箭头时,产生的事件是 A)Click B)Scroll C)Change D)Move (19)当把框架的什么属性设置为False时,其标题会变灰,框架中所有的对象均被屏蔽 A) NameB) EnabledC) CaptionD) Visible (20)要获得当前驱动器应使用驱动器列表框的属性是 A) Path B) DriveC) DirD) Pattern (21)在Visual Basic中,组合框是文本框和下列哪一项的特性的组合 A) 复选框B) 标签C) 列表框D) 目录列表框(22)计时器文件设置时间间隔的属性是 A)Enabeld B) IndexC)TagD) Interval (23)要使文本框获得输入焦点,则应采用文本框控件的 A)GotFocus方法 B)LostFocus方法 C)KeyPress方法 D)SetFocus方法 (24)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在______处应填入的内容为 A) Left(c,n)B) Right(c,n) C) Mid(c,n,1)D) Mid(c,n,n) (25)阅读程序: Function Fun(a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Command1_Click()Dim a As Integer a=2 For i=1 To 2 Print Fun(a); Next End Sub 运行上面的程序,单击命令按钮,输出结果为 A)8 16B)9 18C)10 20D)7 14 (26)下列程序段的执行结果为 For X=5 To 1 Step -1 For Y=1 To 6-x Print Tab(Y+5); "*"; Next Print Next A) ***** **** *** ** * B) ***** **** *** ** * C) * ** *** **** ***** D) * *** ***** ******* ********* (27)下列各选项说法错误的一项是 A) 文件对话框可分为两种,即打开(Open) 文件对话框和保存(Save As) 文件对话框 B) 通用对话框的Name属性的默认值为CommonDialogX,此外,每种对话框都有自己的默认标题 C) 打开文件对话框可以让用户指定一个文件,由程序使用;而用保存文件对话框可以指定一个文件,并以这个文件名保存当前文件 D) DefaultEXT属性和DialogTitle属性都是打开对话框的属性,但非保存对话框的属性 下列各选项说法错误的一项是 (28)以下语句中那句可以选择指定的表项或取消已选择的表项 A) 列表框.Selected(索引值) B) 列表框.Selected(索引值)=True|False C) 列表框.Selected D) 列表框.Selected=True|False (29) Sub过程与Function过程最根本的区别是 A) Sub过程可以用Call语句直接使用过程名调用,而Function过程不可以 B) Function过程可以有形参,Sub过程不可以 C) Sub过程不能返回值,而Function过程能返回值 D) 两种过程参数的传递方式不同 (30)要使菜单项MenuOne在程序运行时失效,使用的语句是 A) B) C) D) (31)设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组说法错误的是 A) 命令按钮的所有Caption属性都是Command1 B) 在代码中访问任意一个命令按钮只需使用名称Command1 C) 命令按钮的大小都相同 D) 命令按钮共享相同的事件过程(32)以下关系表达式中,其值为假的是 A)"XYZ"< "XYz" B)"VisualBasic"="visualbasic" C)"the"<>"there" D)"Integer">"Int" (33)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()c="ABCD" For n=1 To 4 Print Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在处应填入的内容为 A) Left(c,n)B) Right(c,n) C) Mid(c,n,1)D) Mid(c,n,n) (34)阅读程序: Option Base 1 Dim arr()As Integer Private Sub Form_Click()Dim i As Integer, j As Integer ReDim arr(3,2) For i = 1 To 3 For j = 1 To 2 arr(i,j)=i*2+j Next Next ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next Print arr(3,2)+arr(3,4) End Sub 程序运行后,单击窗体,输出结果为 A) 21 B) 13C) 8D) 25 (35)下列程序段的执行结果为 a=3:b=1 For i=1 To 3 f=a + b:a=b:b=f Print f Next I A) 4 3 6B) 4 5 9C) 6 3 4D) 7 2 8 二、填空题请将每一个空的正确答案写在答题卡序号的横线上,答在试卷上不给分。(1)测试用例包括输入值集和 【1】 值集。(2)在树形结构中,树根结点没有 【2】 。(3)数据结构分为逻辑结构与存储结构,线性链表属于 【3】 。(4)一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体"项目主管"与实体"项目"的联系属于 【4】 的联系。(5)数据库设计分为以下6个设计阶段:需求分析阶段、 【5】 、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。 (6)设有如下程序: Private Sub Form_Click()Dim a As Integer, s As Integer n=8:s=0 Do s=s+n:n=n-1 Loop While n>0 Print s End Sub 以上程序的功能是计算1到8的和。程序运行后,单击窗体,输出结果为 � 【6】 �。 (7)如果不指明函数过程参数的类型,则该参数的数据类型为 【7】 。(8)下面运行程序后,单击命令按钮,输出的结果是 � 【8】 � 。 Private Sub Command1_Click()Dim a%(1 To 5),i%, s# For i=1 To 5 a(i)=i Next s=Fun(a) Print "s="; s; End Sub Function Fun(a() As Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) t=t*a(i) Next Fun=t End Function(9)在Visual Basic的立即窗口内输入以下语句 X=97
优质考试培训问答知识库