文件名称:VB6.0利用组合图分析轿车的销售情况.rar
文件大小:17KB
文件格式:RAR
更新时间:2022-07-30 11:27:16
VB源码-数据库实例
VB6.0利用柱状图(直方图)组合图分析轿车的销售情况,用这种图表可以使软件呈现数据报表更清淅明了,推荐要多使用这种方式显示报表式数据。以下是具体代码: MSChart1.chartType = VtChChartType2dCombination Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\eg.mdb;Persist Security Info=False" Adodc1.RecordSource = "SELECT fullname,sum(qty) as tum1 FROM tbS_sell_detailed group by fullname" Adodc1.Refresh Dim arrData(5, 1 To 2) For i = 0 To Adodc1.Recordset.RecordCount - 1 arrData(i, 1) = Adodc1.Recordset.Fields(0) ' 在第一列设置标签。 arrData(i, 2) = Adodc1.Recordset.Fields(1) Adodc1.Recordset.MoveNext Next i MSChart1.ChartData = arrData
【文件预览】:
srcfans.com
----利用组合图分析轿车的销售情况()
--------eg.mdb(396KB)
--------Form1.frm(4KB)
--------工程1.vbp(987B)
--------Form1.frx(9KB)
--------MSSCCPRJ.SCC(190B)
--------工程1.vbw(49B)