如何从ACTIVEX控件内部,设定ACTIVEX外部的固有属性
怎么从ACTIVEX控件内部,设定ACTIVEX外部的固有属性
做了一个ACTIVEX控件,想在ACTIVEX控件内部,设定一下ACTIVEX控件本身的属性值,例如可见,不可见,
不知道怎么从控件内部,找到这个控件的外部属性
------解决方案--------------------
用向导,做影射
------解决方案--------------------
通过Extender,比如:
做了一个ACTIVEX控件,想在ACTIVEX控件内部,设定一下ACTIVEX控件本身的属性值,例如可见,不可见,
不知道怎么从控件内部,找到这个控件的外部属性
------解决方案--------------------
用向导,做影射
------解决方案--------------------
通过Extender,比如:
- VB code
Dim WithEvents btn As CommandButton
Private Sub btn_Click()
'设置控件可视属性
UserControl.Extender.Visible = False
End Sub
Private Sub UserControl_Initialize()
UserControl.BackColor = vbRed
Set btn = UserControl.Controls.Add("VB.CommandButton", "btn")
btn.Visible = True
End Sub
Private Sub UserControl_Terminate()
UserControl.Controls.Remove "btn"
End Sub