DIM M X=Inputbox("请输入你要分区的大小:","整数分区器") I=512*255*63/1024/1024 Y=Clng(X*1024/I+0.5) M=Clng(Y*I+0.5) Msgbox M,,"你要输入的大小为:"