Tweet

ldn og alkohol naltrekson accutane without side effects buy accutane pills where to buy female viagra pill female viagra accutane without food buy accutane pills naltrexone buy buy low dose naltrexone online invocal.ru buy naltrexone online abortion pill online philippines misoprostol philippines idippedut.dk abortion philippines where to buy abortion pill in usa purchase abortion pill online 그리드 방향을 수평형으로, 디자인 타입은 클래식 형으로 그려본 바 차트

          

C#

 
SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Bar;
sList.GraphArea.Grid.GridDirection = GridDirection.Horizontal;

Random r = new Random();
for(int i = 0; i < 2; i++)
{
Series sr = new Series();
sr.Column.WidthType = ColumnWidthType.Tight;

for(int x = 0; x < 5; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();
item.YValue = -45 + r.Next(90);
item.IsShowFigureText = true;
item.Label.Font = new Font("tahoma", 11, FontStyle.Bold);

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

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

VB

 
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Bar
sList.GraphArea.Grid.GridDirection = GridDirection.Horizontal

Dim r As New. Random()
For i As Integer = 0 To 1
Dim sr As New. Series()
sr.Column.WidthType = ColumnWidthType.Tight

For x As Integer = 0 To 4
Dim item As New. SeriesItem()
item.Name = x.ToString()
item.YValue = -45 + r.[Next](90)
item.IsShowFigureText = True
item.Label.Font = New Font("tahoma", 11, FontStyle.Bold)

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

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