SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Scatter;
sList.AxisFactor.XAxis.DataType = AxisDataType.Number;
sList.AxisFactor.YAxis.SetAxisStep(-100, 100, 25);
sList.AxisFactor.XAxis.SetAxisStep(-100, 100, 25);
sList.AxisFactor.BackColor = Color.FromArgb(100, Color.Pink);
sList.AxisFactor.YAxis.TitleLabel.Text = "<--- 안 급한일 급한일 --->";
sList.AxisFactor.YAxis.IsAxisVerticalRotate = true;
sList.AxisFactor.XAxis.TitleLabel.Text = "<--- 안 중요한일 중요한일 --->";
// 급한일
AxisArea ar = new AxisArea("", 0, 100);
ar.BackColor = Color.FromArgb(100, Color.SteelBlue);
sList.AxisFactor.YAxis.Areas.Add(ar);
// 급한일
AxisArea ar2 = new AxisArea("", 0, 100);
ar2.BackColor = Color.FromArgb(100, Color.YellowGreen);
sList.AxisFactor.XAxis.Areas.Add(ar2);
Random r = new Random();
for(int i = 0; i < 4; i++)
{
Series sr = new Series();
// 중요할수록 동그라미 크게
if (i == 0) // 급한데 안중요한일
{
sr.Points.Width = 20;
sr.SeriesColor = new Palette().DefaultColor2;
}
if (i == 1) // 급하고 중요한일
{
sr.Points.Width = 30;
sr.SeriesColor = new Palette().DefaultColor1;
}
if (i == 2) // 안급하고 안중요한일
{
sr.Points.Width = 10;
sr.SeriesColor = new Palette().DefaultColor4;
}
if (i == 3) // 중요하지만 안급한일
{
sr.Points.Width = 20;
sr.SeriesColor = new Palette().DefaultColor3;
}
for(int x = 0; x < 5; x++)
{
SeriesItem item = new SeriesItem();
item.Balloon = new Balloon();
item.Balloon.Label.Text = "To DO List " + (i + x).ToString();
item.Balloon.HeightType = HeightType.Bottom;
item.Balloon.IsShadow = false;
item.Balloon.BalloonType = BalloonType.Rectangle;
item.Balloon.BackColor = Color.White;
if (i == 0 || i == 1) // 급한일
{
item.YValue = r.Next(0, 100);
}
if (i == 2 || i == 3) // 안급한일
{
item.YValue = r.Next(-100, 0);
item.Balloon.HeightType = HeightType.Top;
}
if (i == 0 || i == 2) // 안중요한일
{
item.XValue = r.Next(-100, 0);
item.Balloon.TextLocation = StringAlignment.Far;
}
if (i == 1 || i == 3) // 중요한일
{
item.XValue = r.Next(0, 100);
}
sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
}
this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.DrawChart();
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Scatter
sList.AxisFactor.XAxis.DataType = AxisDataType.Number
sList.AxisFactor.YAxis.SetAxisStep(-100, 100, 25)
sList.AxisFactor.XAxis.SetAxisStep(-100, 100, 25)
sList.AxisFactor.BackColor = Color.FromArgb(100, Color.Pink)
sList.AxisFactor.YAxis.TitleLabel.Text = "<--- 안 급한일 급한일 --->"
sList.AxisFactor.YAxis.IsAxisVerticalRotate = True
sList.AxisFactor.XAxis.TitleLabel.Text = "<--- 안 중요한일 중요한일 --->"
` 급한일
Dim ar As New. AxisArea("", 0, 100)
ar.BackColor = Color.FromArgb(100, Color.SteelBlue)
sList.AxisFactor.YAxis.Areas.Add(ar)
` 급한일
Dim ar2 As New. AxisArea("", 0, 100)
ar2.BackColor = Color.FromArgb(100, Color.YellowGreen)
sList.AxisFactor.XAxis.Areas.Add(ar2)
Dim r As New. Random()
For i As Integer = 0 To 3
Dim sr As New. Series()
` 중요할수록 동그라미 크게
If i = 0 Then
` 급한데 안중요한일
sr.Points.Width = 20
sr.SeriesColor = New Palette().DefaultColor2
End If
If i = 1 Then
` 급하고 중요한일
sr.Points.Width = 30
sr.SeriesColor = New Palette().DefaultColor1
End If
If i = 2 Then
` 안급하고 안중요한일
sr.Points.Width = 10
sr.SeriesColor = New Palette().DefaultColor4
End If
If i = 3 Then
` 중요하지만 안급한일
sr.Points.Width = 20
sr.SeriesColor = New Palette().DefaultColor3
End If
For x As Integer = 0 To 4
Dim item As New. SeriesItem()
item.Balloon = New Balloon()
item.Balloon.Label.Text = "To DO List " + (i + x).ToString()
item.Balloon.HeightType = HeightType.Bottom
item.Balloon.IsShadow = False
item.Balloon.BalloonType = BalloonType.Rectangle
item.Balloon.BackColor = Color.White
If i = 0 OrElse i = 1 Then
` 급한일
item.YValue = r.[Next](0, 100)
End If
If i = 2 OrElse i = 3 Then
` 안급한일
item.YValue = r.[Next](-100, 0)
item.Balloon.HeightType = HeightType.Top
End If
If i = 0 OrElse i = 2 Then
` 안중요한일
item.XValue = r.[Next](-100, 0)
item.Balloon.TextLocation = StringAlignment.Far
End If
If i = 1 OrElse i = 3 Then
` 중요한일
item.XValue = r.[Next](0, 100)
End If
sr.items.Add(item)
Next
sList.SeriesCollection.Add(sr)
Next
Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.DrawChart()