Do 具体代码..因为题目不详,不知道n怎么变化Loop Until n<10^-5楼上的放到DO上, 如果N在循环中会变化的话,会比实际多循环一次呵..
Dim n As Single Do Until n< 10 ^ -5 '循环.. Loop
