's=1+12+123+1234+12345+123456 Dim s As Long Dim s1 As Long Dim i As Integer, j As Integer s = 0 For i = 1 To 6 s1 = 0 For j = i To 1 ‘Error**错误*** s1 = s1 + j * 10 ^ (i - j) Next j s = s + s1 Next i Print "s="; s 其中 For j = i To 1 有错误, 不改动其他语句,请选择正确选项 ()。