Tabcontrol with Vb extenter

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi

 we are able to set VBControlExtender to tabcontrol but we not able get the events notifaction from vbcontrolextender. kindly give us a solutions.
sample project.

Option Explicit

Dim WithEvents tabs As VBControlExtender

Private Sub Command1_Click()
    Licenses.Add "Codejock.TabControl.10.3.1"
    Set tabs = Controls.Add("Codejock.TabControl.10.3.1", "tab1", Me)
    tabs.Move 0, 0, ScaleWidth, ScaleHeight
    tabs.itemcount = 3
    tabs.Visible = True
End Sub

Private Sub tabs_ObjectEvent(Info As EventInfo)
    Debug.Print Info.Name
End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
Sampath Kumar S Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 26 July 2006 Location: India Status: Offline Points: 5	Post Options Post Reply Quote Sampath Kumar S Report Post Thanks(0) Quote Reply Topic: Tabcontrol with Vb extenter Posted: 27 October 2006 at 7:48am
	Hi we are able to set VBControlExtender to tabcontrol but we not able get the events notifaction from vbcontrolextender. kindly give us a solutions. sample project. Option Explicit Dim WithEvents tabs As VBControlExtender Private Sub Command1_Click() Licenses.Add "Codejock.TabControl.10.3.1" Set tabs = Controls.Add("Codejock.TabControl.10.3.1", "tab1", Me) tabs.Move 0, 0, ScaleWidth, ScaleHeight tabs.itemcount = 3 tabs.Visible = True End Sub Private Sub tabs_ObjectEvent(Info As EventInfo) Debug.Print Info.Name End Sub