主题：求高手解答

参考代码

Dim A As Double = 10000
Dim fh As Double = 0
Dim sum As Double = 0
For i As Integer = 0 To 20
    If sum Mod 10000 = 0 Then
        fh = (A + sum) * 0.1
    End If
    sum += fh
    output.show(i+1 & " 返还 " & sum)
Next