示例：LineLegendMaxRowsVisible 属性

Sub SetLineLegend()
 ' If the line legend is positioned on the bottom of the chart
 ' then show only 4 rows, starting with the first row
 If Trend1.LineLegendPosition = rstLineLegendPositionBottom Then
  Trend1.LineLegendMaxRowsVisible = 4
  Trend1.LineLegendFirstVisibleRow = 1
 End If
End Sub