vb6動態載入ocx控制項
1.將ocx引用入你的專案內。
2.[移除未使用的ActiveX控制項的相關資訊],打勾取消
專案->屬性->製成->[移除未使用的ActiveX控制項的相關資訊],打勾取消
3.宣告
Dim WithEvents ocxobj As 控制項名稱
4.載入控制項
判斷控制項是否已經存在,如已經存在將其移除。
If Not ocxobj Is Nothing Then
Controls.Remove("物件名稱")
End If
載入控制項
Set ocxobj = Controls.Add("專案名稱.控制項名稱" , "物件名稱")
留言
張貼留言