시리즈 표식 변경

Question

고객의 새로운 요구 사항이 있습니다. 그들은 백분율뿐만 아니라 값을 표시하기를 원합니다. 그러나 현재 Series Marks 속성 페이지에는 동일한 옵션이 없습니다. 가치와 함께 백분율을 표시 할 수있는 방법이 있습니까?

감사 하기 Akshay

Answer 1

당신은 두 가지 옵션이 있습니다

1. 이 smsLabelPercentValue를 사용하여, 예를 들어 :

   TChart1.Series(0).Marks.Style = smsLabelPercentValue 
   

2. 사용자가 예를 들어, OnGetSeriesMark 이벤트에 텍스트를 표시합니다 :

   Dim sum As Double 
   
   Private Sub Form_Load() 
       TChart1.Series(0).FillSampleValues 
       'TChart1.Series(0).Marks.Style = smsLabelPercentValue 
   
       sum = 0 
   
       For i = 0 To TChart1.Series(0).Count 
        sum = sum + TChart1.Series(0).YValues.value(i) 
       Next 
   End Sub 
   
   Private Sub TChart1_OnGetSeriesMark(ByVal SeriesIndex As Long, ByVal ValueIndex As Long, MarkText As String) 
       Dim value As Double 
       Dim percent As Double 
   
       value = TChart1.Series(SeriesIndex).YValues.value(ValueIndex) 
       percent = (value/sum) * 100 
   
       MarkText = CStr(value) & " " & CStr(percent) & "%" 
   End Sub 
   

3. 수동 OnGetSeriesMark 이벤트 smsLabelPercentValue와 MarkText 인수를 구문 분석, 하이브리드 솔루션을 사용합니다.