高中信息技术浙教版必修 信息技术基础1.3 信息技术同步练习题

这是一份高中信息技术浙教版必修 信息技术基础1.3 信息技术同步练习题，共5页。
VB基础阶段练习(一）高二（  ）班   学号_____   姓名_______________ （   ）1．在Visual Basic中，下列表达式的值等于3的是（A）Int(3.14)（B）Abs(-3.14)（C）Sqr(9.2)（D）Len("3.1415")（   ）2．在Visual Basic中，若x=6.1786，则表达式Int(x+0.5)的值是（A） 6（B） 6.1（C） 6.6（D） 7 （   ）3．在Visual Basic中，表达式Int(sqr(10))的值是（A）5（B）4（C）3（D）10（   ）4．在Visual Basic中，如果a=3，b=4，c=-5，那么下列表达式值为假的是                      （A） (a>b) And (b>c)（B）(a>c) And (b>a) （C）(a>b) Or (b>c)  （D）(a>c) Or (b>a)（   ）5．若x、y都是整数，且x≥y，则下列逻辑表达式值一定为真的是（A）Not (x<y)（B）x<>y（C）x=y（D）x<=y（   ）6．若x、y都是正整数，且x能被y整除，则下列表达式值一定为真的是（A）x/y=0（B）Sqr(x\y)=x\y（C）Int(x\y)=0（D）Int(x/y)=x/y（   ）7．在Visual Basic中，如果给变量a、b都赋值为3，则下列语句正确的是（A）a=3:b=3（B）a=b=3（C）a=3,b=3（D）b=a=3（   ）8．在Visual Basic中，将表达式b+2的值赋给变量a，正确的赋值语句是（A）b+2=a（B）2+b=a（C）a=b+2（D）a+b=2（   ）9.下列各赋值语句，语法不正确的是
A． X-y=5  B． BN =15   C． Text1.text ="HK"  D． sLength =x+y（   ）10. 下列属于正确的Visual Basic赋值语句的是（A）a + b = 2（B）a = True（C）2 = a + b （D）a * b = 2（   ）11．在Visual Basic中，若a=4，b=3，语句If a>b Then c=a+1 Else c=b-1执行后，下列说法正确的是（A）执行了语句c=a+1（B）先执行c=a+1，再执行c=b-1（C）执行了语句c=b-1（D）先执行c=b-1，再执行c=a+1（   ）12. 下列Visual Basic表达式的值等于56的是（A）Mid("1234567", 5, 3)（B）Len("55") + 1（C）Sqr(56)（D）Abs(-55) + 1（   ）13. 在Visual Basic中，表达式13 \ 5 Mod 4的值是（A） 1（B） 2（C） 3（D） 4（   ）14. 已知a=1，b=2，c=3，下列表达式中值为True的是（A）Not (a < b)（B）a > b And b > c（C）a < b Or a > c（D）a > c （   ）15. 变量a的初值为0，在下列语句中，每执行一次能使变量a的值在5、0两数值上交替出现的是（A） a = 5 - a（B）a = -a（C） a = a + 5（D）a = a - 5（   ）16. 有如下的程序段： Private Sub Command1_Click()Dim a As String, b As Stringa = Text1.Textb = Text2.TextText3.Text = a + bEnd Sub运行程序，在对象Text1和Text2中分别输入2和3，则单击命令按钮Command1后，对象Text3中显示（A） 23（B）5（C） 2（D） 3（   ）17. 下列Visual Basic语句中，功能不同的一组是（A）If a = True Then b = b + 1 与 If a Then b = b + 1 （B）If a = False Then b = b + 1与If Not a Then b = b + 1（C）If a >= 0 Then b = b + 1 与If Not (a < 0) Then b = b + 1（D）If a < 0 Then b = b + 1 与If Not (a > 0) Then b = b + 1（   ）18．在下面完整的Visual Basic的Do语句中，有错误的语句行是#01   t=0   #02   Do While t<10  #03     t=t+2   #04   End Do（A） 第#01行（B） 第#02行（C） 第#03行（D） 第#04行（   ）19．有如下visual basic 程序段Dim i as Integer, s as Integeri=1s=0Do while i<=5s=s+ii=i+1Loop问：该程序段运行后，变量s的值为_____，i的值为_______（   ）20.执行完以下VB程序段后，求变量s的值 s=0For i=0 to 15 Step 2s=s+iNext iA．56B．19C．18D．25（   ）21.下列不能判断变量n为奇数的表达式是（    ）A．n mod 2=1      B．n mod 2>0          C．n mod 2<>0         D．n\2=n/2（   ）22.下列VB表达式中，只能产生100以内二位随机正整数的是（     ）A.int（Rnd*90+11）   B．int（Rnd*100-10）   C．int（Rnd*90）+10   D．int（Rnd*89+10）（   ）23.某算法的流程图如下所示：                          依次输入x的值为3、2、1、-1后，该算法的输出结果为（A）3（B）4（C）5（D）6         （   ）24. 在Visual Basic中，某对象的属性窗口如下图所示：其中“FillStyle”是（A）对象名（B）属性名（C）属性值（D）事件名      （   ）25. 在Visual Basic中，某对象的属性窗口如下图所示： 该对象名是（A）Label（B）Lab（C）Caption（D）Label1  （   ）26. 在Visual Basic中，某工程的代码窗口如下图所示：当前正在编辑的是         （A）Command1的DblClick事件过程代码（B）Label1的DblClick事件过程代码（C）Command1的Click事件过程代码（D）Label1的Click事件过程代码（   ）27. 有如下的Visual Basic程序：Private Sub Command1_Click()  Const pi = 3.14  Dim s As Single, r As Single   r = Val(text1.Text)  pi = 3.1415  s = pi * r ^ 2  Label1.Caption = "面积为" + Str(s)End Sub程序运行后，单击命令按钮Command1，出现如图所示的错误提示，下列原因分析正确的是（A）常量不能用小数（B）文本框Text1中输入的数据不是常量（C）pi是常量，不允许赋值（D）表达式结果超过了变量类型的范围（   ）28. 某Visual Basic程序如下：Private Sub Command1_Click()Dim x As Integer, i As IntegerList1.ClearFor i = 1 To 5     x = i * (i + 2)List1.AddItem Str(x)Next iEnd Sub该程序运行后，单击命令按钮Command1，在列表框List1中显示的数据个数是（A） 1个（B） 2个（C） 5个（D） 10个（   ）29. 有如下的Visual Basic程序段：s = 0x = 1Do While x <= 5s = s + x   ：  x = x + 2Loop该程序段运行后，语句s = s + x执行的次数是（A） 1（B） 2（C） 3（D） 5