vb-ActiveX控件

 UserControl屬性
Public  決定控制是否可以在另一個程序中使用
propertypages 設置控制項的屬性頁
InvisibaleAtruntime 決定控件在運行時是否可見
ToolBoxBitmap 設定控件在工具箱上的圖案

Usercontrol的重要事件
Initialize 控件被建立時發
InitProperties 控件被摧毀時被觸發
initpropertises 發生在第一次把控件放在窗體上時,通常在該事件過程中讀取介面的屬性
Resize  控件改育變控件大小時觸發
GotFocus 當輸入焦點移入控件,或移入控件中的對象時觸發
LostFocus 當輸出焦點移出控件,或移出控件中的對象時觸發
enterFocus 當輸入焦點移入控件時觸發
Exitfocus 當輸入焦點移出控件時觸發

添加事件
1.聲明事件 Event fileListDblclick()
2.在要觸發的時候使用RaiseEvent關鍵字觸發  
public sub filFile_dblclick()
 raiseEvent filelistDblclick
end sub

添加屬性
ReadProperties事件 寫讀取屬性值代碼
WriteProperties事件 寫保存屬性值代碼
屬性是保存在一個類型為PropertyBag的對象中
ex: object.writeProperty("屬性名",保存值[,缺省值])
    object.readproperty("屬性名"[,缺省值])
 添加方法 sub 為public屬性
propertychange "屬性名" 方法為屬性改變後發生

設計屬性面
applychanges() 當用戶單擊屬性頁上的"應用" 或
selectionchanged 當屬性頁第一次被加載到屬性窗口發生的事件
selectedcontrol是個集合對象,代表被選 中的控件 多表控件用下標區分,只有一個用selectcontrol(0)

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

物欲添彩

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值