i = 1
        x = 2
        s = 1 / 2
re:     If n >= (10 ^ (-5)) Then
            i = i + 1
            x = x + i
            s = s + n + 1

            GoTo re
        Else
            Label6.Text = i & "项"
                    End If
为什么输出的i 总是等于1呢 正确的应该怎么改

话说，楼主的n在哪呢？如果n >= (10 ^ (-5))，那不是会一直循环么？如果不是，那i=1是没错的。