Control Type

[Joacim Andersson]

That's strange. I don't get any errors like that. Here's what I did to try it out.

Start a new standard EXE project. Add one checkbox and set its index property to 0 (zero). Add a command button to the form and put the following codde in its click event:

Private Sub Command1_Click()
    Dim X As Variant
    Dim iCount As Integer

    Set X = Check1
    iCount = X.Count
    Load X(iCount)
    With X(iCount)
        .Move .Left, X(iCount - 1).Top + .Height
        .Visible = True
    End With
End Sub

Now, every time you click on the CommandButton it load an other CheckBox.

Best regards

[Joacim Andersson]

Originally posted by kedaman
The count is a property of a collection object so i guess you have to delclare x as a collection, and add your contols in it

A control array is actually equal to a control collection. You can use the For Each Next syntax on it. The difference is that it can start with any index and it doesn't have a Remove method.

[kedaman]

Another diff is that you can't access the properties from a list, i think the contol arrays are classcollections

[WadeD]

That works...just need to figure out what I was doing differently. Thanks Joacim!

[WadeD]

I realized what's different. Try using your same code but alter the

Set X = Check1

Try using:

'In the Checkbox
Set X = ActiveControl
Msgbox X.Count 'Gives error 438: object doesn't support this property or method

or:

'In the command button
For each X in Controls
   If X.Name = "Check1" Then
      Msgbox X.Count 'Gives error 438: object doesn't support this property or method
   End If

I need a modular set statement. What can I do to make the set statement dynamic?

Thanks.

[Joacim Andersson]

Could this be of any help then?

If ActiveControl.Name = "Check1" Then
    Set X = Check1
    MsgBox X.Count
Else
    Set X = ActiveControl
End If

[WadeD]

Thanks for the replies. It's close but I don't want to hard-code Check1 in the set statement. I can read "Check1" from a file or database field, so I'm trying to make this dynamic. Any other ideas?