已解決，從來都是VB或VBA下寫程序，從沒試過兩者之間導(dǎo)入或?qū)?，也沒試過把VBA窗體封裝在DLL中。
附導(dǎo)入方法和調(diào)用方法：
1、VBA中在窗體上點(diǎn)擊右鍵，選擇導(dǎo)出，得到一個(gè)后綴為frm的窗體文件；
2、在VB工程資源管理器中點(diǎn)右鍵，選擇添加，再選擇添加文件，選中上述導(dǎo)出的frm文件，點(diǎn)擊打開按鍵，窗體會被加至VB工程資源管理器的設(shè)計(jì)器中（窗體中的代碼被同步復(fù)制），你可以雙擊打開查看對象，右鍵選擇查看代碼；
3、假設(shè)工程名為：TestSystem，已導(dǎo)入的窗體名為UserForm1，新建一個(gè)類：Test，在Test類中寫入代碼如下：
- Sub Wahaha()
- Dim Ts As New TestSystem.UserForm1
- Ts.Show vbModal
- Set Ts= Nothing
- End Sub
4、存盤，生成TestSystem.dll；
5、在VBA工程中Show窗體的方法：當(dāng)然先引用TestSystem后，代碼如下：
- Private Sub CommandButton1_Click()
- Dim ABC As New TestSystem.Test
- ABC.Wahaha
- Set ABC = Nothing
- End Sub
6、完工！點(diǎn)擊CommandButton1后即可Show出封裝在DLL文件的窗體。
[
本帖最后由 ctincob 于 2009-11-20 18:46 編輯 ]
本站僅提供存儲服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請
點(diǎn)擊舉報(bào)。
