Autor Thema: Variant durchsuchen  (Gelesen 1150 mal)

Offline dia

  • Junior Mitglied
  • **
  • Beiträge: 64
  • Geschlecht: Männlich
  • |_ |\|
Variant durchsuchen
« am: 11.02.04 - 14:39:21 »
Meine Frage ist bestimmt ganz leicht zu beantworten. Aber ich bekommst nicht hin. Also ich habe eine Variable vom Typ Variant. In der habe ich ein Array von Strings gespeichert. Nun will ich alle einzeln abarbeiten lassen. Ich weiß aber nicht wieviele es sind. Kann man irgendwie die Anzahl rausfinden oder mit einer Forall Schleife das Problem lösen? Helft mir bitte.

Offline Axel

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re:Variant durchsuchen
« Antwort #1 am: 11.02.04 - 14:46:02 »
Hi,

das geht z.B. so:

dim idx As Integer

for idx = 0 to Ubound(Variant-Variable)
  'Tu was
next


Axel


Ohne Computer wären wir noch lange nicht hinterm Mond!

Offline dia

  • Junior Mitglied
  • **
  • Beiträge: 64
  • Geschlecht: Männlich
  • |_ |\|
Re:Variant durchsuchen
« Antwort #2 am: 11.02.04 - 15:14:11 »
Ja so funtionierts. Dankeschön. :-)

Offline Axel

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re:Variant durchsuchen
« Antwort #3 am: 11.02.04 - 15:24:27 »
Hi,

setzt du bitte den Thread noch auf "Erledigt".

Danke.


Axel
Ohne Computer wären wir noch lange nicht hinterm Mond!

Offline ata

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 5.092
  • Geschlecht: Männlich
  • drenaiondrufflos
    • Anton Tauscher Privat
Re:Variant durchsuchen
« Antwort #4 am: 12.02.04 - 13:41:09 »
... um die Anzahl der Elemente zu ermitteln benötigst du keine Schlaufe

Dim anz As Long
Dim vArray As Variant

' # setzen des Array bleibt dir überlassen

If IsArray( vArray) Then
   anz = Ubound( vArray) - LBound(vArray) + 1
End If

... um einen bestimmten String darin zu suchen kannst du ArrayGetIndex verwenden => siehe Notes Hilfe...

ata
« Letzte Änderung: 12.02.04 - 13:48:29 von ata »
Grüßle Toni :)

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz