Har en COM komponent som en parameter tar en array av en egendefinierad typ

Dim params() As CParameter

Redim params(0)

Nr 1 Första Dim satsen skall vara Public alltså i Formens General

Testa Redim Redim params(1) eller

det där förstod jag inte mycket av..

varför måste första dim satsen vara public, den funkar ju ifall jag inte försöker skicka en tom array
och vill inte ha några element i arrayen om jag inte har några parametrar, vill alltså att den ska komm fram som en array utan element, alternativt null.

Ok med public.Men hur många parametrar har du när det funkar ?

Låt oss säga att du har 10.
Då kan du göra Redim parms(10) nu står det Null i alla 11

Eftersom Vi inte ser hela sammanhanget var du skickar parms så föreslog jag Public
Dvs du kan skicka från vilken Sub eller Function som du vill och ligger i samma Modul.

"Vad vet jag mitt arma fnask" som flickan sa .
Det finns kanske nån parameter som alltid måste vara med

Alltså, funktionen jag kallar på är en sorts rpc funktion, dvs. den tar ett funktionsnamn och en params() as CParameter. Hur många som ska finnas i params beror på vad funktionsnamnet. Men om jag vill kalla på en funktion som inte ska ha några parametrar får jag det inte att funka

sub btnFoo_Click()
dim params() as CParameter

' sätt storleken på parameter arrayen
If m_Params.Count Then
  ReDim params(0 To m_Params.Count - 1)
Else
   ' ??????? <- vad ska jag ha här ???
End If
'ladda parametrar från annat ställe  
i = 0
For Each param In m_Params
   params(i) = param
   i = i + 1
Next

'kalla på funktionen
txtResult.Text = mitt_objekt.min_funktion(txtMethod.Text, params)

end sub

string MakeRpc(string methodName, ref CParameter[] parameters);

Fick ett förslag om att

Dim x As Array
x = Array.CreateInstance(GetType(CParameters), 0)

Jag ser två(2) alternativ från VB6

Dim parms() As String
eller
Dim parms() As Long

Värt att testas

dim params() as string
funkade inte heller, (måste redim:ma även den innan den gick att skicka som funktionsparameter)

en long array känns inte rätt..

Gjorde för tillfället en fullösning (som jag inte är helt nöjd med), genom att skicka ett dummy element om det inte finns några riktiga element.

Sista fula försöket

Dim Parms() As Variant