我想将柱型图中的rowlabel的文字显示成垂直方向,但是下面的代码rowlabel显示的方向是水平方向,不知道是否可以将rowlabel的方向显示为垂直方向。With MSChart1
.chartType = VtChChartType2dBar Dim k As Integer
Dim sql1 As String
sql1 = "select mc 名称 from t_j_sbb"//t_j_sbb是一个表,mc是一个字段
Adodc1.RecordSource = sql1
Adodc1.Refresh
k = Adodc1.Recordset.RecordCount
.RowCount = k
.ColumnCount = 1
Dim count_i As Integer
Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
count_i = count_i + 1
.Row = count_i
.RowLabel = Adodc1.Recordset("名称")
.Data = count_i
Adodc1.Recordset.MoveNext
WendEnd With
.chartType = VtChChartType2dBar Dim k As Integer
Dim sql1 As String
sql1 = "select mc 名称 from t_j_sbb"//t_j_sbb是一个表,mc是一个字段
Adodc1.RecordSource = sql1
Adodc1.Refresh
k = Adodc1.Recordset.RecordCount
.RowCount = k
.ColumnCount = 1
Dim count_i As Integer
Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
count_i = count_i + 1
.Row = count_i
.RowLabel = Adodc1.Recordset("名称")
.Data = count_i
Adodc1.Recordset.MoveNext
WendEnd With
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货