首先下载大漠插件,版本是3.1233 https://wwon.lanzout.com/iNl8Xhfx75c
打开vb6 引用dm.dll
创建两个变量 dim dm,ver
鼠标点击事件
Private Sub Command1_Click() ver = dm.ver Print ver End Sub
加载dm.dmsoft
1 Private Sub Form_Load() 2 Set dm = CreateObject("dm.dmsoft") 3 End Sub
此时版本号已经正常显示,但这个方法有个缺点,大漠命令不能自动补全。。但是也能正常调用。
标签:插件,dm,ver,Sub,vb6,大漠 From: https://www.cnblogs.com/zzgzh/p/16974481.html