试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省宁波市镇海中学2021届高三上学期信息技术选考适应性测试卷
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的值为( )
Dim a As Integer,b As Integer,s As Single
a=2
b=3
Label1.Caption=“s=”+“a*b”
该程序运行后,标签Label1上显示的内容是( )
试题篮