美女视频在线观看免费完整版,杨幂被弄喷水视频在线观看

使用VB快速制作WPS的COM加載項(xiàng)

2018.01.12

1.新建工程，選擇ActiveX Dll。

2.工程、引用、選擇Kingsoft Add-In Designer、Kingsoft Office 1.0 Object Library、Kingsoft WPS 2.0 object Library。

3.將工程名原來(lái)的“工程1”改為“kgsPro”,類名稱的“Class1”改為“AddCommand”
(這里的修改的名稱根據(jù)實(shí)際情況而定義，但在后面的注冊(cè)時(shí)會(huì)用到這兩個(gè)名字）

4.寫入如下的代碼：

Option Explicit
Implements IDTExtensibility2
Private WithEvents wpsApp As WPS.Application
Private WithEvents btnNew As CommandBarButton
Private myId As Integer
Private Sub IDTExtensibility2_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant)
Set wpsApp = Application
End Sub
Private Sub IDTExtensibility2_OnDisconnection(ByVal RemoveMode As AddInDesignerObjects.ext_DisconnectMode, custom() As Variant)
Set wpsApp = Nothing
End Sub
Private Sub IDTExtensibility2_OnStartupComplete(custom() As Variant)
Dim myBar As CommandBar
Set myBar = wpsApp.CommandBars.Add("測(cè)試工具欄")
Set btnNew = myBar.Controls.Add
End Sub
Private Sub IDTExtensibility2_OnAddInsUpdate(custom() As Variant)
'通常這些不需要寫
End Sub
Private Sub IDTExtensibility2_OnBeginShutdown(custom() As Variant)
btnNew.Delete '刪除加載項(xiàng)
End Sub
Private Sub btnNew_Click(ByVal Ctrl As KSO.CommandBarButton, CancelDefault As Boolean)
'wpsApp.ActiveDocument.BeginJob
MsgBox "這是一個(gè)Demo", vbOKOnly, "kongguisheng"
'wpsApp.ActiveDocument.EndJob "這僅僅是一個(gè)Demo", True
End Sub

復(fù)制代碼

5.單擊文件、生成***.dll,保存到C盤下，文件名為kgsPro.dll。

6.Dll生成完成，下面就是注冊(cè)的步驟了。

7.新建一個(gè)文本文檔，保存為AddDemo.reg,寫入如下的內(nèi)容
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Kingsoft\Office\WPS\Addins\kgsPro.AddCommand]
"FriendlyName"="WPS加載項(xiàng)Demo"
"Description"="Konguisheng的Demo系列之加載項(xiàng)"
"LoadBehavior"=dword:00000003
"CommandLineSafe"=dword:00000001

8.雙擊AddDemo.reg，將此導(dǎo)入到注冊(cè)表中。

9.單擊Windows的“運(yùn)行”，輸入regsvr32 C:\kgsPro.dll完成

10.如果要?jiǎng)h除這個(gè)加載項(xiàng)
A.新建一個(gè)文本文檔，保存為DeleteDemo.reg,寫入如下的內(nèi)容
Windows Registry Editor Version 5.00
[-HKEY_CURRENT_USER\Software\Kingsoft\Office\WPS\Addins\kgsPro.AddCommand]
B.單擊Windows的“運(yùn)行”，regsvr32 /u C:\kgsPro.dll （此步不是必須）

本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊舉報(bào)。

打開APP，閱讀全文并永久保存查看更多類似文章

我的dll封裝學(xué)習(xí)筆記（二）

OFFICE 的加載項(xiàng)（add in）（轉(zhuǎn)）

Word的COM加載項(xiàng)開發(fā)指南

C#調(diào)用WPS的兩種方式

VBA生成Excel2003經(jīng)典菜單

二次開發(fā)之Hello World! - 二次開發(fā)和插件 - WPS Office官方論壇 ...

更多類似文章 >>

国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看