Wie zu Inspizieren Call-Stack

Wäre es möglich zu sehen, die CallStack in VBA für MS Access 2003? Das heißt, würde es möglich sein zu sehen, was procedure oder function anderen function genannt wurde?

  • Dies ist die Art von Aufgabe, die ASM ist gut für.
InformationsquelleAutor THEn | 2009-03-25
  1. 3

    Gibt es keine programmgesteuerte Möglichkeit in VBA, um die Aufrufliste anzeigen, die ich kenne. Die übliche Lösung für dieses problem ist die Verwendung eine gewisse Struktur zu verfolgen, den Aufruf von Funktionen, aber es scheint immer wie ein Durcheinander für mich, und wirklich nur benutzt, wenn Programmierung (nicht zur Laufzeit), in dem Fall scheint es mir, dass die VBE-built-in-Fähigkeit für das sehen der call-stack ist ausreichend.

    Und, BTW, ich habe immer im call-stack-Taste auf meinem VBE-Symbolleiste, da es eines der am häufigsten verwendeten Funktionen für mich. Ich auch hinzufügen, die kompilieren-Schaltfläche -- ich denke, es ist verrückt, dass es nicht auf der Symbolleiste standardmäßig, weil es ermutigt die Menschen, um code ohne jemals zwingen kompilieren. Dann wieder, ist Access 2000 nicht einmal verwenden Sie "Option Explicit" standardmäßig (angeblich Konsistenz mit anderen apps mit der VBE - -- in anderen Worten, dumb-down-Zugriff, um es in Einklang mit apps, die nicht annähernd so code-heavy).

    Aber ich schweife ab...

    InformationsquelleAutor David-W-Fenton
  2. 11

    Zur Laufzeit, Menü Ansicht -> Call Stack " (oder drücken Sie STRG + L).

    InformationsquelleAutor shahkalpesh
  3. 2

    Schließlich, fügen Sie einen optionalen parameter in der Funktion auf, und übergeben Sie den Namen des Anrufers auf diese Weise. Für Formulare, die Sie verwenden können Me.Name als parameter.

    InformationsquelleAutor Patrick Honorez
  4. 2

    Ja, das ist möglich, ABER es ist nicht sehr nützlich!

    Private Declare Sub SetMode Lib "vba332.dll" Alias "EbSetMode" (ByVal lngMode As Long)
Private Declare Function GetCallStackCount Lib "vba332.dll" Alias "EbGetCallstackCount" (lngCount As Long) As Long
Private Declare Function GetCallStackFunction Lib "vba332.dll" Alias "EbGetCallstackFunction" (ByVal Lvl As Long, ByRef strBase As String, ByRef strModule As String, ByRef strFunction As String, ByRef Done As Long) As Long

    Vor der Verwendung GetCallStackCount und GetCallStackFunction rufen Sie SetMode(2), und nach SetMode(1).

    InformationsquelleAutor user4594176
Schreibe einen Kommentar