最新vb程序设计试题含答案资料Word下载.docx

1、7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是（ D ）（A）递归结构，选择结构，循环结构 （B）选择结构，过程结构，顺序结构（C）过程结构，输入、输出结构，转向结构 （D）选择结构，循环结构，顺序结构8.给变量赋值a=123+MID（“123456”,3,2），a变量中的值是（ D ）（A）“12334” （B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是（ D ）（A）If sex=“男”And age40 And InStr（duty,“教授”）0 Then n=n+1（B）If sex

2、=“男”And age40 And （duty=“教授”Or duty=“副教授”） Then n=n+1（C）If sex=“男”And age40 And Right（duty,2）= “教授” Then n=n+1（D）If sex=“男”And age40 And duty=“教授”And duty=“副教授” Then n=n+110.若要清除列表框的所有内容，可用来实现的方法是（ C ）（A）RemoveItem （B）Cls（C）Clear （D）以上均不可以11.要使时钟控件Timer1的Timer事件不起作用，以下正确的语句是（ B ）（A）Timer1.Visible=Fa

3、lse （B）Timer1.Enabled=False（A）Timer1.Interval=1000 （D）Timer1.Index=012.引用列表框（List1）最后一个数据项应使用的语（ B ）（A）List1.List（List1.ListCount） （B）List1.List（List1.ListCount-1）（C）List1.List（ListCount） （D）List1.List（ListCount-1）13.如下数组声明语句，正确的是（ B ）（A）Dim a3,4As Integer （B）Dim a（3,4）As Integer（C）Dim a（n,n） As Int

4、eger （D）Dim a（3,4）As Integer14.下面子过程语句说明合法的是（A、D ）（A）Sub f1（ByVal n%） （B）Sub f1（n%）As Integer （C）Function f1%（f1%） （D）Function f1（ByVal n%）15.假定有如下的命令按钮（名称为Command1）事件过程： Private Sub Command1_Click（）x=InputBox（输入：，输入整数）MsgBox输入的数据是：”，”输入数据：+xEnd Sub16.程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（ A ）（A）x的值是

5、数值10 （B）输入对话框的标题是“输入整数”（C）信息框的标题是“输入数据：10” （D）信息框中显示的是“输入的数据是：”二、填空题（每题2分，共20分）1、当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择 视图 菜单的 工具箱 选项，使“工具箱”窗口显示。2、VB是一种面向 对象 的程序设计语言，采用了 事件驱动 编程机制。3、Int（-5.5）、Int（5.5）、Fix（-5.5）、Round（-5.5）的值分别是 -6 、 5 、 -5 、 -6 。4、表达式Ucase（Mid（“abcdefgh”,3,4）的值是 CDEF 。5、将文本框的ScrollBar的属性设置为2（

6、有垂直滚动条），但没有垂直滚动条显示，原因是没有将 multline 属性设置为True。6、VB的注释语句采用 字符开头，若一行上书写多个语句，则各语句间用 ： 字符分隔。7、列表框中项目的序号是从 0 开始的。8、列表框中的 list 和 selected 属性是数组。9、如果要每隔15秒产生一个计时器事件，则Interval属性应设置为 15000 。10、在VB中，事件过程名由 sub 和 function 构成。三、请完成下列的程序（共15分）1、以下程序的功能是：生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。请填空。PrivateSubCommand

7、l_C1ick（）Fori1To20xInt（_ rnd*101+200 _）If_ x mod 5=0 _ ThenPrintxSS十xEndIfNextiSum：SSub （5分）2、某次大奖赛，有7个评委打分，如下程序对一名参赛者，输入7个评委的打分分数，去掉一个最高分和一个最低分后，求出平均分为该参赛者的得分。请在下划线处填入相应的内容。Private Sub Command1_Click（）Dim mark!,aver!I%,max1!min1!aver=0For i=1 To 7Mark=InputBox（“输入第”&i&“位评委的打分”）If i=1 ThenMax1=mark:

8、 min1=mark ElseIf markmin1 Then Min1=mark ElseIf markmax1 Then Max1=mark End If Aver=aver+mark Next iAver= Print aver 四、操作题（第一题15分，第二小题20分，共计35分）提示：请同学们在E盘下面建立一个以自己的名字和学号命名的文件夹，然后将自己设计的窗体保存在这个文件夹下面即可，工程文件可以不保存，但窗体一定要保存1、斐波纳契（Fibonacci）数列的第一项是1.第二项是1，以后各项都是前两项的和。试用递归算法编写一个程序，求斐波纳契数列第N项的值。（15分）2、设计一个窗

9、体，在窗体中设置3个标签、1个文本框、2个单选按钮、3个复选按钮和两个命令按钮。在文本框中输入某人的姓名，并在性别和爱好项目中进行选择，单击“显示资料”命令按钮，将个人资料显示出来；单击“充填”按钮，将文本内容清楚，选项回复到初始状态（20分） 第二套试题1. 在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体窗口、属性窗口外，必不可少的窗口是（ C ）（A）窗体布局窗口 （B）立即窗口 （C）代码窗口 （D）监视窗口2表达式16/4-25*8/4MOD52的值为 （ B ）（A）14 （B）4 （C）20 （D）23Int（198.555*100+0.5）/100的值为 （ C ）（A）

10、198 （B）199.6 （C）198.56 （D）2004已知A$=“12345678”，则表达式Val（Left$（A $,4）+Mid$（a $,4,2）的值为 （ B ）（A）123456 （B）123445 （C）8 （D）65表达式DateDiff（“y”,#12/30/1999#,#1/13/2000#）的结果是 （ C ）注：一个Y表示相隔天数，四个Y表示相隔年数。（A）1 （B）11 （C）14 （D）996.若要使命令按钮不可操作，要设置的属性是 （ A ）（A）Enabled （B）Visible （C）BackCol （D）Caption7.文本框所没有的属性是 （ D

11、 ）（A）Enabled （B）Visible （C）BackColor （D）Caption8.要设置命令按钮的背景图形，必须设置的两个属性是 （ A ）（A）Style和Picture （B）Style和Icon （C）Caption和Picture （D）Value和Icon9.下面正确的赋值语句是 （ C ）（A）x+y=30 （B）y=*r*r （C）y=x+30 （D）3y=x10.下面程序段求两个数中的大数，不正确的是 （ D ）（A）Max=IIf（xy,x,y） （B）If xyThen Max=x Else Max=y （C）Max=x （D）If y=x Then Max

12、=yIf yx Then Max=y Max=x11.以下关于Visual Basic特点的叙述中，错误的是（ D）（A） Visual Basic是采用事件驱动编程机制的语言（B） Visual Basic程序既可以编译运行，也可以解释运行（C） 构成Visual Basic程序的多个过程没有固定的执行顺序（D） Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构12.复选框的Value属性为1时，表示 （ B ）（A）复选框未被选中 （B）复选框被选中（C）复选框内有灰色的勾 （D）复选框操作有错误13.在下列关于键盘事件的说法中，正确的是 （D）（A）按下键盘上的

13、任意一个键都会引发KeyPress事件（B）大键盘上的“1”键和数字键盘的“1”键的KeyCode码相同（C）KeyDown和KeyUp的事件过程中有KeyAscii参数（D）大键盘上的“4”键的上档字符是“$”，当同时按下Shift和大键盘上的“4”键时 14.如果列表框（List1）中没有被选定的项目，则执行List1.RemoveItem List1.ListIndex 语句的结果是 （ A ）（A）移去第一项 （B）移去最后一项 （C） 移去最后加入列表的一项 （D）以上都不对15.设有如下语句：Dim a，b As Integerc=VisualBasicd=#7202005#以下关于这段代码的叙述中，错误的是 （ A ）（A） a被定义为Integer类型变量 （B） b被定义为Integer类型变量（C）c中的数据是字符串 （D）d中的数据是日期类型1 在VB中，要显示程序代码，必须在 代码