《计算机应用技术》试卷B_10-11(2).doc_第1页
《计算机应用技术》试卷B_10-11(2).doc_第2页
《计算机应用技术》试卷B_10-11(2).doc_第3页
全文预览已结束

下载本文档

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

文档简介

考场 班级 姓名 学号 装订线 装订线 装订线山东建筑大学试卷 B 共3页第1页 2010 至 2011 学年第 2 学期 考试时间: 120 分钟课程名称: 计算机应用技术 (B)卷 考试形式:(闭卷)年级: 10 专业: 车辆 ;层次:(本科)题号一二三总分分数一 单项选择题(40分,每小题2分)1. 文本框没有_属性。(A)Enabled (B)Visible (C)BackColor (D)Caption2. 下列语句正确的是_。(A)txt1.Text+txt2.Text=txt3.Text (B)Command1.Name=cmdOK(C)12Lable.Caption=1234 (D)Text1=123 3.下面_是合法的变量名。(A)X _ yx (B)123abc (C)integer (D)sin4. 要使Print方法在Form_Load事件中起作用,要对窗体的_属性进行设置。(A)BackColor (B)ForeColor (C)AutoRedraw (D)Caption5. Len(“建筑大学”)的值是_。 (A) 0 (B) 4 (C) 8 (D) 不能确定6. 不论何控件,共同具有的属性是_。 (A)Text (B) Name (C) Forecolor (D) Caption7. 如下数组声明语句中,数组a包含元素的个数为_。Dim a (3, -2 to 2,5) as single(A)120 (B)75 (C)60 (D)138. 要使文本框获得输入焦点,则采用文本框控件的_。(AGotFocus方法 (B)LostFocus方法(C)GetFocus方法 (D)SetFocus方法9. 设置计时器的时间间隔,可以通过_属性实现。(A) Value (B) Text (C) Max (D) InterVal10. 求cos35o可以使用的函数是_。 (A) cos35 (B) cos(35) (C) cos(35o) (D) cos(35*3.14159/180)11. 下面正确的赋值语句是_。(A)x + y = 30 (B)y = * r * r(C)y = x + 30 (D)3y = x12. 数学关系式3x10表示成VB表达式为_。(A)3 = x 10 (B)3 = x AND x = 3 OR x 10 (D)3 = x AND 90 Then i=4If a80 Then i=3If a70 Then i=2If a60 Then i=1Print”i=”;i(A) i=1 (B) i=2 (C) i=3 (D) i=415. 有程序段: Dim K% K = 5 Do Until K = 0 K = K 1 Loop 执行循环体的次数是_。 (A) 一次也不执行 (B) 一次 (C) 五次 (D) 无限次16. 有如下程序段:Const c$=”beijing”c$=”shanghai”c$=”hebei”print c$运行时输出的结果是_(A)beijing (B) shanghai(C) hebei (D) 显示出错信息姓名 学号 装订线 装订线 装订线山东建筑大学试卷 B 共3页第2页17. 当使用Line 方法画直线后,当前坐标会在_。(A)(0,0) (B)直线起点 (C)直线终点 (D)容器的中心18. 有如下程序:x=InputBox(“input value of x:”)Select Case x Case Is0 y=y+1 Case Is=0 y=x+2 Case Else y=x+3 End Select Print x;y运行时,从键盘输入-5,输出的结果是_(A)-5 -2 (B)-5 -4 (C)-5 -3 (D)-5 -519. 引用列表框(List1)最后一个数据项应使用_ 。(A)List1.List (List1.ListCount ) (B)List1.List ( List1. ListCount-1 )(C)List1.List( ListCount ) (D)List1. List ( ListCount-1 )20. 把a,b之中的最大值存放于 max ,下面语句书写正确的是 。 (A) If ab Then (B) If ab Then max = a max = a Else max = b Else End If max = b End If(C) If ab Then (D) If ab Then max = a Else max = b End If max = a Else max = b 二、填空题(共10分,每空1分)1.假定一个文本框的Name属性为Text1,为了在该文本框中显示“大家好”,所使用的语句为 。2.Len(“VB程序设计”)的值是 。3.表示x是9的倍数的逻辑表达式为 4.在一行内写多条语句时,每条语句之间用 符号分隔。5.程序中的语句“Line ( 100,100 ) Step ( 50,100 )”执行以后,CurrentX 、 CurrentY 的值分别为 和 。6.菜单项作为一个控件,最常用的一个事件是_ _。7.如果要每隔15s产生一个Timer事件,则Interval属性应设置为_ _。8.使用Line方法画矩形,必须在指令中使用关键字_。9. 数组(2,5)中有 个元素。三、 编程题(共50分, 每小题10分)1、在购买某物品时,若所花的钱x在下述范围内,所付钱y按对应折扣支付: x x 1000 0.85x 1000 x 3000 y = 0.7x 3000 x 5000 0.6x x 5000提示:输入所花的钱可用InputBox函数或文本框控件(Text)等,还需有输出语句。姓名 学号 装订线 装订线 装订线山东建筑大学试卷 B 共3页第3页2.输入一串字符,统计各字母出现的次数(大小写字母不区分),并对出现的字母显示其出现的个数,效果如下图所示。 3有一根长度为321米的钢材,要将它截取成两种规格的短料,规格a、b的长度分别为17米和27米,每种至少

温馨提示

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

评论

0/150

提交评论