vbs 求次方（帮忙找错？)

Question

要求：一张纸（1毫米）叠几次能达到珠穆朗玛峰的高度（8848）dim i,ji=2^j
for j=1 to 1000
    if i>8848  then 
       end if
next
msgbox(j)      

Answer 1

dim i,ji=2^j
for j=1 to 1000
    if i>8848  then
exit for
      end if
next
msgbox(j)

Answer 2

  我上面写错了，抱歉。应该是if j>8848000,因为是纸是毫米的。我刚执行了，结果是1001，应该是错的吧。

Answer 3

那个 j=1 to 1000 如果把1000改成100
 执行就是101，改成90 就是91，到底错在哪了？？大家帮个忙啊

Answer 4

汗，i=2^j应放在循环里面
来个简单的    msgbox Int((Log(8848) + Log(1000)) / Log(2)) + 1