获取VB6变量的名称作为字符串值
问题描述:
我想获得一个VB6变量的名称作为字符串值,以便在日志工具中处理它我正在使用像下面一样(请检查!变量名! !)。获取VB6变量的名称作为字符串值
有什么办法可以达到这个目的吗?我对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
答
在VB6中是不可能的。你必须传递变量的名称。
AddVariableValue2Log(True, "MyFunction", "MyVariable", MyVariable, Now())
+0
谢谢!我怀疑它,但我无法找到任何有用的信息。 – TPPZ 2012-08-16 11:13:52
+1因为我希望它*有可能,但我不相信它。 – MarkJ 2012-08-16 11:06:00
你应该尝试(并尝试过) https://www.google.co.uk/search?q=VB6+obtain+debug+info+programmatically+at+runtime 它提出了很多关于相同 – 2012-08-16 11:06:31
@GermannArlington感谢您的建议。事实上,我不能像你那样用Google解释自己。我在Google和*上都使用了“获取VB6变量名称作为字符串值”之类的查询,但未能找到答案。 – TPPZ 2012-08-16 11:16:00