题型：单选题 题类：常考题 难易度：普通
浙江省温州市六校协作体2018届高三上学期信息技术期末联考试卷
Private Sub Command1_Click()
Dim a(0 To 9)As Integer
Dim t As Long
t=Val(Text1.Text)
Do While t<>0
a(t Mod 10)=1
t=t\10
Loop
For i=0 To 9
x=x+a(i)
Next i
End Sub
若在文本框Text1中输入10242048，则程序执行后，变量x的值为（ ）
试题篮
