应用COM方式:1.1引用——浏览——软件安装目录中(D:\Program Files\Hexagon\PC-DMIS 2018 R1 64-bit\INTEROP.PCDLRN.DLL)的INTEROP.PCDLRN.DLL 1.2 引用pc-dmis的命名空间:Imports PCDLRN1.3 获取正在运行的pc-dmis程序: Dim pcdApp As PCDLRN.Application = GetObject("", "PCDLRN.Application") Dim commands As Commands = pcd