4

次のように使用しているロギング機能で処理するために、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
4

1 に答える 1

6

VB6ではできません。変数の名前を渡す必要があります。

AddVariableValue2Log(True, "MyFunction", "MyVariable", MyVariable, Now())
于 2012-08-16T10:57:40.303 に答える