程序的调用路径问题
<p><br/><br/><font face="宋体" size="2">Sub tksc()<br/>Dim fn As String<br/>fn = ThisDrawing.Application.VBE.activevbproject.FileName<br/>if fn<>"" then ThisDrawing.Utility.Prompt fn & vbCrLf<br/>End sub<br/></font></p><p><font face="宋体" size="2">我在菜单中加了一个命令来直接调用,<br/>-vbarun 500-2000tk.dvb!ThisDrawing.tksc<br/><br/>为什么在点第二次的时候才会把路径取得成功并显示出来呢?<br/><br/>如果先加载程序,再按Alt+F8运行就不会出现这种情况。<br/><br/>请高手帮忙给点建议怎么使用菜单调用的时候,第一次就可以把路径取得成功。。<font></font></font></p>
页:
[1]