获取VB6变量名的字符串值

Question

我想要将VB6变量的名称作为字符串值获取，以便在使用以下记录工具时处理它（请检查!!! VariableName !!!）。

有没有办法实现这个目标？我对VB6非常陌生，但我需要维护和调试现有的旧VB6代码。

Public Sub AddVariableValue2Log(ByVal checkDebug, _
                                ByVal sFunctionName As String, _
                                ByVal sVariableValue As String, _
                                ByVal sTimeStamp As String)

  If checkDebug Then
    Dim sLogPath As String
    sLogPath = "C:\Temp\Log_" & sTimeStamp & ".txt"

    Dim fn As Integer
    fn = FreeFile

    Open sLogPath For Append As #fn
    Write #fn, Now & "|" & sFunctionName & "|>>>!!!VariableName!!! value: [" & sVariableValue & "]"
    Close #fn
  End If

End Sub

- TPPZ

---

+1，因为我希望它是可能的，但我不相信它是可能的。 - MarkJ

你应该尝试（并且已经尝试过）https://www.google.co.uk/search?q=VB6+obtain+debug+info+programmatically+at+runtime。这会带出许多关于同一主题的早期讨论。 - Germann Arlington

@GermannArlington 谢谢你的建议。实际上我无法像你一样用Google清晰地表达自己。我在Google和StackOverflow上使用了查询，例如“获取VB6变量名作为字符串值”，但未能找到答案。 - TPPZ

Answer 1

在VB6中不可能做到。您需要传递变量的名称。

AddVariableValue2Log(True, "MyFunction", "MyVariable", MyVariable, Now())

- Erdogan Kurtur

---

谢谢！我怀疑这一点，但是我找不到任何有用的信息。 - TPPZ