资源描述
、选择题1、程序流程图中带有箭头的线段表示的是C)控制流D)调用关系C)模块化D)逐步求精C)低内聚高耦合D)高内聚高耦合A)图元关系B )数据流2、结构化程序设计的基本原则不包括A)多态性B )自顶向下3、软件设计中模块划分应遵循的准则是A)低内聚低耦合B)高内聚低耦合4、在软件开发中,需求分析阶段产生的主要文档是C )概要设计说明书 D )集成测试计划)算法程序所处理的数据量是有限的A)可行性分析报告B )软件需求规格说明书5、算法的有穷性是指A)算法程序的运行时间是有限的BC)算法程序的长度是有限的D )算法只能被有限的用户使用6、 对长度为n的线性表排序,在最坏的情况下,比较次数不是n (n-1)/2的排序方法是A)快速排序B)冒泡排序C)直接插入排序D)堆排序7、下列关于栈的叙述正确的是A)栈按“先进先出”组织数据C)只能在栈底插入数据B)栈按“先进后出”组织数据D)不能删除数据&在数据库设计中,将 E R图转换成关系数据模型的过程属于A)需求分析阶段B )概念设计阶段9、有三个关系R、S和T如下:RC )逻辑设计阶段D )物理设计阶段TBCDa0k1B1n1BCDf3h2a0k1n2x1BCDa0k1由关系R和S通过运算得到关系 T,则所使用的运算为A)并B )自然连接 C )笛卡尔积D)交10、设有表示学生选课的三张表,学生S (学号,姓名,性别,年龄,身份证号),课程(课号,课名),选课SC (学号,课号,成绩)A)课号,成绩 B )学号,成绩 11、以下叙述中错误的是A)标准模块文件的扩展名是.bas 文件,则表SC的关键字(键或码)为C )学号,课号D)学号,姓名,成绩B)标准模块文件是纯代码D )在标准模块中不能定义C)在标准模块中声明的全局变量可以在整个工程中使用过程12、在Visual Basic 中,表达式 3* 25 Mod 3 的值是A)1B)0C)3D)出现错误提示13、以下选项中,不合法的Visual Basic变量名是End Sub属性设置为B)按下的是哪个数字键D)按下的是哪个鼠标键程序运行后,当单击滚动条两端的箭头时, 下面能够实现上述操作的事件过程是B)Private SubPrintD)Private SubPrintTrue ,则下面可导致按钮的Click事件过B )按键盘上的 Esc 键D)用鼠标右键双击此按钮A) Private Sub Timer1_Timer()B) Private Sub Timer1_Timer()A) a5b B ) _xyz C ) a_bD)andif14、以下数组定义语句中,错误的是A) Static a (10) As Integer B) Dim c (3, 1 to 4)C) Dim d (-10)D) Dim b (0 to 5, 1 to 3) As Integer15、 现有语句:y=llf(x0, x Mod 3, 0),设 x=10,贝U y 的值是A)0B)1C)3D)语句有错16、 为了使文本框同时具有垂直和水平滚动条,应先把MultiLine 属性设置为 True ,然后 再把 Scrollbars 属性设置为A)0B)1C)2D)317、文本框 Text1的KeyDown事件过程如下:Private SubText1_ KeyDown(KeyCode As lnteger, Shift As lnteger)End Sub其中参数 KeyCode 的值表示的是发生此事件时A)是否按下了 Alt键或Ctrl键C)所按的键盘键的键码18、 窗体上有一个名称为Hscroll1 的滚动条, 立即在窗体上显示滚动框的位置(即刻度值)A ) Private Sub Hscroll1_Changc() Hsctroll1_Change()PrintHScroll1.ValueHScroll1.SmallChangeEnd SubEnd SubC)Private Sub HScroll1_Scroll()HScroll1_Scroll()PrintHScroll1.ValueHScroll1.SmallChangeEnd Sub19、若已把一个命令按钮的 Default 程被调用的操作是A)用鼠标右键单击此按钮C)按键盘上的回车键20、要使两个单选按钮属于同一个框架,正确的操作是A) 先画一个框架,再在框架中画两个单选按钮B) 先画一个框架,再在框架外画两个单选按钮,然后把单远按钮拖到框架中C) 先画两个单选按钮,再画框架将单选按钮框起来D) 以上三种方法都正确21、能够存放组合框的所有项目内容的属性是A) Caption B)Text C)List D)Selected22、设窗体上有一个标签 Labell 和一个计时器 Timer1 , Timer1 的 lnterval 属性被设置为 1000, Enabled 属性被设置为 True 。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是Labell.Capti on=TrueEnd SubLabell.Captio n=Time$End SubC) Private Sub Timer1_Timer()Labell.I nterval=1Timer1 .In tervalEnd SubNext kD) Private Sub Timer1_Timer()Label1.Capti on=TimerFor k = l ToEnd Sub23、设有如图所示窗体和以下程序:Private Sub Comma nd1_Click()Textl.Text= “ Visual Basic ”End SubPrivate Sub Text1_LostFocus()If Text1.Text “ BASIC ThenText1.Text= ”Text1.SetFocusEnd IfEnd Sub程序运行时,在 Text1文件框中输入Basic ” (如图所示),然后单击Comma nd按钮,则产 生的结果是A)文本框中无内容,焦点在文本框中B )文本框中为“ Basic ” ,焦点在文本框中C) 文本框中为Basic ” ,焦点的按钮上 D )文本框中为Visual Basic ” ,焦点的 按钮上24、窗体上有一个名称为 Comma nd的命令按钮,其事件过程如下:Private Sub Comma nd1_Click()x= “ VisualBasicProgrammi ng ”a=Right(x,11)b=Mid(x,7,5)C=Msgbox(a, , b)End Sub运行程序后单击命令按钮,以下叙述中错误的是A)信息框的标题是 Basic B)信息框中的提示信息是Programmi ngC) C的值是函数的返回值D) MsgBox的使用格式有错25、 设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件 Module1.bas ,两个窗体上分别只有一个名称Comma nd的命令按钮。Form1的代码如下:Public X As In tegerPrivate Sub Form_load()x=1y=5End SubPrivate Sub Comma nd1_Click()Form2.ShowEnd SubForm2的代码如下:Private Sub Comma nd1_Ciick()Print Form1.x,yEnd SubModule1的代码如下:Public y As In teger运行以上程序,单击Forml的命令按钮 Command,1则显示Form2;再单击Form2上的命令按钮Command,1则窗体上显示的是A)15B)05C)00D)程序有错26、 窗体上有一个名称Textl的文本框,一个名称为Comma nd的命令按钮。窗体文件的程序如下:Private Type xa As In tegerb AS In tegerEnd TypePrivate Sub Comma nd1_Click()Dim y As xy.a = In putBox(”)If y.a2=y.a/2 Theny.b=y.a*y.aElsey.b = Fix(y.a/2)End IfText1.Text=y.bEnd Sub对以上程序,下列叙述中错误的是A) x是用户定义的类型B ) InputBox函数弹出的对话框中没有提示信息C) 若输入的是偶数,y.b的值为该偶数的平方D) Fix(y.a/2) 把y.a/2的小数部分四舍五入,转换为整数返回27、 窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数Commandl,其下标从左到右分别为0、1、2、3,窗体外观如图所示。命令按钮的事件过程如下:Private Sub Comma nd1_Click(l ndex As In teger)Select Case In dexCase 0CDl.Actio n=1Case 1CDl.ShowSaveCase 2CDl.Actio n=5Case 3EndEnd SelectEnd Sub对上述程序,下列叙述中错误的是A)单击“打开”按钮,显示打开文件的对话框B) 单击“保存”按钮,显示保存文件的对话框C) 单击“打印”按钮,能够设置打印选项,并执行打印操作D) 单击“退出”按钮,结束程序的运行28、窗体上有两个水平滚动条HV HT,还有一个文本框 Textl和一个标题为“计算”的命令按钮Command1并编写了以下程序:Private Sub Comma nd1_ClickOCall Cale (HV.Value, HT.Value)End SubPublic Sub Cale(x AS In teger , y AS In teger)Textl.Text = x* yEnd Sub运行程序,单击“计算”按钮,可根据速度与时间计算出距离,并显示计算结果。对以上程 序,下列叙述中正确的是A) 过程调用语句不对,应为Cale (HV,HT)B) 过程定义语句的形式参数不对,应为Sub Cale(x As Control , y As Control)C) 计算结果在文本框中显示出来D) 程序不能正确运行29、现有如下程序:Private Sub Comma nd1_ Click()S=0For i=1 to 5S=S+f(5+i)NextPrint SEnd SubPublic Function f(x As In teger)If x=10 Thent=x+1Elset=x+2End Iff=tEnd Function运行程序,则窗体上显示的是A) 38B) 49C) 61D) 70。运行程序,并在窗体上单击鼠标右30、窗体上有一个用菜单编辑器设计的菜单(见上图)键,贝y弹出一个快捷菜单,如图所示。以下叙述中错误的A)在设计“粘贴”菜单项时,在菜单编辑器窗口中设置了 “有效”属性(有“V”)B) 菜单中的横线是在该菜单项的标题输入框中输入了一个“”(减号)字符C)在设计“选中”菜单项时,在菜单编辑器窗口中设置了 “复选”属性(有“V”)D)在设计该弹出菜单的主菜单项时,在菜单编辑器窗口中去掉了“可见”前面的“V”31、窗体上有一个名称为 Picturel图片框控件,一个名称 Labell的标签控件。如图所示。 现有如下程序:Public Sub display (x As Con trol)If TypeOf x is Label The nx.Captio n=“计算机等级考试”Elsex.Picture =Loadpicture( “ pic.jpg ”)En dIfEnd SubPrivate Sub Label1_Click()Call display(Label1)End SubPrivate Sub Picture1_Click()Call display(Picture1)End Sub对以上程序,下列叙述中错误的是B)单击图片框,在图片框中显示一幅图片D)单击标签,在标签中显示一串文字Text1的KeyUp的事件过程如下:A)程序运行时会出错C)过程中的X是控件变量32、窗体上有两个名称分别为Text1、Text2的文本框。Private Sub Text1_KeyUp(KeyCode As In teger , shift AS In teger)Dim C AS stri ngTcxt2.Text=Chr(Asc(c)+2)End Sub当向文本框Text1中输入小写字母 a时,文本框Text2中显示的是A)AB) aC)CD)c33、设窗体上有一个文体框Text1和一个命令按钮Command1并有以下事件过程:Private Sub Comma nd1_Click()Dim S As Stri ng , ch As Stri ngS=For k=1 TO Len (Text1) ch = Mid(Text1,k,l) S=ch+SNext kText1.Text=SEnd Sub程序执行时,在文本框中输入“ Basic ” ,然后单击命令按钮,则Text1中显示的是A) Basic B)cisaB C)BASIC D)CISAB34、某人编写了如下程序,用来求10 个整数(整数从键盘输入)中的最大值:Private Sub Command1_Click()Dim a(10) As Integer, max As IntegerFor k=1 TO 10a(K)=InputBox( “输入一个整数”)Next kMax=0For k=1 To 10If a(k) max The nMax = a(k)End IfNext kPrint maxEnd Sub运行程序时发现, 当输入 10个正数时, 可以得到正确结果, 但输入 10 个负数时结果是错误 的,程序需要修改,下面的修改中可以得到正确运行结果的是A) 把 If a(k)max Then 改为 If a(k)max Then B)把 max = a(k) 改为a(k)=maxC)把第 2 个循环语句 For k=1 TO10 改为 For k=2 TO10 D) 把 max=0改为 max = a(10)35、已知在 4 行 3 列的全局数组 score(4,3) 中存放了 4 个学生 3 门课程的考试成绩(均为 整数)。现需要计算每个学生的总分,某人编写程序如下:Option Base 1Private Sub Command1_Click()Dim sum As IntegerSum=0For i=1 To 4For j=1 To 3Sum = sum + score(i,j)Next jPrint 第” &i&”个学生的总分是:” ;sumNext iEnd Sub运行此程序时发现, 除第 1 个人的总分计算正确外, 其他人的总分是错误的。 程序需要修改。 以下修改方案中正确的是A) 把外层循环语句 For i=1 TO 4 改为 For i=1 To 3内层循环语句 For j=1 TO 3改为 For j=1 TO 4B) 把 sum=0移到 For i=1 TO 4和 For j=1 TO 3 之间C )把 sum = sum+score(i,j) 改为 sum=sum+score(j,i)D) 把 sum=sum+score(i,j) 改为 sum=score(i,j)二、填空题( 1 )测试用例包括输入值集和 1值集。(2)深度为 5 的满二叉树有 2个叶子结点。rear=29 (指向队尾元素) ,则该循环队列中共有 3 个元素。( 4)在关系数据库中,用来表示实体之间联系的是4 。5( 5 )在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中 负责数据的模式定义与数据的物理存取构建。(6)设有以下的循环:要求程序运行时执行3 次循环体,请填空。x=1DOx=x+2Print xLoop Until 6(7 )窗体上命令按钮 Comma nd的事件过程如下:Private Sub Command1_Click()Dim total As Integertotal = s(1)+s(2)Print totalEnd SubPrivate Function s(m As Integer) As IntegerStatic x As IntegerFor i =1 To mx=x+1Next iS=xEnd Function运行程序,第3次单击命令按钮 Comma nd时,输出结果为7(8 )在窗体上画一个名称为Comma nd的命令按钮,然后编写如下程序:Option Base lPrivate Sub Command1_Click()Dim a(10) As IntegerFor i=1 To 10a(i)=iNextCall swap (8)For i=1 To 10Print a(i)NextEnd SubSub swap (b() As Integer)n= 9For i=1 To n/2t=b(i)b(i)=b(n)b(n)=t10NextEnd Sub上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a与a(10)的值互换,a(2)与a(9)的值互换,请填空。(9) 在窗体上面一个通用对话框,其名称为Com mon Dialogl,然后画一个命令按钮,并编 写如下事件过程:Private Sub Comma nd1_Click()Commo nDialog1.Filter=“ All Files(*.*)|*.*|Text Files”_& (*.txt)|*.txt|Batch Files(*.bat)|*.bat”Common Dialog1 Filterl ndex=1Com mon dialog1.ShowOpe nMsgBox Com mon Dialog1.File NameEnd Sub程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的 是11;如果在对话框中选择 d盘temp目录下的tel.txt文件,然后单击“确定”按钮,则在MsgBox信息框中显示的提示信息是12。(10) 以下程序的功能是:把程序文件smtext1.txt 的内容全部读入内存,并在文本框Text1 中显示出来。请填空。Private Sub Comma nd1_Click()Dim in Data As StringText1.Text=“”Ope n smtext1.txt ”13 As 14Do While 15In put#2, i nDataText1.Text=Text1.Text& in DataLoopClose #2End SubD c Dr22 7 1 I ( XI3 ft 14I c B A )05 5 11注:第z君题因対出憲不产進,在理解上可畦存枉分歧:如果 滾动条眾有修改其嗽认IVIAXBR性值,程序将不能正确运行, 则答案拘口。二.填空題(1 ) 1 )输阳(2 ) 2 ) 1ft(3) 3 1 24
展开阅读全文