试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省高中信息技术 算法及VB语言表达基础同步练习
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=10 ‘①
b=20 ‘②
Text1.Text=“a+b=”+Val(a+b) ‘③
End Sub ‘④
发生“类型不匹配”错误时所执行的语句是（ ）
Dim a as Integer
a=Val(Text1.text) ‘将文本框中的数字文本转换成数值
a=2*a+1
Text1.text = StrA.
End Sub
程序运行时在文本框Text1中输入1，连续两次单击命令按钮Command1后，Text1中显示的内容是：（ ）
程序运行界面如下图所示。
Dim sum As Double, x As Double
sum = 0
n = 0
For i = 1 To 5
x = n / i
n = n + 1
sum = sum + x
Next
该程序通过For循环计算sum的值，下列表达式的值与sum相等的是（ ）
试题篮
