Private Sub From_Click( )Dim a$(1 to 9),i%,s%For i=1 to 9a(i)=(str(i)&i)/iNext iS=0For i=9 to 1 Step-2s=s+a(i)*iNext iPrint sEnd Sub为什么输出结果是275?