试题 试卷
题型:综合题 题类:常考题 难易度:普通
浙江省温州市十五校联合体2017 -2018学年高二上学期信息技术期中考试试题
Dim s As String, st As Long, ch As Integer
Dim i As Integer, n As Integer
n = Len(s)
st = 0
For i = 1 To n
ch =
st = st + ch * 2 ^ (i - 1)
next i
Text2.Text = Str(st) End Sub
试题篮