Vb资料.docx

1、Vb资料试卷一用鼠标选中某菜单控件时,触发Click事件;而用键盘选中该菜单控件时,触发KeyPress事件.答案：N第5题 （1.0分） 题号:309所有的对象都有caption 属性.答案：N第6题 （1.0分） 题号:280方法是VB 对象可以响应的用户操作.答案：N第7题 （1.0分） 题号:224Visual Basic程序的运行,仅能从某一窗体启动,如Form1窗体.答案：N第8题 （1.0分） 题号:251Image控件使用的资源比Picture控件使用的多.答案：N第9题 （1.0分） 题号:256TextBox与Label有许多共同特点,它们都能显示和输入文本.答案：N第10

2、题 （1.0分） 题号:221VB是一种面向对象的程序设计语言.答案：Y三、单项选择 共10题 （共计10分）第2题 （1.0分） 题号:872用键盘的光标键选中某一菜单项,并按回车将触发菜单的()的事件.A:KeyPressB:KeyDownC:ClickD:KeyUp答案：C第3题 （1.0分） 题号:224()对象具有Clear方法.A:图片框B:窗体C:复选框D:列表框答案：D第4题 （1.0分） 题号:871要想清除文本框中的内容则可利用()进行.A:CaptionB:TextC:ClearD:Cls答案：B第5题 （1.0分） 题号:360下列表达式中,其值为0的是().A:7/9

3、B:7 mod 15C:79D:15 mod 9答案：C第6题 （1.0分） 题号:222()对象不具有Caption属性.A:LabelB:OptionC:FormD:Timer答案：D第7题 （1.0分） 题号:822以下()对象不具有Clear方法.A:列表框B:组合框C:剪贴板D:图片框答案：D四、多项选择 共5题 （共计10分）第1题 （2.0分） 题号:276下列语句哪些是错误的语句（）？A:Const Imax As Integer=&o155B:Const _Ga As String=abcC:Dim aa,bb As Integer,cc As StringD:yy=8,uu

4、=9答案：BD第2题 （1.0分） 题号:367如果没有使用Public、Private或者Friend,Sub过程在缺省情况下是公用的、答案：N第4题 （1.0分） 题号:369如果在过程调用时使用按值传递参数,则在被调过程中可以改变实参的值.答案：N第5题 （1.0分） 题号:326用鼠标选中某菜单控件时,触发Click事件;而用键盘选中该菜单控件时,触发KeyPress事件.答案：N第8题 （1.0分） 题号:315图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值.第10题 （1.0分） 题号:827以下控件中不属于容器的是().A:

5、Form控件B:PictureBoxC:ImageD:Frame答案：C第1题 （2.0分） 题号:277下列说法哪些是正确的（）？A:不能对符号常量重新赋值B:Label控件用来在窗体中显示文本，其中的文本用户不能直接修改C:TAB(N)函数用于在输出表达式前将输出点定位在第N-1个字符位置D:格式输出函数Format()可以使数值、日期或字符串按用户指定的格式输出答案：ABD第2题 （2.0分） 题号:281窗体也是一个对象，它具有（）的特征。A:属性B:过程C:事件D:方法答案：ACD第3题 （2.0分） 题号:279下面有关数组的说法那些是错误的（）？A:数组存放的是具有相同数据类型的

6、多个数据B:数组的下标不允许是常数C:DIM语句声明的数组把数组中的全部数组都初始化为逻辑型D:多维数组中每一维的大小为上界-下界；数组的大小为每一维大小的乘积E:动态数组是指在声明时没有给出数组的大小，当要使用数组时，再决定数组的大小答案：BCD第4题 （2.0分） 题号:278下列哪些标识符不符合变量的命名规则（）？A:hyuB:$abcC:4wD:y.uE:ty%F:_n8答案：BCDEF第5题 （2.0分） 题号:283要选择列表框List1的第6项，可以使用语句（）。A:List1.Selected(6)=TrueB:List1.Selected(5)=TrueC:List1.Lis

7、tIndex=5D:List1.Selected=5答案：BC功能：以下程序段用于输出杨辉三角：结果样式如图1-Private Sub Form_Click()Const n = 10Dim arr(n, n) As IntegerFor I = 1 To n arr(I, I) = 1*SPACE* 【?】Next IFor I = 3 To n For j = 2 To I - 1*SPACE* arr(i, j) =【?】 Next jNext IFor I = 1 To n For j = 1 To I*SPACE* ? 【?】& ; Next j PrintNext IEnd Sub

8、答案：=(答案1)=arr(i, 1) = 1=(答案2)= arr(i - 1, j - 1) + arr(i - 1, j)=(答案3)=arr(i, j)=或=str(arr(i, j)六、程序改错 共1题 （共计10分）第1题 （10.0分） 题号:142-【程序改错】-题目：程序功能根据输入的学习成绩,分别显示优秀 (90分以上), 良好(75分以上),及格(60分以上) 不及格四个等级.-Option ExplicitPrivate Sub Form_Click()ClsDim i As Integeri = InputBox(请输入学习成绩)Select Case i*FOUND

9、* Case 0 i 100 ,is0 =或= case is100=(答案2)=Case 90 to 100=(答案3)=Case else七、程序设计 共2题 （共计20分）第1题 （10.0分） 题号:496-【程序设计】-题目： (事件)单击窗体。 (响应)求1-100中为5或7的倍数的和。请将结果 输出到窗体上,并存入所给变量SUM中。 使用while.wend语句完成程序-答案：-Dim i As Integer i = 1 While i = 100 If i Mod 5 = 0 Or i Mod 7 = 0 Then Sum = Sum + i End If i = i + 1

10、WendPrint Sum下列说法哪些是正确的（）？A:不能对符号常量重新赋值B:Label控件用来在窗体中显示文本，其中的文本用户不能直接修改C:TAB(N)函数用于在输出表达式前将输出点定位在第N-1个字符位置D:格式输出函数Format()可以使数值、日期或字符串按用户指定的格式输出答案：ABD五、程序填空 共1题 （共计10分）第1题 （10.0分） 题号:64-【程序填空】-利用自定义类型数组，编写如下程序：模拟实现数据库记录输入、显示与查询功能。程序运行后,单击“新增”按钮，将文本框中的学生信息加到数组中；单击“前一个”或“后一个”按钮，显示当前元素的前或后一个记录；单击“最高”按

11、钮，则显示最高分的记录。并随时显示数组中输入的记录数与当前数组元素的位置。-Option Base 1Dim n%, i%*SPACE*Dim stud(1 To 100) As 【?】Private Sub Command1_Click(Index As Integer)*SPACE*Select Case 【?】 Case 0 新增 If n 1 Then i = i - 1 With stud(i) Text1 = .Name Text2 = .Special Text3 = .Total End With Case 2 后一条 If i Max Then Max = stud(j).T

12、otal maxi = j End If Next j With stud(maxi) Text1 = .Name Text2 = .Special Text3 = .Total End With i = maxiEnd SelectLabel5 = i & / & n 显示当前位置和总数End Sub答案：=(答案1)=StudType=(答案2)=Index六、程序改错 共1题 （共计10分）第1题 （10.0分） 题号:137-【程序改错】-题目：求s=72+102+132+832的值。-Option ExplicitPrivate Sub Form_Click()ClsDim s As

13、 LongDim i As Integer*FOUND*s = 1*FOUND*For i = 72 To 832s = s + i*FOUND*loop 30Print sEnd Sub答案：=(答案1)=s =0=(答案2)=For i = 72 To 832 step 30=(答案3)=Next i=或=Next七、程序设计 共2题 （共计20分）第1题 （10.0分） 题号:485-【程序设计】-题目：(事件)单击窗体。 (响应)我国现有人口为13亿，设年增长率为1%， 计算多少年后增加到20亿。并将结果输出 在窗体上。将结果存入变量year中。 使用do while .loop语句完成程序。-答案：-dim p as doubledim r as singledim n as integerp=1300000000r=0.01do while p2000000000 p=p+p*r n=n+1loopprint n=,nyear=n