将OCX复制到你的安装文件夹内就可以了，如果放到其他地方就需要注册

我会用一些软件把要用的dll,ocx和exe打包成一个exe~~(不是rar那种压缩包)
运行这个exe的时候~~~会自动放出相关文件~~并且注册~~~
嗯~~~然后就可以正常使用了~~

overown 你好：
多写指点：
不知用什么工具比较合适，可以发到我的邮箱吗？
    wsdou@163.com

如果你需要制作安装文件我建议你使用SetupBuilder Professional 1.5sc.这个工具真的不错的。我们公司大多数程序就用它。很爽，很简单。

~~那个工具在我上次整理硬盘的时候删除了~~不过我找到了一篇文章~~希望对你有帮助.

************************************************************************
在用VB编程中合理的使用第三方控件，往往能够事半功倍。但是使用第三方控件也有不好的地方，那就是为了保证程序正常运行，必须使程序能够在系统目录或程序目录下找到所用的第三方控件。要做到这一点通常有两种办法：一是把控件和程序制成一个压缩包发行，这样的缺点是有可能导致在程序传播过程中丢失控件文件。二是制作安装程序，缺点是制作过程烦琐。而且上面两种办法也不符合绿色软件的要求。所谓的绿色软件是指软件只有单个可执行文件且无须安装，目前很受用户欢迎。那么有没有办法在使用了第三方控件的情况下实现绿色软件梦呢？答案是有。

　　做法是，将第三方控件以自定义资源文件方式保存在程序中，程序运行之后使用控件之前将所用到的控件生成到该程序目录下，完成控件从可执行文件中的金蝉脱壳。

　　具体做法如下：

　　第一步：将要用到的控件拷贝到当前工程目录下，右键单击该控件，选择属性，记下文件大小。注意，应记下以字节为单位的具体数字，而不是多少K，以备编程使用。

　　第二步：引用并正常使用该控件。

　　第三步：新建资源文件加入工程，在资源文件编辑器中添加所使用的第三方控件为自定义资源（CUSTOM），资源号使用默认的101。如果使用了多个控件则分别添加到资源文件的101、102......资源项中，脱壳代码也要作相应的修改。

　　第四步：编写控件脱壳代码，使其读取资源文件的数据，在程序当前目录下生成控件。

　　代码如下：

Private Const OCXSIZE = 57344 '欲生成的控件大小是57344Byte,名字为CoolToolBar.ocx

Sub Main()
　Dim Ocx() As Byte 'OCX是个Btye类型的数组
　Dim Counter As Long
　Ocx = LoadResData(101, "CUSTOM") '将自定义资源中101号资源读入数组OCX
　'注意，微软的帮助中对加载自定义资源的说明有错误，自定义资源标识为"CUSTOM"而不是帮助所说的数字10

　If Right(App.Path, 1) = "($%$43%^#ASD#2@$#f$%^) Then '读取程序所在路径,判断是否为根目录并分别处理
　　'程序在根目录下
　　If Dir(App.Path & "CoolToolBar.ocx") = "" Then '程序路径下有无控件,无则生成控件
　　　'以二进制方式写（生成）控件（CoolToolBar.ocx）到主程序所在的目录
　　　Open App.Path & "CoolToolBar.ocx" For Binary As #1
　　　For Counter = 0 To OCXSIZE - 1 '注意因为从0 Byte开始因此以文件大小 - 1Byte 为终值
　　　　Put #1, , Ocx(Counter)
　　　Next Counter
　　　Close #1
　　End if
　Else
　　'程序不在根目录下
　　If Dir(App.Path & "\CoolToolBar.ocx") = "" Then '程序路径下有无控件,无则生成控件
　　　'以二进制方式写（生成）控件（CoolToolBar.ocx）到主程序所在的目录
　　　Open App.Path & "\CoolToolBar.ocx" For Binary As #1
　　　For Counter = 0 To OCXSIZE - 1 '注意因为从0 Byte开始因此以文件大小 - 1Byte 为终值
　　　　Put #1, , Ocx(Counter)
　　　Next Counter
　　　Close #1
　　End if
　End if
　Form1.Visible = True '主程序所用控件已经生成，显示主窗体，进入主程序。
End Sub  

　　注意：将以上代码作为一个模块添加到工程中，并在工程-工程属性设置中将启动对象选为Sub Main,即上面的脱壳代码。然后编译生成EXE文件，将该EXE文件拷贝到其他没有安装所用控件的计算机上运行一下看看是否实现了控件携带之金蝉脱壳。如果是那么OK！以上为使用一个控件的情况，使用多个控件方法基本相同，不在赘述。

嗯~~刚刚我已经试验过了~~~完全可行~~
就是要在主程序目录下生成一个文件~~这个不太好~~~~
如果是我的话~~我会把文件解压到其他地方~~~例如windows目录~~~这样看起来更清爽一些~~~~大不了每次用完就删除~~~
有问题再说吧~~

TO　4楼的兄弟：
　　俺想问一下，如何下载到注册版的这个程序，现在为止俺找到的都是共享版的