《计算机应用技术》试卷B_10-11(2)

1、【精品文档】如有侵权，请联系网站删除，仅供学习与交流计算机应用技术试卷B_10-11(2).精品文档.考场 班级 姓名 学号 装订线 装订线 装订线山东建筑大学试卷 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.

2、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) Forecol

3、or (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) co

4、s(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 < 10（C）x > = 3 OR x < 10 （D）3 < = x AND < 1013. 若有数组说明语句Dim a( ) As Integer, 则数组a被定义为_。 (A) 定长数组 (B) 动态数组 (C) 静态数组 (D) 可变类型数组14. 下列程序的执行

5、结果是_a=75If a>90 Then i=4If a>80 Then i=3If a>70 Then i=2If a>60 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）beijin

6、g (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 Is>0 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

7、(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 a>b Then (B) If a>b Then max = a max = a Else max = b Else End If max = b End If（C) If a

8、>b Then (D) If a>b 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.菜单项作为一个控件，最常用的一

9、个事件是_ _。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的长度分别