Dim myRadialGauge As RadialGauge = Me.ultraGauge1.Gauges(0)' Access Needle marker Dim myMarker As RadialGaugeMarker = myRadialGauge.Scales(0).Markers(0) Dim currentValue As Integer = CInt(myMarker.Value) ' Increases needle by 5 myMarker.Value = currentValue + 5