1五邑大学《计算机语言与程序设计》08-09年试卷.doc

08-09-2计算机语言与程序设计试卷_A卷一、选择题（2分/题，15小题，共30分）1.在VB6.0集成开发环境中不能完成的功能是（）。A输入编辑源程序B编译生成可执行程序C调试运行程序D自动查找并改正程序中的错误2. 在一行内写多条语句时，语句之间要用某个符号分隔，这个符号是（）。A逗号B句号C顿号D冒号3. 下面关于对象的描述中，错误的是（）。A对象就是自定义结构变量B对象代表正在创建的系统中的一个实体C对象是一个特征和操作的封装体D对象之间的信息传递是通过消息进行的4. 当程序运行时，系统自动执行启动窗体的（）事件过程。ALoadBClickCUnloadDGotFocus5、 要使某控件在运行是不可显示，应对（）属性进行设置。AEnabledBVisibleCBackColorDCaption6. 下面（）是合法的单精度型变量。Anum!(单精度)Bsum%（整型）Cxinte$（字符串）Dmm#（双精度）7. 函数Left(“Guangdong”,5)返回的值是（）。A“gdong”B“Guang”C“Guan”D“g”8、 MsgBox函数返回值的类型是（）。A整型数值B字符串C变体D数值或字符串9. 下面正确的赋值语句是（）。Ax+y=30 Ba()=i3+4 Cy=x+30 D3y=x10. 为了给x,y,z三个变量赋初值1，下面正确的赋值语句是（用冒号隔开）。Ax=1:y=1:z=1Bx=1,y=1,z=1Cx=y=z=1Dxyz=111. 能正确表示关系表达20x50的VB表达式是（）。A20=x=20Andx=20Orx50Dx20Andx100写成VB关系或逻辑表达式。6.在VB中将PI声明为常量3.1415，使用的语句是ConstPI=3.1415。7.把“变量x和变量y均大于变量z”用VB表达式描述是。8.在表示整型数据时，可作为整型数据尾部符号的是。9.用随机函数产生一个两位的随机正整数的VB表达式是。10.VB是一种结构化的程序设计语言，有三种基本的控制结构，分别是、选择结构和。11.下面的程序段合计显示_个“*”。Fori=2To6Forj=1To4Print”*”NextjNexti12.使用动态数组时，要用到_ReDim_语句对其进行重定义，若希望重定义的数组保留重定义操作前的所有元素赋值，则应使用保留字Peserve。13.要获得数组的上界值通过_函数，获得数组的下界值通过_函数。14.按照如下要求写函数过程定义的首语句，即：Function_MyF_(a%,b!c()asstring)_。要求：形参有3个，从第1个到第3个依次分别是a,b,c,其中a为整型，b为单精度浮点型，c为一维整型数组，函数名为MyF，函数返回值为整型。15. 计算机系统中的文件按照访问模式可分为_随机文件_、_顺序文件_和二进制文件。三、程序填空（2.5分/空，2空/小题，4小题，共20分）1.随机产生1-100之间（含1和100）的10个整数，并在图形框中显示出来。PrivateSubPicture1_Click()Dima(1To10)AsIntegerDimi%RandomizeFori=1To10a(i)=NextiPicture1.PrintEndSub2.求所有的水仙花数。所谓水仙花数是指一个3位数，其各位数字立方和等于该数字本身。例153就是水仙花数，因为153=13+53+33。Fori=百位数Forj=0To9 十位数Fork=0To9个位数s=100*i+10*j+kIf_ThenPrints;NextkNextjNexti3.设计一个选课界面如右图所示。它包含2个列表框，当单击左边某课程名后，将该课程加入到右边列表框中，并在左边列表框中删除该课程，选课数不能超过5门。PrivateSubList1_Click()IfList2.ListCount5ThenList2.AddItemList1.List1.ListIndexElseMsgBox超过5门课程，不能再选,vbOKOnlyEndIfEndSub4.编写一子过程，求一维数组中的最大值。SubprocMax(ByRefa%(),ByRefmax%)Dimi%max=a(Lbound(a)Fori=Lbound(a)+1ToIfmaxa(i)ThenNextiEndSub四、程序阅读（5分/题，4小题，共20分）1.有如下事件过程：PrivateSubForm_Click()a=10b=5c=3IfacThena=a-2Printa,b,cEndSub问题：（1） 语句“Printa,b,c”的功能是：显示a,b,c的值。并分区显示。（2）程序运行后，单击窗体，输出结果是：8，5，3。2.有如下事件过程：PrivateSubForm_Click()Form1.ClsForA=1To5PrintSpace(5-A);String(A,*)Space的意思空出的个数NextAEndSub问题：（1）语句“Form1.Cls”的功能是：清除窗体上或图片框上在运行Print方法时显示的文本或用绘图方式所产生的图形。（2）程序运行后，单击窗体，输出的图案是：3.有如下事件过程：PrivateSubForm_Click()DimnAsIntegerDimsAsIntegern=1s=0DoWhilen=3n=n+2s=s+nLoopPrintsEndSub问题：（1） 语句“DimnAsInteger”的功能是：声明变量n为整型变量。（2） 程序运行后，单击窗体，输出结果是：。4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下函数过程和命令按钮Command1的事件过程： Private Function f (m As Integer ) As Integer If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer，s As Integer s = 0 For i = 1 To 5 s = s + f ( i ) Next i Print s End Sub 问题： （1）语句“Private Function f (m As Integer ) As Integer”的功能是： 定义一个名为f 的函数，其形参m是整型变量，函数返回值也是整型 。 （2）程序运行后，单击命令按钮，在窗体上显示的是： 9 。 五、程序设计（10分/题，1小题，共10分）1. 编写一个过程，要求使用选择法对一组整数数据进行降序排序。过程名为Sort，需要排序的数据通过数组从外部传入。参考答案一、选择题（2分/题，15小题，共30分）1.D 2.D 3.A 4.A 5.B 6.A 7.B 8.A 9.C 10.A 11.B 12.A 13.D 14.D 15.A二、填空题（1分/空，20空，共20分）1.解释方式、编译方式2.属性、方法3.24.15.(T+3V-2)and(T+V100)6.ConstPI=3.14157.xzAndyz8.%9.Int(Rnd*90+10)10.顺序结构、循环结构11.2012.ReDim,Preserve13.Ubound,LBound14.MyF(a%,b!,c()asInteger)AsInteger15.顺序文件、随机文件3、 程序填空（2.5分/空，2空/小题，4小题，共20分）1.Int(Rnd*100+1) Picture1.Printa(i);2.1To9 s=i*i*i+j*j*j+k*k*k3.List1.Text RemoveItem4.UBound(a) max=a(i)四、程序阅读（5分/题，4小题，共20分）1.（1）显示a,b,c的值，且分区显示。（2）8532. （1） 清除窗体Form1中的内容。（2） * * * * *3.（1） 声明变量n为整型变量。（2）84. （1）定义一个名为f的函数，其形参m是整型变量，函数返回值也是整型。（2）9五、程序设计（10分/题，1小题，共10分）1.编写一个过程，要求使用选择法对一组整数数据进行降序排序。过程名为Sort，需要排序的数据通过数组从外部传入。参考程序如下：PublicSubSort(ByRefa