VB 6.0:
Op pagina 1 heb ik enkele dynamische controls laten aanmaken:
Dim ctlDynamic As New Control
Set ctlDynamic = Me.Controls.Add("Forms.CheckBox.1", "ctlDynamic", "True")
ctlDynamic.Name = "chkType" & i
ctlDynamic.Visible = True
ctlDynamic.Caption = strType(i)
ctlDynamic.Width = 260
ctlDynamic.Left = 18
ctlDynamic.Top = intY
ctlDynamic.Height = 18
addhandler ctlDynamic.Click, AddressOf CheckBox3_Click
intY = intY + 30
Next
Op de volgende pagina wil ik kijken welke van de checkboxen aangevinkt zijn. Daarom voegde ik bij de controls een addhandler toe met een link naar CheckBox3_Click:
Private Sub CheckBox3_Click()
strCheck = ctlDynamic.Name
Nu heb ik de error: Invalid use of the addressof operator
Wie kan mij helpen ?
Op pagina 1 heb ik enkele dynamische controls laten aanmaken:
Dim ctlDynamic As New Control
Set ctlDynamic = Me.Controls.Add("Forms.CheckBox.1", "ctlDynamic", "True")
ctlDynamic.Name = "chkType" & i
ctlDynamic.Visible = True
ctlDynamic.Caption = strType(i)
ctlDynamic.Width = 260
ctlDynamic.Left = 18
ctlDynamic.Top = intY
ctlDynamic.Height = 18
addhandler ctlDynamic.Click, AddressOf CheckBox3_Click
intY = intY + 30
Next
Op de volgende pagina wil ik kijken welke van de checkboxen aangevinkt zijn. Daarom voegde ik bij de controls een addhandler toe met een link naar CheckBox3_Click:
Private Sub CheckBox3_Click()
strCheck = ctlDynamic.Name
Nu heb ik de error: Invalid use of the addressof operator
Wie kan mij helpen ?