點擊菜單:項目=》添加引用 彈出窗口后選擇“COM”項,然后找到你要加載的控件。
阿克陶ssl適用于網(wǎng)站、小程序/APP、API接口等需要進行數(shù)據(jù)傳輸應(yīng)用場景,ssl證書未來市場廣闊!成為成都創(chuàng)新互聯(lián)的ssl證書銷售渠道,可以享受市場價格4-6折優(yōu)惠!如果有意向歡迎電話聯(lián)系或者加微信:18982081108(備注:SSL證書合作)期待與您的合作!
記得先調(diào)用CMD使用 regsvr32 注冊你準(zhǔn)備加載的控件哈。
工具箱右鍵單擊——選擇項……——選擇.net組件或com組件——點擊“瀏覽”選擇控件dll文件,然后工具箱中就會出現(xiàn)新加的控件
Private WithEvents NewTextBox As TextBox
'通過使用WithEvents關(guān)鍵字聲明一個對象變量為新的命令按鈕
Private Sub Command1_Click()
If NewTextBox Is Nothing Then
Set NewTextBox = Controls.Add("VB.TextBox", "cmdNew", Form1)
NewTextBox.Move 200, 200
NewTextBox.Width = Form1.Width - 450
NewTextBox.Height = Form1.Height - 1400
NewTextBox.Visible = True
End If
End Sub
Private Sub Command2_Click()
If NewTextBox Is Nothing Then
Exit Sub
Else
Controls.Remove NewTextBox
Set NewTextBox = Nothing
End If
End Sub
這是不可避免的,除非更換電腦硬件,讓處理器及內(nèi)存處理得更快,或是不要用自帶的 Panel 和 Label 控件,自定義一個容器,內(nèi)容自繪。
卡頓主要原因:
1、控件多了,電腦必然會慢,因為在 Windows 里每個控件都相當(dāng)于一個窗口,有自己的句柄,系統(tǒng)需要維護對應(yīng)的窗口消息,那么一定會卡頓,只能緩解不能消除。
2、可以用多線程,在子線程中更新控件,通過委托的方式通知主線程,可以有效緩解卡頓的問題。