Example: ChartRadix property

Private Sub RandomRadix()
Dim r As RSTradixOptions
Select Case Int(Rnd * 3)
Case 0
Trend1.Radix = rstRadixDecimal
Case 1
Trend1.Radix = rstRadixHex
Case 2
Trend1.Radix = rstRadixOctal
End Select
r = Trend1.Radix
Select Case r
Case rstRadixDecimal
MsgBox "Decimal"
Case rstRadixHex
MsgBox "Hex"
Case rstRadixOctal
MsgBox "Octal"
End Select
' Show some of the affected numbers
Trend1.DisplayLineLegend = True
Trend1.DisplayMinMax = True
Trend1.DisplayPenValues = True
End Sub