none
เรื่อง MS Chart ปัญหาเกี่ยวกับ Legend (General question) RRS feed

  • คำถาม

  • ปัญหา คือ ตัวป้ายบอกด้านล่าง ไม่แสดงค่าของแกน X ซึ่งตอนเขียนโค้ดก็ได้ระบุไว้แล้ว

    ไม่ทราบแก้ไขอย่างไรดีครับ

    chtCoupon.DataSource = dt

     

    chtCoupon.ChartAreas.Clear()

     

    chtCoupon.Series.Clear()

     

    chtCoupon.Legends.Clear()

     

    For i As Integer = 1 To dt.Columns.Count - 1

     

    'พื้นที่วาดกราฟ

     

    Dim chartArea As New ChartArea(dt.Columns(i).ColumnName)

     

    chartArea.BackColor = Drawing.Color.Azure

     

    chartArea.BackGradientStyle = GradientStyle.TopBottom

     

    chartArea.BackHatchStyle = ChartHatchStyle.DashedHorizontal

     

    chartArea.Area3DStyle.Enable3D = True '// Draw chart as 3D

     

    chtCoupon.ChartAreas.Add(chartArea)

     

    'ป้ายบอก

     

    Dim legend As New Legend(dt.Columns(i).ColumnName)

     

    legend.Title = dt.Columns(i).ColumnName

     

    legend.DockedToChartArea = dt.Columns(i).ColumnName

     

    legend.Docking = Docking.Bottom

     

    legend.IsDockedInsideChartArea = False

     

    legend.BackImageTransparentColor = Drawing.Color.Transparent

     

    chtCoupon.Legends.Add(legend)

     

    'กราฟ

     

    Dim series As New Series

     

    series.Name = dt.Columns(i).ColumnName

     

    series.ChartType = SeriesChartType.Pie

     

    series.YValueMembers() = dt.Columns(i).ColumnName

     

    series.XValueMember() = dt.Columns(0).ColumnName

     

    series.IsVisibleInLegend = True

     

    series.IsValueShownAsLabel = True

     

    series("PieLabelStyle") = "Outside" 'กำหนดการแสดงผลให้ยืดออกนอกพื้นที่ของรูปภาพ

     

    series.ChartArea = dt.Columns(i).ColumnName

     

    series.Legend = dt.Columns(i).ColumnName

     

    series.Label = "#VALX (#PERCENT)"

     

    chtCoupon.Series.Add(series)

     

    Next

     

    chtCoupon.DataBind()

     


     


    Supa Sethasiripong [MSFT]
    MSDN Community Support | Feedback to us
    Get or Request Code Sample from Microsoft
    Please remember to mark the replies as answers if they help and unmark them if they provide no help.

    1 กรกฎาคม 2554 10:02
    ผู้ดูแล

คำตอบ