microsoft vbcontrolextender event are not fire.

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

   Hi 

 we are able to set VBControlExtender to tab control, 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: microsoft vbcontrolextender event are not fire. Posted: 06 November 2006 at 9:15am
	Hi we are able to set VBControlExtender to tab control, 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