MSChart??

[Dillon Mantle]

Hi All

Thanks for the help n the decoding, made sense after I read it a few times.
I am now graphing the data with the simple code below, which works fine but
my format is all wrong.
How do you format the number into "General Number"? I know its possible
because I can do it in excel and its the same control.

Private Sub Draw_Graph()
'************************************************
' PURPOSE :- To draw the graph
' INPUTS :-
' OUTPUTS :-
'************************************************

ReDim GraphData(Graph_Data_Max(0), 2)
For X = 1 To Graph_Data_Max(0)
GraphData(X, 1) = 1
GraphData(X, 2) = Graph_AVG_Strokes(X)
Next

ChartData.ChartData = GraphData

ChartData.Plot.Axis(VtChAxisIdX).ValueScale.MajorD ivision = 200
ChartData.Plot.Axis(VtChAxisIdX).ValueScale.MinorD ivision = 50
ChartData.Plot.Axis(VtChAxisIdX).ValueScale.Minimu m = 0

'I need to format the numbers here some where

ChartData.Plot.Axis(VtChAxisIdX).Tick.Style = VtChAxisTickStyleNone

End Sub
--
Regards
Dillon Mantle

[Stephane Richard]

You can use the format statement to format your numbers...

Result = Format(YourVariable, "#,###,###,##0.00")

There's probably a term you put in the 2nd parameter for regular number, I
just don't remember it off hand but this example will format your number as
1,000.00 for example.

--
Stéphane Richard

"Dillon Mantle" <di*****@dasolutions.co.za> wrote in message
news:dL********************@is.co.za...

Hi All

Thanks for the help n the decoding, made sense after I read it a few times. I am now graphing the data with the simple code below, which works fine but my format is all wrong.
How do you format the number into "General Number"? I know its possible
because I can do it in excel and its the same control.

Private Sub Draw_Graph()
'************************************************
' PURPOSE :- To draw the graph
' INPUTS :-
' OUTPUTS :-
'************************************************

ReDim GraphData(Graph_Data_Max(0), 2)
For X = 1 To Graph_Data_Max(0)
GraphData(X, 1) = 1
GraphData(X, 2) = Graph_AVG_Strokes(X)
Next

ChartData.ChartData = GraphData

ChartData.Plot.Axis(VtChAxisIdX).ValueScale.MajorD ivision = 200
ChartData.Plot.Axis(VtChAxisIdX).ValueScale.MinorD ivision = 50
ChartData.Plot.Axis(VtChAxisIdX).ValueScale.Minimu m = 0

'I need to format the numbers here some where

ChartData.Plot.Axis(VtChAxisIdX).Tick.Style = VtChAxisTickStyleNone

End Sub
--
Regards
Dillon Mantle

[Rick Rothstein]

> You can use the format statement to format your numbers...

Result = Format(YourVariable, "#,###,###,##0.00")
Too many #-signs.... just use Format(YourNumber, "#,##0.00")

There's probably a term you put in the 2nd parameter for
regular number, I just don't remember it off hand

There is... Format(2000#, "General Number"), but that "general number" is
one with no thousands separator.
Rick - MVP

[Randy Birch]

Or just FormatNumber() and specify the number of decimals desired.

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

There's no place like 127.0.0.1
"Rick Rothstein" <ri************@NOSPAMcomcast.net> wrote in message
news:zo********************@comcast.com...
: > You can use the format statement to format your numbers...
: >
: > Result = Format(YourVariable, "#,###,###,##0.00")
:
: Too many #-signs.... just use Format(YourNumber, "#,##0.00")
:
:
: > There's probably a term you put in the 2nd parameter for
: > regular number, I just don't remember it off hand
:
: There is... Format(2000#, "General Number"), but that "general number" is
: one with no thousands separator.
:
:
: Rick - MVP
:
: