Question

Is it possible to make a procedure have a single parameter but the values for that parameter are more than one?

I have this procedure:

Public Sub autoComplete(ByVal cboCombo As ComboBox)
    With cboCombo
        .AutoCompleteMode = AutoCompleteMode.Append
        .AutoCompleteSource = AutoCompleteSource.ListItems
    End With
End Sub

Now I was wondering if there is a way to use it like this:

autoComplete(myCombobox1, myCombobox2, myCombobox3)

Or can I use a procedure like this with ‘With…End With’?

Answer 1

You should take a ParamArray parameter:

Public Sub AutoComplete(ByVal ParamArray boxes As ComboBox())
    For Each box In boxes
        With box
            .AutoCompleteMode = AutoCompleteMode.Append
            .AutoCompleteSource = AutoCompleteSource.ListItems
        End With
    Next
End Sub