安徽省VB二级考试真题4 含答案.doc_第1页
安徽省VB二级考试真题4 含答案.doc_第2页
安徽省VB二级考试真题4 含答案.doc_第3页
安徽省VB二级考试真题4 含答案.doc_第4页
安徽省VB二级考试真题4 含答案.doc_第5页
免费预览已结束,剩余1页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

一、 单项选择题(每题1分,共40分)1 下列属于计算机输出设备的是( )A)鼠标 B)扫描仪 C)键盘 D)打印机2.网上购物属于计算机在 ( ) 领域中的应用。A)电子政务B)电子商务C)计算机辅助设计D)办公自动化3.微型机种,U盘使用的一般是 接口A)1394 B)LPT C)COM D)USB4.下列关于存储器读取速度从快到慢的排序中,正确的是( )A)RAM、硬盘、光盘 B)RAM、光爬满、硬盘C)硬盘、RAM、光盘 D)硬盘、光盘、RAM5、“32位微型机”中的“32”是指( )A)微机主频 B)内存容量 C)微机字长 D)硬盘容量6.在Windows系统中查找文件时,如果输入“*.doc”,则查找的是A)文件名为*.doc的文件 B)文件名中有一个*的doc 文件 C)所有扩展名为doc 的文件D)文件名长度为一个字符的doc文件7.下列不符合域名命名规则的是( )A)www.163,com B)C) D)8下列软件部属于多媒体影音播放工具的是( )A)暴风影音 B)Photoshop C)Realplayer D)Windows media player9.下列关于计算机病毒危害的描述,错误的是( )A)影响程序的运行B)破坏用户程序和数据C)影响计算机的运行速度D)破坏制度光盘中的信息10软件开发过程中,程序设计的核心是( )A)算法与数据结构B)语句格式C)用户数据D)用户存档11.窗体文件的扩展名是( )A).vbg B).vbp C).vbw D).frm12.VB的续行符是( )A)一个空格加一个下划线 B)一个下划线 C)直接回车 D)一个空格13.下面( )是合法的变量名。A)x_yz B)123abc C).Integer D)x-y14.将不等式|x|10表示成VB表达式,以下错误的是( ) A)Abs(x)-10 And x10 Or x-10 D)Sqr(x*x)5,-1,0)后,y的值为( )A)3 B)5 C)-1 D)021.应使用( ) 声明一个变量为过程级变量。A)Public B)Globel C) Dim D)Private22.VB中的变量如果没有声明其数据类型,则默认为( )。A)变体型 B) 数值型 C)字符型 D)日期型23.下列关于语句Exit For说法正确的是( )A) Exit For可以退出任何类型的循环 B) 一个循环中只能有一个Exit For语句C) Exit For可以退出过程 D)一个For循环中可以有多条Exit For语句24.定义数组a(1 To 5,5)后,下列( )数组元素不存在。A)a(1,1) B) a(1.,5) C) a(0,1) D)a(5,5)25.SubEnd Sub过程的形式参数可以是( )A)常数 B) 函数 C) 变量 D)表达式26.VB中默认的参数传递方式是( )A)传值 B) 传地址 C) 传值和传地址 D)从形参到实参27.以下( )属性的值不能通过程序代码改变。A)Caption B)BackColor C)Name D)Enabled28.要改变标签控件的宽度,应修改该控件的( )属性值。A)Top B) Width C) Left D)Height29.要使文本框获得焦点,应采用下列( )方法。A)GotFocus B) LostFocus C) KeyPress D)SetFocus30.若要使命令按钮Command1不可见,应设置其( )属性值为False。A)Visible B) Default C) Cannel D)Enabled31.下列( )对象不能响应Click事件。A)列表框 B)计时器 C) 窗体 D)命令按钮32.下列( )对象具有Clear方法。A)图片框 B) 窗体 C) 复选框 D)列表框33.下列( )属性返回组合框中列表项目的个数。A)LIstCount B) List C) ListIndex D)Text34.可以通过复选框和单选按钮的( )属性值来判断它们是否被选中。A)Style B) Value C)Checked D)Selected35.文件列表框的( )属性表示所显示文件的路径。A)Path B) Drive C) Road D)FileName36.下面关于控件数组说法错误的是( )A)控件数组中所有元素共用同一个事件过程 B) 控件数组中通过Index属性来区分每个元素 C)控件数组中所有控件元素使用同一个控件名 D)一个控件数组中可以包括不同类型的控件37.下面几个关键字均表示文件的打开方式,其中只能进行读不能写的是( )A)Input B) Output C) Random D)Append38.记录集中移动到下一个记录的方法是( )A)MoveFirst B)MoveLast C) MovePrecious D)MoveNext39.下列程序段运行后,输出结果是( )x=5If x0 Then y=5 Else y=10Print yA)0 B) 5 C) 10 D)1540.窗体上有一个命令按钮Command1和一个列表框List1,下列代码执行后输出结果的( )Private Sub Command1_Click() List1.AddItem”北京” List1.AddItem”纽约” List1.AddItem”伦敦” List1.AddItem”巴黎” Print List1.List(2)End SubA)北京 B) 纽约 C) 伦敦 D)巴黎二、 填空题(每空2分,共20分)1.的VB表达式为 。2.若要每隔3秒触发一次计时器事件,应将Interval属性值设置为 。3.VB中菜单仅能接受 事件。4.下列程序中循环语句的循环次数是 。 i=5Do While i =1i=i-1Loop5.下列程序执行时,要求输入密码,如果密码不正确则弹出非法用户对话框,请将程序补充完整。Private Snb Form_Click()Dim password As Stringpassword = (“请输入你的密码”,”输入密码”) 输入用户密码If password =”654321” Then Exit SubElse “对不起!你是非法用户!” End End IfEnd Sub6.下面程序的功能是求Fibonacci数列的前n项,直到第n项大于1000为止,请将程序补充完整。Fibonacci数列是:1,1,2,13,5,8,13,;数列的第1项和第2项均为1,从第3项开始,每一项都是其前两项之和。Private Sub Form_Click() Dim f(20) As Long,n As Interger f(1)=1:f(2)=1 n =2 Printf(1);f(2); Do n=n+1 f (n)=f(n-2)+ 求数列的第n项 Print f(n) If Then Exit Do 若条件满足就终止循环 LoopEnd Sub7.下面程序的运行结果是输出如下所示的图案,请将程序补充完整。 * * * * * * * * * Private Sub Form_Click()Dim i As Interger ,j As IntergerFor i =3 To 1 Step -1 Print Spc (10-i); For j = 1 To 控制每行*号的个数 Print “*” Next j 换行Next iEnd Sub三、 阅读理解题(每题4分,共40分)1.执行下面程序后,输出的结果是 。Private Sub Form_Click()Dim x As Interger,y As Stringx= 14Select Case x Case Is 5 y=”beijing” Case 5 To 15 y=”shanghai” Case Else y=”!” End Select Print yEnd Sub2.执行下面程序后,输出的结果是 。Private Sub Form_Click() Dim i As Interger,s As String i=0 Do i=i+1 s=s&i Loop While i5 Print sEnd Sub3. 执行下面程序后,输出的结果是 。Private Sub Form_Click() Dim i As Interger,j As Interger,s As Interger Dim a a=Array(1,2,3,4) s=0:j=1 For i=0 To 3 s=s+a(i)*j j=j*10 Next i Print “s=”;sEnd Sub4. 执行下面程序后,输出的结果是 。Private Sub Form_Click() Dim i As Interger,j As Interger,s As Interger For i=1 To 3 s=0 For j=1 To i+1 s=s+1 Next jNext iPrint “s=”:sEnd Sub5. 执行下面程序后,输出的结果是 。Dim b As IntergerPrivate Sub Proc (ByVal m As Interger) Stetic a As Interger a=a +m b=b+a*2End SubPrivate Sub Form_Click()Dim n As Intergern=3Call Proc(n)Call Proc(n+1)Print n,bEnd Sub四、 编程题(共20分)1.编写一个函数Area,求圆环的面积,以内圆、外圆半径作为函数的形式参数。圆环面积如下图阴影所示,外圆半径为r1,内圆半径为r2。(5分)2.某一快递公司快递费用计算方法如下

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论