1、平阳三中2013学年第一学期高一期中考试信 息 技 术说明：本试卷共四大题（单选题、填空题、程序填充、程序修改），满分100分，时间70分钟。一、单项选择题（本题有30小题，每小题2分，共60分。）1、在Visual Basic中，下列不合法的变量名是（ ）(A) MP4 (B) c4a13 (C) a_23 (D) 2a1b3C2、在Visual Basic中，下列表达式的值为True的是（ ）(A) 13 + 12 = 26 (B) 13 12 and 13 14 (C) 39/3 13 (D) 13 14 or 14 b then max=a else max=b End If Prin
2、t max(A) 8 (B) b (C) 13 (D) 55、在Visual Basic中，表达式 21 Mod 5 的值是（ ）(A) 7 (B) 2 (C) 1 (D) 06、代数式 对应的Visual Basic表达式是（ ）(A) (2a+4*b2)/a+b (B) 2*a+4*b*b/(a+b)(C) 2a+4*b*b/a+b (D) (2*a+4*b2)/(a+b)7、在Visual Basic中，下列正确的赋值语句是（ ）(A) a = a + 1 (B) 2a = b(C) a * b = b * a (D) a + 2 = b - 38、在Visual Basic中,下列关于
3、语句Dim b1 As string说法正确的是（ ）(A) 定义b1为双精度型变量 (B) 定义b1为字符串型变量(C) 定义b1为布尔型变量 (D) 定义b1为整型变量9、计算机程序的三种基本结构分别是：顺序结构、分支结构、（ ）。(A) 模块结构 (B) 循环结构 (C) 多重循环结构 (D) IF块结构10、在面向对象程序设计中，（ ）用来描述对象的特征信息。(A) 事件 (B) 方法 (C) 代码 (D) 属性11、在VB程序设计中，Timer1控件每秒响应一次，应该将其Interval属性设置为（ ）。(A)1 (B)60 (C)100 (D)100012、下列过程中，（ ）代码，
4、是按钮单击就运行的程序段。(A) Form_Load (B) Command1_Click(C) Command1_DbClick (D) Text1_KeyPress13、下列控件中“文本框”控件的是（ ）。(A) Label1 (B) Text1 (C)Command1 (D) Form114、运行如下程序段可输出由“#”组成的（ ）图形。For X = 1 To 3 Print #Next X(A)矩形(B)平行四边形(C)三角形(D)梯形15、在VB环境中，修改对象的 BackColor 的属性值，则对象的（ ）属性将发生改变。(A) 文字颜色 (B) 背景色 (C) 前景色 (D)
5、边框颜色16、当 a=123 : b=”平阳三中” ，则a和b变量分别为（ ）(A)a和b均是字符型变量 (B) a是字符型变量，b是数值型变量(C) a是数值型变量，b是字符型变量(D) a和b均是数值型变量17、 A=5，B=8， 则 （B-A）*Rnd(X) 的结果是介于（ ）之间的实数。(A) 1，3）(B)（0，1）(C) 0，3）(D) 1，5）18、 s=0For k=1 to 10 Step 2 S=S+1 Next k在程序运行时循环体将被执行（ ）次。(A)3次 (B)4次 (C)5次 (D)6次19、执行后将会清空文本框Text1中文本内容的语句是（ ）。(A)Text1
6、.Clear (B)Text1.SelText= (C)Text1.text= (D)Text1.SelText.Clear20、在机场托运行李，每人免费25千克，超过25千克不到50千克，则超出部分按每千克10元收费，如果超过50千克，则超过部分按每千克20元收费。这种计费程序最适合用到的程序结构是（ ）(A)循环 (B)赋值 (C)分支 (D) 顺序21、文本框中输入密码时显示 * 号，则应当在此文本框的属性窗口中设置（ ）。(A) Text属性值为 * (B) Caption属性值为 *(C) Passwordchar属性值为空 (D) Passwordchar属性值为 * 22、将命令
7、按钮Command1设置为是否可用，应修改该命令按钮的（ ）属性。(A)Visible (B)Value (C)Caption (D)Enabled23、有如下程序，该程序将（ ）。 For i= 1 to 10 step 0 K=k+2 Next i (A) 形成无限循环 (B) 循环体执行一此后结束循环(C) 语法错误 (D) 循环体不执行即结束循环24、下面运算结果值最小的是（ ）。(A) int(-2.4) (B) fix(-2.4) (C) len(“-15”) (D) 24 mod 225、Dim a,b,c As Stringa=”5”b=”21”Print b+a以上程序运行结
8、果后，窗体输出的结果是（ ）。(A) 26 (B) 28 (C) 521 (D) 21526、表达式val(12)+len(ab)的值是（ ）。(A)12 (B)14 (C)12ab (D)出错27、设X=5，Y=9，则可实现变量X和Y的值交换的程序是（ ）。(A) X=5：Y=9 X=Y：Y=X (B) X=5：Y=9 Z=X：X=Y：Y=Z(C) X=5：Y=9 Y=X：X=Y (D) X=5：Y=9 Z=Y：X=Y：X=Z28、有如下程序，该程序的运行后输出的结果是（ ）。 Private sub Command1_Click() I=AAAAAA M=Mid(I,4,3) Print
9、M End Sub (A) AAAAA(B) AAAAABB(C) AA(D) AAA29、x,y中至少有一个变量小于变量z的VB表达式为xz（ ）yx or bx） and x y max = y - 3 max = x + 3 Print max 运行后max的值= 40、把空缺的代码，补充完整，能正常运行 Dim s As Long, x As Integer s = 0 For x = 1 To 10 Step 2 s = s + x Text1. = s 最后输出的结果是 41、把空缺的代码，补充完整，能正常运行，并最终的X和Y X = 3 ： y = 6 Do While y = 1 Then d = 醉酒驾车! ElseIf x ji，可以避免重复寻找 For j = i To 100 For k = j To 100 If k * k = i * i + j * j Then List1.AddItem (Str(i) + Str(j) + Str(k) Sum=sum+2 End If Next k Next j Next k Label1.Text = 组数： + Str(sum) 把上面的程序代码注释的有4处错误，请修改正确。高考资源网版权所有！投稿可联系QQ：1084591801
