Topic: Dynamic creation of objects on vb6
Hello children! There is a code at which it would be desirable to add one button various objects, at present it is the button but that that is impossible what event does not happen!
Private WithEvents Command1 As CommandButton Private Sub Command1_Click () Set Command1 = Controls. Add ("VB.CommandButton", "Command1") With Command1 .Visible = True .Height = 1000 .Width = 1000 .Top = 100 .Left = 100 .Caption = "new" End With End Sub