高中信息技术浙教版必修 信息技术基础1.3 信息技术同步练习题
展开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 String
a = Text1.Text
b = Text2.Text
Text3.Text = a + b
End 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 Integer
i=1
s=0
Do while i<=5
s=s+i
i=i+1
Loop
问：该程序段运行后，变量s的值为_____，i的值为_______
（ ）20.执行完以下VB程序段后，求变量s的值
s=0
For i=0 to 15 Step 2
s=s+i
Next i
A．56 | B．19 | C．18 | D．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 Integer
List1.Clear
For i = 1 To 5
x = i * (i + 2)
List1.AddItem Str(x)
Next i
End Sub
该程序运行后，单击命令按钮Command1，在列表框List1中显示的数据个数是
（A） 1个 | （B） 2个 | （C） 5个 | （D） 10个 |
（ ）29. 有如下的Visual Basic程序段：
s = 0
x = 1
Do While x <= 5
s = s + x ： x = x + 2
Loop
该程序段运行后，语句s = s + x执行的次数是
（A） 1 | （B） 2 | （C） 3 | （D） 5 |
浙教版 (2019)必修2 信息系统与社会4.2 搭建信息系统课后作业题： 这是一份浙教版 (2019)必修2 信息系统与社会4.2 搭建信息系统课后作业题，共9页。试卷主要包含了 write digital，read_analg等内容，欢迎下载使用。
浙教版(2019)高中信息技术 选修2 网络基础 综合练习： 这是一份浙教版(2019)高中信息技术 选修2 网络基础 综合练习，共8页。试卷主要包含了选择题，填空题，判断题，操作题，简答题等内容，欢迎下载使用。
高中信息技术浙教版 (2019)选修2 网络基础第四章 物联网4.3 物联网搭建实例精品当堂达标检测题： 这是一份高中信息技术浙教版 (2019)选修2 网络基础第四章 物联网4.3 物联网搭建实例精品当堂达标检测题，共9页。试卷主要包含了选择题，综合题等内容，欢迎下载使用。
