Bestimmen der Anzahl der Dimensionen in einer Arrayvariablen

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 152288 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Es ist keine integrierte Funktion die Anzahl der Dimensionen in Array-Variablen in Visual Basic für Applikationen zurückgegeben. Die einfachste Methode dazu ist das Durchlaufen der Dimensionen und verwenden einen Fehlerhandler zum Zurückgeben der Anzahl von Dimensionen.

Weitere Informationen

Microsoft bietet Programmierbeispiele für Abbildung nur ohne Gewährleistung oder konkludent. Dies umfasst, ist jedoch nicht beschränkt auf konkludenten Garantien der Handelsüblichkeit oder Eignung für einen bestimmten Zweck. Dieser Artikel setzt voraus, dass Sie mit der Programmiersprache, die Programmierungsbeispiele ist und mit den Tools, die zum Erstellen und Debuggen von Prozeduren verwendet werden vertraut sind. Microsoft Support-Technikern helfen Erläuterung die Funktionalität einer bestimmten Prozedur, Sie werden ändert jedoch nicht diese Beispiele bieten Funktionen hinzugefügt oder Verfahren, um Ihren Anforderungen entsprechend zu erstellen. Die Anzahl der Dimensionen in einer Visual Basic für Applikationen Arrayvariable bestimmen am einfachsten die Routine zu versuchen, einen Vorgang mit jeder Dimension erhalten werden. Wenn es versucht, die Aufgabe zu einer nicht vorhandenen Dimension, wird ein Fehler zurückgegeben. Ein Fehlerhandler kann verwendet werden, um die Dimension zurückzugeben, in dem die Aufgabe zuletzt verwendet wurde, erfolgreich. Eine Möglichkeit zum Testen einer Dimension ist die Verwendung der LBound-Funktion. LBound-Funktion nimmt zwei Argumente, die Arrayvariable und bestimmten Dimension und gibt die unteren Begrenzungen der Dimension zurück. Mit dieser Funktion auf eine nicht vorhandene Dimension zurückgegeben ein Fehler. Gekoppelt mit einer Fehlerbehandlungsroutine, kann Hiermit werden die Anzahl der Dimensionen bestimmen.

Visual Basic-Beispielprozedur

Diese Routine überprüft das Array mit dem Namen Xarray LBound jeder Dimension testen. Verwenden einer for...Next-Schleife, durchläuft die Routine die Anzahl der möglichen Arraydimensionen bis zu 60000, bis ein Fehler generiert wird. Dann der Fehlerhandler Leistungsindikator Schritt, die die Schleife akzeptiert auf Fehler subtrahiert eine (da das vorige der letzten Zeile ohne Fehler war), und das Ergebnis in einem Meldungsfeld angezeigt.
   Sub NumberOfDimensions()

      'Dimensions Xarray as an array.
      Dim Xarray(1 to 10, 5 to 20, 256 to 300, 8, -5 to 0)

      'Sets up the error handler.
      On Error GoTo FinalDimension

      'Visual Basic for Applications arrays can have up to 60000
      'dimensions; this allows for that.
      For DimNum = 1 to 60000

         'It is necessary to do something with the LBound to force it
         'to generate an error.
         ErrorCheck = LBound(Xarray, DimNum)

      Next DimNum

      Exit Sub

      ' The error routine.
   FinalDimension:

      MsgBox "The array has " & DimNum - 1 & " dimensions"

   End Sub
				

Informationsquellen

Weitere Informationen dazu, wie Sie Hilfe zu Visual Basic für Applikationen erhalten finden Sie in der folgenden Artikel der Microsoft Knowledge Base:
163435VBA: Programmieren von Ressourcen für Visual Basic für Applikationen

Eigenschaften

Artikel-ID: 152288 - Geändert am: Mittwoch, 11. Oktober 2006 - Version: 2.3
Die Informationen in diesem Artikel beziehen sich auf:
  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 95 Standard Edition
  • Microsoft Excel 5.0 Standard Edition
  • Microsoft Excel 98 für Macintosh
Keywords: 
kbmt kbdtacode kbhowto kbprogramming KB152288 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 152288
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.
Disclaimer zu nicht mehr gepflegten KB-Inhalten
Dieser Artikel wurde für Produkte verfasst, für die Microsoft keinen Support mehr anbietet. Der Artikel wird deshalb in der vorliegenden Form bereitgestellt und nicht mehr weiter aktualisiert.

Ihr Feedback an uns