Tweet

Amoxicillin Over the Counter buy amoxicillin-clavulanate read buy amoxicillin for dogs uk pills for abortion buy abortion pill philippines charamin.com abortion in philippines abortion pill online order abortion pill online usa X축을 숫자형으로 구성하여 각 중요 지점에 라인 마커를 표시합니다.

              

C#

 
SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Spline;
sList.AxisFactor.XAxis.DataType = AxisDataType.Number;
sList.AxisFactor.XAxis.SetAxisStep(0, 50, 10);

sList.GraphArea.Grid.GridDirection = GridDirection.None;

string[] alpabets = new string[5]{"A", "B", "C", "D", "E"};

for(int i = 0; i < 5; i++)
{
AxisMarker mk = new AxisMarker(alpabets[i], i * 11 + 5);
mk.Line.LineColor = new Palette2().DefaultColor2;
mk.Label.ForeColor = new Palette2().DefaultColor2;
mk.TextFormat.LineAlignment = StringAlignment.Near;
mk.LegendVisible = false;

sList.AxisFactor.XAxis.Markers.Add(mk);
}

Random r = new Random();
for(int i = 0; i < 1; i++)
{
Series sr = new Series();
sr.Line.LineWidth = 3;

for(int x = 0; x < 48; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();
item.YValue = r.Next(20, 70);
item.XValue = x;

sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
}

this.hHippoChart1.DesignType = ChartDesignType.Simple;
this.hHippoChart1.PaletteType = PaletteType.Classic;
this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.DrawChart();

VB

 
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Spline
sList.AxisFactor.XAxis.DataType = AxisDataType.Number
sList.AxisFactor.XAxis.SetAxisStep(0, 50, 10)

sList.GraphArea.Grid.GridDirection = GridDirection.None

Dim alpabets As String() = New String(4) {"A", "B", "C", "D", "E"}

For i As Integer = 0 To 4
Dim mk As New. AxisMarker(alpabets(i), i * 11 + 5)
mk.Line.LineColor = New Palette2().DefaultColor2
mk.Label.ForeColor = New Palette2().DefaultColor2
mk.TextFormat.LineAlignment = StringAlignment.Near
mk.LegendVisible = False

sList.AxisFactor.XAxis.Markers.Add(mk)
Next

Dim r As New. Random()
For i As Integer = 0 To 0
Dim sr As New. Series()
sr.Line.LineWidth = 3

For x As Integer = 0 To 47
Dim item As New. SeriesItem()
item.Name = x.ToString()
item.YValue = r.[Next](20, 70)
item.XValue = x

sr.items.Add(item)
Next
sList.SeriesCollection.Add(sr)
Next

Me.hHippoChart1.DesignType = ChartDesignType.Simple
Me.hHippoChart1.PaletteType = PaletteType.Classic
Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.DrawChart()