ctlbar32.ocx,MSCOMCT2.OCX有什么用处。解决办法
ctlbar32.ocx,MSCOMCT2.OCX有什么用处。
http://club.excelhome.net/thread-577159-1-1.html
在这个帖子,下面语句如下。
请问:各位大侠的问题,ctlbar32.ocx,MSCOMCT2.OCX有什么用处。
Public Sub zcqq()
Dim SourceFile, DestinationFile
SourceFile = ThisWorkbook.Path & "\注册控件\ctlbar32.ocx" ' 指定源文件名。
DestinationFile = "c:\windows\system32\ctlbar32.ocx" ' 指定目的文件名。
FileCopy SourceFile, DestinationFile ' 将源文件的内容复制到目的文件中
Shell "regsvr32 " & DestinationFile, vbHide '注册控件
'MsgBox "如果显示注册成功的信息,该文件你可以可删除."
'Application.Quit
End Sub
Public Sub zcrq()
Dim SourceFile, DestinationFile
SourceFile = ThisWorkbook.Path & "\注册控件\MSCOMCT2.OCX" ' 指定源文件名。
DestinationFile = "c:\windows\system32\MSCOMCT2.OCX" ' 指定目的文件名。
FileCopy SourceFile, DestinationFile ' 将源文件的内容复制到目的文件中
Shell "regsvr32 " & DestinationFile, vbHide '注册控件
End Sub
------解决方案--------------------
不是写着吗,注册控件啊。。。
OCX文件就是一些控件。。。
软件里面有用到这些控件。。。
------解决方案--------------------
很好理解啊,你的软件中用到这些控件时就要先注册
------解决方案--------------------
http://club.excelhome.net/thread-577159-1-1.html
在这个帖子,下面语句如下。
请问:各位大侠的问题,ctlbar32.ocx,MSCOMCT2.OCX有什么用处。
Public Sub zcqq()
Dim SourceFile, DestinationFile
SourceFile = ThisWorkbook.Path & "\注册控件\ctlbar32.ocx" ' 指定源文件名。
DestinationFile = "c:\windows\system32\ctlbar32.ocx" ' 指定目的文件名。
FileCopy SourceFile, DestinationFile ' 将源文件的内容复制到目的文件中
Shell "regsvr32 " & DestinationFile, vbHide '注册控件
'MsgBox "如果显示注册成功的信息,该文件你可以可删除."
'Application.Quit
End Sub
Public Sub zcrq()
Dim SourceFile, DestinationFile
SourceFile = ThisWorkbook.Path & "\注册控件\MSCOMCT2.OCX" ' 指定源文件名。
DestinationFile = "c:\windows\system32\MSCOMCT2.OCX" ' 指定目的文件名。
FileCopy SourceFile, DestinationFile ' 将源文件的内容复制到目的文件中
Shell "regsvr32 " & DestinationFile, vbHide '注册控件
End Sub
------解决方案--------------------
不是写着吗,注册控件啊。。。
OCX文件就是一些控件。。。
软件里面有用到这些控件。。。
------解决方案--------------------
很好理解啊,你的软件中用到这些控件时就要先注册
------解决方案--------------------