在VBA中调用大漠插件[ V2.1133 ]

时间：2015-11-27 16:55:54 阅读：262 评论：0 收藏：0 [点我收藏+]

标签：

VBA中大漠插件的调用[ V2.1133 ]

-首先要在电脑中注册大漠插件，系统暂不支持windows 8 ；如想获得更好的体检请购买收费版本大漠插件；

-代码如下；

========================

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

‘以下为延时函数 Delay ( )

Public Function Delay(DT As Long)
For i = 0 To DT Step 2
DoEvents ‘操作权交给系统否则程序会暂时无响应
Sleep 1
Next i
End Function

’以下为大漠注册函数注册 dm

Public Function 注册(dm As Object) As Object
Shell "regsvr32 dm.dll /s" ‘注册大漠插件到系统
Delay 500
Set dm = CreateObject("Dm.dmsoft") ‘创建大漠插件
End Function

========================

-调用方法如下；

成功调用dm.Capturejpg例程文件下载连接如下；

========================

标签：

原文地址：http://www.cnblogs.com/isunlitao/p/5000902.html

踩

(0)

评论一句话评论（0）

分享档案

更多>

周排行