var oTicks; var oTView = pMe.Items("../TrendView"); oTicks = oTView.ScaleTime.Ticks; oTicks.CountType = "count"; oTicks.CountValue = 4; oTicks = oTView.ScaleValue.Ticks; oTicks.CountType = "distancevalue"; oTicks.CountValue = 200;
Dim oTicks Dim oTView Set oTView = pMe.Items("../TrendView") Set oTicks = oTView.ScaleTime.Ticks oTicks.CountType = "count" oTicks.CountValue = 4 Set oTicks = oTView.ScaleValue.Ticks oTicks.CountType = "distancevalue" oTicks.CountValue = 200