also auf die schnelle würd ich das so machen.
Code:
If d1>2 And d2=x Then
Component.IsActive("Part1:1")=True
Component.IsActive("Part2:1")=False
Component.IsActive("Part3:1")=False
Else If d1>2 And d2=y Then
Component.IsActive("Part2:1")=False
Component.IsActive("Part2:1")=True
Component.IsActive("Part3:1")=False
Else If d1>2 And d2=z Then
Component.IsActive("Part3:1")=False
Component.IsActive("Part2:1")=False
Component.IsActive("Part3:1")=True
End If
hoffe ich liege da nicht so falsch. kanns grad nicht ausprobieren.
und bitte füll doch deine Systeminfo aus. 
------------------
Personalführung ist die Kunst, den Mitarbeiter so schnell über den Tisch zu ziehen das er die Reibungshitze als Nestwärme empfindet.
[Diese Nachricht wurde von Bernhard09 am 23. Dez. 2015 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP