At sende et to-dimensionelt array til en funktion i VB6

Du kan overføre via Varianeter i vb6!

Byval BrikK as Variant

_Kan_ man ikke som Boolean? Eller andre typer, for den sags skyld...

Du kan gøre sådan her

ByVal BrikK() as Boolean

Men det skal jo være to-dimensionelt, er VB6 ligeglad? (Det er VB7 ikke)

braqhe> VB7..? Mener du VB.NET, eller har jeg ikke opdaget, at der findes en VB7?

Skrevet i VB6:

Private Sub Command1_Click()
  Dim MitArray(1 To 5, 1 To 6) As String
  Dim svar As Boolean
  FyldArray MitArray
  MsgBox MitArray(1, 5)
End Sub

Private Sub FyldArray(MitArray() As String)
  Dim i As Byte
  Dim j As Byte
  For i = 1 To 5
    For j = 1 To 6
      MitArray(i, j) = "Række " & i & ", kolonne " & j
    Next j
  Next i
End Sub

Om det er en sub eller en Function gør ingen forskel - arrayet overføres på samme måde, fx:

Private Function MinFunction(MitArray() As String) As Boolean
  ...
End Function

Der kaldes sådan her:

  MinVariabel = MinFunction(Mitarray) '<- Kaldes med paranteser omkring

/Martin

PS: Glem "Dim Svar As Boolean" - den har nisserne sat - det er jo snart jul

Takker :) (VB.NET _er_ VB7... kommer 7 ikke efter 6? ;) Lidt ligesom XP er NT5)

Hmm - jeg ville mene, at VB.NET er et helt nyt sprog, der minder lidt om VB - Nok om det :o)

Hmmm.... Jeg ubdres! Var det ikke lige præcis det jeg svarede???

//Nolle_K

Jeg mener

Jeg undres.....

Jo, det var det egentligt - jeg puttede bare mere kød på. Vil du have mine 15?

Nå for helvede!  Jeg har slet ikke set, at jeg har fået 15 point! Så er alt sgu i orden!

Og hvorfor også græde over spildte point! :-))