vb程序设计试题(含答案).docx

上传人(卖家):最好的沉淀 文档编号:5731298 上传时间:2023-05-06 格式:DOCX 页数:15 大小:179.25KB
下载 相关 举报
vb程序设计试题(含答案).docx_第1页
第1页 / 共15页
vb程序设计试题(含答案).docx_第2页
第2页 / 共15页
vb程序设计试题(含答案).docx_第3页
第3页 / 共15页
vb程序设计试题(含答案).docx_第4页
第4页 / 共15页
vb程序设计试题(含答案).docx_第5页
第5页 / 共15页
点击查看更多>>
资源描述

1、.第一套试题一、选择题(每题 2 分,共 30 分)1. 在 VB 环境中,工程文件的扩展名是( C )( A) .frm(B) .bas(C).vbp( D).frx2. 下面 4 项中不属于面向对象系统三要素的是( A )(A) )变量(B) 事件(C) 属性(D) )方法、/ 、Mod、* 这 4 个算述运算符中,优先级别最低的是( C )(A) ) (B) /(C) Mod(D) )*4. 要使 Print 方法在 Form_Load 事件中起作用, 要对窗体的 ( C ) 属性进行设置( A) BackColor( C) AutoRedraw(B)ForeColor(D)Captio

2、n5. 不论何控件,共同具有的属性是( B )( A) Text( C) ForeColor(B)Name(D)Caption6. 要使 Form1 窗体的标题栏显示“欢迎使用VB”,以下语句正确的是 ( D )( A) Form1.Caption= “欢迎使用 VB”(B)Form1.Caption= 欢迎使用 VB( C) Form1.Caption= 欢迎使用 VB(D)Form1.Caption= 欢迎使用 VB7. VB 提供了结构化程序设计的3 种基本结构,这 3 种基本结构是 ( D )( A)递归结构,选择结构,循环结构结构( C)过程结构,输入、输出结构,转向结构结构(B)选

3、择结构,过程结构,顺序(D)选择结构,循环结构,顺序8. 给变量赋值 a=123+MID(“123456”,3,2) ,a 变量中的值是 ( D )( A)“12334”(B)123( C) 12334(D)1579. 下面 If 语句统计满足性别为男、 职称为副教授以上、 年龄小于 40 岁条件的人数,不正确的语句是 ( D )(A) ) If sex= “男”And age40 And InStr(duty,“教授”) 0 Then n=n+1(B) ) If sex= “男”And age40 And (duty= “教授”Or duty= “副教授” ) Then n=n+1(C) )

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

5、bled=False(D)Timer1.Index=04. 引用列表框 (List1)最后一个数据项应使用的语 ( B ) (A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1) (C)List1.List(ListCount)(D)List1.List(ListCount-1)5. 如下数组声明语句,正确的是( B )( A) Dim a3,4As Integer( C) Dim a(n,n) As Integer(B)Dim a(3,4)As Integer(D)Dim a(3,4)As Integer6. 下面子过程

6、语句说明合法的是(A、D )( A) Sub f1(ByVal n%)( C) Function f1%(f1%)(B)Sub f1(n%)As Integer(D)Function f1(ByVal n%)7. 假定有如下的命令按钮 ( 名称为 Command1 事) 件过程:Private Sub Command1_Click() x=InputBox( 输入: , 输入整数 )MsgBox输入的数据是:”,”输入数据:+x End Sub8. 程序运行后,单击命令按钮,如果从键盘上输入整数的是( A )10,则以下叙述中错误( A)x 的值是数值 10( C)信息框的标题是“输入数据:1

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

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

9、0x Int(_ rnd*101+200 ) If_ x mod 5=0 Then Print xSS 十 x End If Next iPrint Sum :SEnd Sub(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 Th

10、enMax1=mark: min1=mark ElseIf mark min1 Then Min1=markElseIf markmax1 Then Max1=markEnd If End IfAver=aver+mark Next iAver= Print averEnd Sub四、操作题 ( 第一题 15 分,第二小题 20 分,共计 35 分)提示:请同学们在E 盘下面建立一个以自己的名字和学号命名的文件夹, 然后将自己设计的窗体保存在这个文件夹下面即可,工程文件可以不保存,但窗体一定要保存1、斐波纳契(Fibonacci )数列的第一项是 1. 第二项是 1,以后各项都是前两项的和。试

11、用递归算法编写一个程序,求斐波纳契数列第N 项的值。( 15 分)2、设计一个窗体,在窗体中设置3 个标签、1 个文本框、2 个单选按钮、 3 个复选按钮和两个命令按钮。 在文本框中输入某人的姓名, 并在性别和爱好项目中进 行选择, 单击“显示资料” 命令按钮, 将个人资料显示出来; 单击“充填” 按钮, 将文本内容清楚,选项回复到初始状态(20 分)第二套试题一、选择题(每题 2 分,共 30 分).9. 在 VB 集成环境创建 VB 应用程序时,除了工具箱窗口、窗体窗口、属性窗口外,必不可少的窗口是 ( C )(A) )窗体布局窗口(B) 立即窗口(C) 代码窗口(D) 监视窗口2表达式

12、16/4-25*8/4MOD52 的值为 ( B )( A) 14(B)4(C)20(D)23Int(198.555*100+0.5)/100的值为 ( C )( A) 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)1

13、4(D)9911. 若要使命令按钮不可操作,要设置的属性是( A )(A) ) Enabled(B) Visible(C) ) BackCol(D) Caption12. 文本框所没有的属性是( D )( A) Enabled(B)Visible(C) BackColor(D) ) Caption13. 要设置命令按钮的背景图形,必须设置的两个属性是( A )( A) Style 和 Picture( C) Caption 和 Picture14. 下面正确的赋值语句是( C )(B)Style 和 Icon(D)Value 和 Icon(A) ) x+y=30(B) y= *r*r(C) y

14、=x+30(D) ) 3y=x15. 下面程序段求两个数中的大数,不正确的是( D )( A) Max=IIf(x y,x,y)( C) Max=xIf y x Then Max=y16. 以下关于 Visual Basic(B)If x yThen Max=x Else Max=y(D)If y=x Then Max=y Max=x特点的叙述中,错误的是 ( D)(A) ) Visual Basic(B) ) Visual Basic是采用事件驱动编程机制的语言程序既可以编译运行,也可以解释运行(C) ) 构 成 Visual Basic程序的多个过程没有固定的执行顺序(D) ) Visua

15、l Basic程序不是结构化程序,不具备结构化程序的三种基本结构17. 复选框的 Value 属性为 1 时,表示 ( B )( A)复选框未被选中( C)复选框内有灰色的勾(B)复选框被选中(D)复选框操作有错误18. 在下列关于键盘事件的说法中,正确的是.(D).(A) )按下键盘上的任意一个键都会引发KeyPress 事件(B) )大键盘上的“ 1”键和数字键盘的“ 1”键的 KeyCode 码相同(C) ) KeyDown 和 KeyUp 的事件过程中有 KeyAscii 参数(D) )大键盘上的“ 4”键的上档字符是“ $”,当同时按下 Shift和大键盘上的“ 4”键时10. 如果

16、列表框 (List1)中没有被选定的项目,则执行List1.RemoveItemList1.ListIndex(A) 移去第一项语句的结果是 ( A ) (B)移去最后一项(C) 移去最后加入列表的一项11. 设有如下语句:Dim a,b As Integer c=VisualBasic d=#7202005#(D)以上都不对以下关于这段代码的叙述中,错误的是( A )( A) a 被定为义Integer 类型变量(B) b 被定义为Integer类型变量( C) c 中的数据是字符串(D)d 中的数据是日期类型二、填空题(每题2 分,共 20 分)1. 在 VB 中,要显示程序代码,必须在代

17、码窗口;要设计程序的运行界面,必须在窗体窗口。2. 整型变量x 中存放了一个二位数,要将二位数交换位置,例如,13 变3成1,实现的表达式是x10+(x mod 10)*103. 数学表达式sin15 +-ln(3x) 的 VB 算术表达式s为in(15/180* )+-exp(3*x)。4. 表示 x 是 5 的倍数或是 9 的倍数的逻辑表达式为x mod 5=0or x mod 9=0。5. 在 VB 中,123456&、1.2346D+5 这 2 个常数分别表示long类型。、 double19. 若已建立了 Form1 和 Form2 两个窗体,默认启动窗体为Form1。通过工程属性

18、菜单的启动对象 命令的通用选项卡,可将启动窗体设置为Form2。在程序中若要显示 Form1 窗体,则执行 show语句。20. 文本框 (Text1) 中有选定的文本,行执hellotext1Text1.SelText= Hello 的结果是21. 在程序运行时,如果将框架的enable属性设为False ,则框架的标题呈灰色,表示框架内的所有对象均被屏蔽,不允许用户对其进行。操作.9、声明如下数组: Dim a(3,-2 To 2,5) ,则数组 a 包含的元素的个数为 12012. 赋值语句: a=123&MID(“ 123456”,3,2) 执行后,a 变量中的值是“ 12334”三、

19、请完成下列的程序(共 15 分)1、窗体上有名称分别为 Text1 、Text2 的 2 个文本框, 要求文本框 Text1 中输入的数据小于 500,文本框 Text2 中输入的数据小于 1000,否则重新输入。 为了实现上述功能,请为下列程序编写相应的子过程。Private Sub Text1_LostFocus()Call CheckInput(Text1 End Sub,500)Private Sub Text2_LostFocus()Call CheckInput(Text2 End SubSub CheckInput(t As Control,1000), as integer)I

20、fThenEnd If End Sub Next iEnd Sub (5 分 )2、子过程 MoveStr() 是把字符数组移动 m 个位置,当 Tag 为 True 时左移,将前m 个字符移到字符数组尾,例如,“abcdefghij ”左移 3 个位置后,结果为“ defghijabc ”; 当 Tag 为 False 时右移,将后 m 个字符移到字符数组前,如“ abcdefghij ”右移 3 个位置后,结果为“ hijabcdefg ”。子过程如下:Public Sub MoveStr(a$(),m%,Tag As Boolean) Dim I%,j%,t$If Tag thenFor

21、 I=1 To mt=a(0)For j=0 To ubound(a)-1 A(j)=a(j+1)Next j.A(ubound(a)=t Next IElseFor I=1 To m t=a(ubound(a)For j=Ubound(A) to 1 step -1 A(j)=a(j-1)Next j a(0)=c Next IEnd If End Sub请在程序中下划线处填入相应的内容。四、操作题 ( 第一题 15 分,第二小题 20 分,共计 35 分)提示:请同学们在E 盘下面建立一个以自己的名字和学号命名的文件夹,然后将自己设计的窗体保存在这个文件夹下面即可,工程文件可以不保存, 但

22、窗体一定要保存1、编程实现打印以下图案( 15 分)* * * * * * * * *2、统计学生成绩设计如图所示应用程序,当单击“输入成绩”按钮时,在InputBox 对话框中输入学生人数, 然后在对话框中依次输入不多于人数的数个成绩。再次单击“输入成绩”按钮将追加学生人数和成绩。单击“显示成绩”按钮显示成绩、 平均分和未输入成绩的人数。( 20 分).第三套试题一、选择题(每题 2 分,共 30 分)13. 下面各种高级语言中,不是面向对象程序设计语言的是(C)( A) Visual Basic( B) C+(C) Pascal(D) ) Java2函数 DateAdd(“ m” ,1#1

23、/30/2000#) 语句的结果是 ( A )( A) 00-2-29(B)00-2-28(C)00-2-30(D)00-1-313表达式 LenB(“123 程序设计 ABC”) 的值是 (C)( A) 10(B)14(C)20(D)1722. 当文本框的 ScrollBars属性设置了非零值,没有效果,其原因是( B )( A)文本框中没有内容(B)文本框的 MultiLine属性为 False( C)文本框的 MultiLine属性为 True (D)文本框中的 Locked 属性为 True23. 若要禁止窗体被用户移动,通过设置可达此要求的窗体的属性是( B)( A) MaxButt

24、on(B)Moveable(C)Move( D) ControlBox24. 下列语句中将按钮 (Command1 的) 标题赋值给文本框 (Text1)Text属性的是( B )(A)Text1=Command1 (C)Text1.Text=Command125. 语句 If x=1 Then y=1,(B)Text1=Command1.Caption (D)Text1.Text=CStr(Command1)下列说法正确的是 ( C )(A) ) x=1 和 y=1 均为赋值语句(B) ) x=1 和 y=1 均为关系表达式(C) ) x=1 为关系表达式, y=1 为赋值语句(D) ) x

25、=1 为赋值语句, y=1 为关系表达式26. 要获得用户在组合框输入的内容,应利用的组合框的属性是( A) List(B)Selected( D ).( C) ListIndex(D)Text14. 将数据项“China”添加到列表框( List1 )中成为第一项应使用的语句是( A)(A)List1.AddItemChina,0(B)List1.AddItem China,1(C)List1.AddItem 0,China(D)List1.AddItem 1,China15. 在下列说法中,正确的是(B )(A) 通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上(B) 在列表框中

26、不能进行多项选择(C) 在列表框中能够将项目按字母顺序从大到小排列(D) 框架也有 Click 和 DblClick事件16. 在 KeyDown 或 KeyUp 的事件过程中,能用来检查Ctrl 和 F3 是否同时按下的表达式为 ( C )(A)(button=vbCtrlMask) And (KeyCode=vbKeyF3) (B)KeyCode=vbKeyControl+vbKeyF3 (C)(KeyCode=vbKeyF3) And (Shift And vbCtrlMask) (D)(Shift And vbCtrlMask) And (KeyCode and vbKeyF3)17.

27、 设有命令按钮 Command1 的单击事件过程,代码如下:Private Sub Command1_Click() Dim a(30)As IntegerFor i=1 To 30 a(i)=Int(Rnd*100)NextFor Each arrItem In aIf arrItem Mod 7=0 Then Print arrItem;If arrItem90 Then Exit For NextEnd Sub对于该事件过程,以下叙述中错误的是( B)A) a 数组中的数据是 30 个 100 以内的整数B) 语句 For Each arrItem In a有语法错误C) If arrI

28、tem Mod 7=0,语句的功能是输出数组中能够被7 整除的数D) If arrItem90,语句的作用是当数组元素的值大于90 时退出 For 循环18. 要想从子过程调用后返回两个结果,下面子过程语句说明合法的是(C )( A) Sub f2(ByVal n%,ByVal m%)( C) Sub f1(n%,m%)( B) Sub f1(n%,ByVal m%)( D) Sub f1(ByVal n%,m%)19. 以下关于 MsgBox 的叙述中,错误的是(D )(A) ) MsgBox 函数返回一个整数.(B) )通过 MsgBox 函数可以设置信息框中图标和按钮的类型(C) ) M

29、sgBox 语句没有返回值(D) ) MsgBox 函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数量15设 x=4,y=8,z=7 ,表达式 xz) Or zx的值是 ( D )( A) 1(B) -1( C) True( D) False二、填空题(每题 2 分,共 20 分)1 在 VB 中设置或修改一个对象的属性的方法有两种,它们分别是和 代码窗口 。属性窗口2InStr(7 ,“什么 ASCII 是 ASCII 编码”,“ASCII”) 的结果InStr( “什么 ASCII 是 ASCII 编码”,“ ASCII”) 的结果39;。3. 给变量w 赋值:w=Choos

30、e(Weekda“y( 2010,1,26 ”),“Red”,“Green”,“ Blue”,“ Yellow ”) 后,变量 w 中的值是星期二。4. 将 alignment属性设置为 1,单选按钮和复选框的标题显示在左边;将style属性设置为 1,单选按钮和复选框以图形方式显示。20. 在窗体上有若干控件, 其中有一个名称为 Text1 的文本框。影响 Text1 的 Tab顺序的属性是tabindex。21. 表达式 5/4*65 Mod 2的值是。7为了使计时器控件 Timer1 每隔 0.5 秒触发一次 Timer 事件,应将 Timer1 控件的 interval属性设置为500

31、。27. Rnd 函数的值的范围为0,1)。28. 为了给 x,y,z这 3 个变量赋初值 1,正确的赋值语句是。29. 数组:Dim a(4,-2 To 3,3)包含的元素的个数为120。三、请完成下列的程序(共15 分)1. 一下程序实现的是求解1!2!3!, +n! 的值,其中 n 的值由输入框读入。请在程序中下划线处填入相应的内容。(5 分)Dim n, sum, multi as longDim I ,j as longNsum=for I=1 to n=val(inputbox(“输入0N的值是:”)multi= 1.for j=1 to Imulti=multi*jnext j

32、sum=sum+multinext I print sum22. 输入若干字符,统计有多少个元音字母、有多少个其他字母,不区分大小写, 直接按 Enter 键结束,并显示结果。其中,CountY 中放元音字母个数, CountC 中放其他字符数。Dim CountY%,CountC%Private Sub Text1_KeyPress(KeyAscii As Integer) Dim C$C=ucase(ch,(keyascii)If “A”=C And C=“Z”ThenSelect CaseCCase“ a”, ” e”, ”i ”, ”o”, ”u”CountY=CountY+1 Cas

33、eelseCountC=CountC+1 End SelectEnd IfIfkeyascii=13ThenPrint “元音字母有”; CountY;“个” Print “其它字母有”; CountC;“个”End If End Sub请在程序中下划线处填入相应的内容。四、操作题 ( 第一题 15 分,第二小题 20 分,共计 35 分)提示:请同学们在E 盘下面建立一个以自己的名字和学号命名的文件夹, 然后将自己设计的窗体文件保存在这个文件夹下面即可,工程文件可以不保存,但窗体一定要保存1、编程实现打印以下图案( 15 分)aabc.abcde abcdefg abcdefghi2、用单选按钮和复选框控制文本框中输入的字体要求:两个单选按钮,两个复选框(图形)。一个文本框(设计时已经输入 文字,字体三号)。一个图片框,用于显示文本框中文本的字体。一个命令按钮用于切换字体。界面设计如图所示( 20 分).

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 办公、行业 > 待归类文档
版权提示 | 免责声明

1,本文(vb程序设计试题(含答案).docx)为本站会员(最好的沉淀)主动上传,163文库仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。
2,用户下载本文档,所消耗的文币(积分)将全额增加到上传者的账号。
3, 若此文所含内容侵犯了您的版权或隐私,请立即通知163文库(发送邮件至3464097650@qq.com或直接QQ联系客服),我们立即给予删除!


侵权处理QQ:3464097650--上传资料QQ:3464097650

【声明】本站为“文档C2C交易模式”,即用户上传的文档直接卖给(下载)用户,本站只是网络空间服务平台,本站所有原创文档下载所得归上传人所有,如您发现上传作品侵犯了您的版权,请立刻联系我们并提供证据,我们将在3个工作日内予以改正。


163文库-Www.163Wenku.Com |网站地图|