I have an object define as followed:

    Private oParameters(25, 2) As Object

This object is initialized with strings on the first column and any kind of types for the second column. After a process, I would like to clear it. Basically, the object need to exist but I need to empty its content. I am doing this:

    Public Function ParameterClear() As Boolean
        Dim lnCounter As Integer
        For lnCounter = 1 To nParameter
            oParameters(lnCounter, 1) = ""
            oParameters(lnCounter, 2) = ""
        Next
        nParameter = 0
    End Function

Is this the most optimized approach?