New Control (gb.qt4)

Dim hControl As Control
hControl = New Control ( ) As "event name"