题目

有VB程序如下： Private Sub Command1_Click() Dim a(0 To 9) As Integer, 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的值为(  ) A . 1 B . 2 C . 5 D . 10 答案：C

查看本题答案和解析