Variablenname als String verwenden
Hallo,
ich habe ein Problem das ich nicht ganz nachvollziehen kann.
Die zwei folgenden Codevarianten sollten meiner Meinung nach das gleich tun.
Aber nur die erste funktioniert. Meine Frage ist warum funktioniert die Zweite nicht?
Variante 1
VBA Code:
Dim obFctTrend As RtFunction
Dim nIndex As Integer
nIndex = 1
Set obFctTrend = thisProject.RtFunctions.Item("FU_BU_Hauptfenster_Trend_Energie_Verbrauch")
obFctTrend.DynProperties("PictFilter[0].Curve[0].VarInfo.Variable") = thisProject.Variables.Item("Visu_UDINT_EnergieVerbrauch[" & nIndex & "]").Name
obFctTrend .Start
Variante 2
VBA Code:
Dim sVariable As Variant
Dim obFctTrend As RtFunction
Dim nIndex As Integer
nIndex = 1
sVariable = thisProject.Variables.Item("Visu_UDINT_EnergieVerbrauch[" & nIndex & "]").Name
Set obFctTrend = thisProject.RtFunctions.Item("FU_BU_Hauptfenster_Trend_Energie_Verbrauch")
obFctTrend.DynProperties("PictFilter[0].Curve[0].VarInfo.Variable") = sVariable
obFctTrend .Start
Der Unterschied ist ja nur, einmal übergebe ich den Variablennamen direkt an die DynProperties und einmal in einer Stringvariable. Macht das einen Unterschied?
Gruß Tobi
This is a migrated post! Originally posted on 07.12.2015 by user zero. Please be aware that information can be outdated.