Domino 9 und frühere Versionen > ND6: Entwicklung

Dynamisches Array

(1/4) > >>

brathaenchen:
Hi

wie kann ich ein Array dynamisch definieren?
Ich habe zur Zeit:
Dim st_Fields(1 To 100) As String
Möchte aber gerne das es dynamisch ist.
Dim st_Fields() As String und Dim st_Fields(collection2.count) As String probiert aber das funktionierte leider nicht.

Danke schon mal!!!



   Dim collection2 As NotesDocumentCollection
   Dim currentResponse As NotesDocument
   Set collection2 = doc.Responses
   
   Dim number As Long
   number = 1
   Dim csv As CSVFile
   
   Dim st_Fields(1 To 100) As String
   
   Set currentResponse = collection2.GetFirstDocument ()
   While Not currentResponse Is Nothing
      st_Fields(number) = currentResponse.CSVField(0)
      number = number + 1
      'Msgbox "Hier kommt jetzt was "  + currentResponse.CSVField(0)
      Set currentResponse = collection2.GetNextDocument ( currentResponse )
   Wend

LuckyMan:
Schau dir mal in der Notes-Hilfe das gute alte Redim Preserve an...

Gruß

brathaenchen:
ok habs gefunden danke

Thomas Schulte:
Das so einzusetzen kann mit deutlichen Performanceeinbrüchen bestraft werden, speziell dann wenn man es in der Art eines Zählers verwendet. Je nach Kontext ist es sinnvoller mit Lists oder mit einem Redim zu arbeiten vor dem man die Anzahl der benötigten Elemente rausbekommt.

LuckyMan:
Ok ok...aber er sprach auch nicht davon, dass er ein schnelles Array haben will  :o :o

Gruß

Navigation

[0] Themen-Index

[#] Nächste Seite