在運行時在 VBA 中顯示所有變量及其值 (Show all variables and their values in VBA during runtime)

問題描述

在我當前的 Access VBA 項目中，我創建了一個像控制台一樣工作的窗口，現在我正在嘗試添加顯示任何公共變量的可能性。它應該像這樣工作：

Show_var [variable_name]

所以它應該像在我可以輸入的直接窗口中一樣：

? pVar.variable_A

我發現使用

Application.VBE.ActiveVBProject.VBComponents(11).CodeModule.CountOfLines

我可以顯示模塊或表單中的行數，所以我想也許我可以在那裡找到變量，循環遍歷它們，當找到正確的變量時，可以顯示它的值。OFC 我可以創建一個包含所有變量的 Select Case 語句，但這不是我想要的方式，因為它很複雜，並且每次更新我的公共變量列表時都必須更改。</p >

There are so many problems that I think you are out of luck. Let me just list some of them:

There is no way to get a list of all variables ‑ that would mean you would need access to the internal symbol table.
As a consequence, you would have to read the code (CodeModule lets you read the code of a module), and write an own parser to fetch all declarations (hopefully you use Option Explicit)
AFAIK, the is no method that can access the content of a variable via it's name.
Even if there would be any such method: What would you do with different data types, arrays and especially with objects.
If a user runs into problems, often it is a runtime error. If you don't handle that errors with some kind of error handler, the only option if a user cannot enter the debugger is to press "End" ‑ which would destroy the content of all variables.
You have to deal with scope of variables, you can have several variables with the same name and you will likely have lots of variables that are out of scope in the moment you want to dump them.