Tweet

amoxil suspension amoxicillin allergy faztax.ca amoxicillin for uti female viagra over the counter female viagra drops amoxicillin for uti amoxil dosage go amoxicillin 500mg cost buy antibiotic online buy amoxicillin buy amoxicillin from canada amoxicillin prescription no insurance 팔레트 타입, 입체 두께 조절, 풀스택 Y축 스케일 수동 조절로 그려본 풀스택형 컬럼 차트

        

C#

 
SeriesList sList = new SeriesList();
sList.ChartType = ChartType.StackedColumn;
sList.StackType = StackType.FullStacked;
sList.AxisFactor.ThreeDstepDepth = 25;
sList.Transparency = 55;
sList.IsShow3D = true;
sList.AxisFactor.YAxis.IsAutoSetting = false;
sList.AxisFactor.YAxis.Interval = 0.25;

Random r = new Random();
for(int i = 0; i < 4; 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 = r.Next(90);

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

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

VB

 
Dim sList As New. SeriesList()
sList.ChartType = ChartType.StackedColumn
sList.StackType = StackType.FullStacked
sList.AxisFactor.ThreeDstepDepth = 25
sList.Transparency = 55
sList.IsShow3D = True
sList.AxisFactor.YAxis.IsAutoSetting = False
sList.AxisFactor.YAxis.Interval = 0.25

Dim r As New. Random()
For i As Integer = 0 To 3
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 = r.[Next](90)

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

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