Tweet

female viagra over the counter female viagra prednisolone dosage buy prednisolone acetate eye drops charamin.jp buy prednisolone liquid buy zoloft buy sertraline 컬럼류의 차트로 색다른 효과를 줍니다.

  

C#

 
this.hHippoChart1.SeriesListDictionary.Clear();

SeriesList sList = new SeriesList();
sList.ChartType = ChartType.PylamidColumn;
sList.IsShow3D = true;
sList.Transparency = 55;

Random r = new Random();
for(int i = 0; i < 5; i++)
{
Series sr = new Series();

for(int x = 0; x < 7; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();
item.YValue = r.Next(50);

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

this.hHippoChart1.LegendBox.Visible = false;
this.hHippoChart1.PaletteType = PaletteType.Shadow;
this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.DrawChart();

VB

 
Me.hHippoChart1.SeriesListDictionary.Clear()

Dim sList As New. SeriesList()
sList.ChartType = ChartType.PylamidColumn
sList.IsShow3D = True
sList.Transparency = 55

Dim r As New. Random()
Dim i As Integer = 0
While i < 5
Dim sr As New. Series()

Dim x As Integer = 0
While x < 7
Dim item As New. SeriesItem()
item.Name = x.ToString()
item.YValue = r.[Next](50)

sr.items.Add(item)
System.Math.Max(System.Threading.Interlocked.Increment(x),x - 1)
End While
sList.SeriesCollection.Add(sr)
System.Math.Max(System.Threading.Interlocked.Increment(i),i - 1)
End While

Me.hHippoChart1.LegendBox.Visible = False
Me.hHippoChart1.PaletteType = PaletteType.Shadow
Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.DrawChart()