Freitag, 10. Februar 2012

Home
Tipps
Bücher
Software
News / Links
Hilfe
Impressum

Sponsored by
QualityHosting

Tipp/Trick
Arrays an API-Funktionen übergeben
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


Ein Service der TriniDat Software-Entwicklung GmbH - Am Wehrhahn 45 - 40211 Düsseldorf

  Suche
Suche starten
  Service
Leserbrief / Frage zu Access
Kontakt
  NewsLetter
NewLetter bestellen
NewsLetter abbestellen
  Partner-Seiten
HyperLink

www.trinidat.de


HyperLink

www.fulldotnet.de