[求助][VBA]dvb程序如何实现透明的命令行输入

wzxwzx74

  9pt 10pt 11pt 12pt 13pt 15pt 前几天在明经通道上找到用vba可以实现透明命令的命令行输入，
经这几天的揣摩还是不得其法，其实我的想法就是在cad中抛开autohook，因为hook有个麻烦，就是定义的字母键再不能和其他的字母组合了，而且也不能用两个字母组合成命令。读到vba的帖子后，可以用lisp透明调用dvb程序，使我看到了希望，但由于我对编程一窍不通，没法真正运用，故求助于高手。如下面的DVB程序
Sub ZP()
ZoomPrevious
End Sub
Sub ZE()
ZoomExtents
End Sub
可以做到透明使用，可到底怎样实现呢，望指点。
还有zoom的比例缩放该怎样写呢？我这样写
Sub d()
'Zoom .3x
End Sub
说我语法错误。我是用cad2006。真诚的希望高手可以指点，谢谢！