明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2403|回复: 0

VB2008怎么制作DLL

[复制链接]
发表于 2012-1-6 10:17:28 | 显示全部楼层 |阅读模式
我用VB2008作了一个cxb2.DLL,用regsvr32注册时失败,显示“模块cxb2.DLL已加载,但找不到入口点DllregisterServer。请确保cxb2.dll为有效的Dll或OCX文件,然后重试”
cxb2.dll源程序代码不多

Public Class cxb4
    Public Function test(ByVal returnOBJ As Autodesk.AutoCAD.Interop.Common.IAcadEntity) As Autodesk.AutoCAD.Interop.Common.IAcadEntity
        '转到图层
        Dim Aa As Autodesk.AutoCAD.Interop.AcadApplication
        Aa = GetObject(, "AutoCAD.Application")

Dim Ad As Autodesk.AutoCAD.Interop.AcadDocument
        Ad = Aa.ActiveDocument

Ad.SetVariable("clayer", returnOBJ.Layer)
Ad.SetVariable("CELTYPE", returnOBJ.Linetype)
Ad.SetVariable("CECOLOR", CStr(returnOBJ.color))
Ad.SetVariable("CELTSCALE", returnOBJ.LinetypeScale)
Ad.SetVariable("CELWEIGHT", returnOBJ.Lineweight)
test = returnOBJ
End Function
End Class
如何制作一个DLL?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-25 18:25 , Processed in 0.168972 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表