VB如何开发控件
我做了一个控件,但怎样也能,做出一个控件的事件?(例如:单击事件...等等)
请你,请教
谢谢
答案:Tabstrip 应用实例:创建选项卡式对话框 TabStrip 控件用来创建包含多个选项卡的对话框。选项卡之间通常具有一定关系,属于某一大类,因此需要将它与其它选项卡放在同一对话框中。在该应用实例中,创建了用来设置 RichTextBox 的字体和缩进的选项卡式对话框。 代码分别如下: Private Sub optBullet_Click() 'Form 对象的 ScaleMode 被设置为“缇”。 frmRTF.rtfData.BulletIndent = 500 frmRTF.rtfData.SelBullet = True End Sub Private Sub optNormal_Click() frmRTF.rtfData.SelBullet = False End Sub 在 Load 事件中使用 Move 方法放置 Frame 控件 为了在客户区上放置 Frame 控件,可以在 Form 对象的 Load 事件中使用 Move 方法,如下所示: Private Sub Form_Load() 'TabStrip 名为“tabRTF”。 'Frame 控件名为“fraTab”。 For i = 0 To fraTab.Count - 1 With fraTab(i) .Move tabRTF.ClientLeft, _ tabRTF.ClientTop, _ tabRTF.ClientWidth, _ tabRTF.ClientHeight End With Next I '将第一个 fraTab 控件显示在最前面。 fraTab(0).ZOrder 0 End Sub