| |
Visual-Basic EinsteigerZweidimensionales Array - Werte auf einen Schlag ändern | | | Autor: V A T | Datum: 14.01.23 13:15 |
| Hallo,
ich habe eine Frage und hoffe auf Eure Experten-Hilfe: Gibt es einen einfacheren Weg, wenn ich in einem zweidimensionalen Array einen Teil der Werte auf 0 setzen will, als eine Schleife zu benutzen?
Um zu verdeutlichen, was ich meine, hier beispielhaft der Code den ich bisher nutze:
Dim DATEN() as variant
Dim anzahl_Daten as integer
'Nachdem das Array im Programmverlauf inhaltlich gefüllt wurde
'sollen nun alle DATEN(3,x) wieder auf den Wert 0 gesetzt werden
'die Variable anzahl_DATEN enthält die Obergrenze für x
for i=0 to anzahl_DATEN
DATEN(3,i)=0
next i Funktionieren tut das, fühlt sich halt nur nicht so smart an. Gibt es einen Weg das cleverer zu lösen?
Gruß und Danke
V A T
Vielen Dank an alle in diesem Forum, welche mir Ihre Zeit schenken und sich mit meinen Problemen befassen! Ich weiß das ernsthaft zu schätzen und danke allen, die sich mit dieser Frage befassen herzlich!!! | |
Re: Zweidimensionales Array - Werte auf einen Schlag ändern | | | Autor: Wolfgang Schwarz | Datum: 24.01.23 21:35 |
| wenn es nur darum geht alle Inhalte auf 0 zu setzen würde ich REDIM verwenden.
Wolfgang Schwarz | |
Re: Zweidimensionales Array - Werte auf einen Schlag ändern | | | Autor: Manfred X | Datum: 29.01.23 10:32 |
| Hallo!
Du könntest eine Verallgemeinerung programmieren, bei der
einer Funktion ein Array und ein Wert für den ersten Index
übergeben wird, in der durch Nutzung von LBound und Ubound ein
"Vektor" mit einem als dritten Parameter gegebenen Wert belegt wird.
Ansonsten kann man noch mit der SafeArray-Struktur spielen.
(Beispiele findet die VBArchiv-Suchmaschine) | |
Re: Zweidimensionales Array - Werte auf einen Schlag ändern | | | Autor: V A T | Datum: 29.01.23 21:00 |
| Hallo Wolfgang,
danke für Deinen Tipp, der aber nicht zum beschriebenen Problem passt - oder ich habe eine grundsätzliche Wissenslücke.
Mit Redim kann ich ja nur das Komplette Array zurücksetzen (und das wäre ja auch nicht die Vergabe eines Wertes 0), nicht einzelne Dimensionen des Arrays.
Trotzdem danke
Gruß
V A T
Vielen Dank an alle in diesem Forum, welche mir Ihre Zeit schenken und sich mit meinen Problemen befassen! Ich weiß das ernsthaft zu schätzen und danke allen, die sich mit dieser Frage befassen herzlich!!! | |
Re: Zweidimensionales Array - Werte auf einen Schlag ändern | | | Autor: V A T | Datum: 29.01.23 21:03 |
| Hallo Manfred,
danke für Deine Infos und den interessanten Verweis auf das SafeArray-Thema.
Das mit der Verallgemeinerung wäre natürlich möglich, aber das löst ja das eigentliche Problem nicht.
Ich muss trotzdem die Schleifen durchlaufen - und das kostet Zeit. Unabhängig davon, ob auf den Einzelfalll programmiert oder Verallgemeinert.
Ich suchte nach irgendeinem supertollen Arraybefehl. Aber wie in dem SafeArray-Artikel schon zu beginn steht: Da gibt es wohl sehr wenig.
Danke für Deine - wie immer kompetente - Unterstützung!!!
Gruß
V A T
Vielen Dank an alle in diesem Forum, welche mir Ihre Zeit schenken und sich mit meinen Problemen befassen! Ich weiß das ernsthaft zu schätzen und danke allen, die sich mit dieser Frage befassen herzlich!!! | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
sevISDN 1.0
Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Weitere InfosTipp des Monats sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|