如何讓主程序中的一個變量在調用中也可以用

yuangw1234

本人写了一个程序，就是在主程序中输入一个整数给一个变量赋值

dim textsize as integer

textsize=inputbox("Please input the size of the text")

call dma( gsetobj )

我现在想要在调用程式中用到这个textsize,请问为什么不能用，如下

public sub   dma( setobj as acadselectionset)

dim zhim as acadtext

set zhim=thisdrawing.modelspace.addtext("a",insertpoint,textsize)

end sub

为什么红色的变量不是主程序的那个textsize，假如我刚开始输入3，这时红色的textsize也应该是3才对啊？

因为我们的程序是先执行主程式后执行共用程序，而主程式中已先定义了textsize，调用时这个textsize应该就是主程序的那个3才对，可是为什么会出现“执行阶段错误，无效的输入”

xinghesnak

因为你没有声明textsize为全局变量，而紧紧在主程序中声明是不够的。。。。