Arrays an API-Funktionen übergeben

04.03.2005

Vielleicht setzen Sie eine eigene VBA-Funktion ein, die ein Array von Elementen als Parameter erwartet. Arrays können Sie auch an API-Funktionen übergeben, indem Sie das erste Element als ByRef-Parameter übergeben.

Hiervon ausgenommen sind lediglich Zeichenketten-Arrays, da die einzelnen String-Elemente unterschiedliche Längen aufweisen.

Die folgende Funktion fnMwstBerechnen erwartet ein Array von Integer-Werten und berechnet die Mehrwertsteuer für jedes Element der Liste:

Declare Function fnMwstBerechnen Lib "Finanz.dll" _
        (ByRef intListe As Integer, _
        intElemente As Integer) As Long

Public Function fnMwstFürListe()

Dim ret As Long, aryListe(10) As Integer, i As Integer

    For i = 1 To 10 ' Array mit Beispieldaten auffüllen
        aryListe(i) = i * 4
    Next if

    ' Referenz des ersten Elements übergeben
    ret = fnMwstBerechnen(aryListe(1), 10)

End Function

Dienstleistungen

Als starker Partner an Ihrer Seite unterstützen wir Sie in folgenden Breichen:

Access-Programmierung

Benötigen Sie Unterstützung bei der Programmierung von Access-Anwendungen? Wir bieten die gesamte Bandbreite von der Access-Programmierung auf Stundenbasis bis zur Durchführung eines Software-Projektes als Auftragsarbeit an. Kontaktieren Sie uns für ein kostenloses Erstgespräch.

Software-Beratung

Haben Sie ein Software-Projekt und Sie wissen nicht, ob Access die richtige Plattform ist? Wir haben über 20 Jahre Erfahrung beim Erstellen von Windows-, Web und mobilen Anwendungen. Kontaktieren Sie uns für eine kostenlose Erstberatung.