mschartで平均値の棒グラフを作るには？
解決WindowsXP,VB6.0です。
mschartで科目ごとの平均値の棒グラフを作成したいのですが、式の指定のやり方がよくわかりません。
AVGを使うのはわかるのですが、式がわかりません。
よろしくお願いします。
>AVGを使うのはわかるのですが、式がわかりません。
平均値の求め方が解らないと言う事でしょうか？
グラフの作成方法が解らないのでしょうか？
タイトルと質問内容が一致していないようだし、直接関係しているようにも
思えないので何をどのようにしたいのか、それでどこまでできて、どの部分が解らないかを
書いて頂けませんか？
下記のようなグラフを描画したいなら
http://hanatyan.sakura.ne.jp/samplepic/chartno13-1.gif
下記でできます。
http://hanatyan.sakura.ne.jp/patio/read.cgi?mode=view2&f=118&no=13
説明不足と内容がわかりづらくてすみませんでした--；
グラフの表示（作成）はなんとなくわかるのですが、平均値の出し方が不明でした。
http://hanatyan.sakura.ne.jp/patio/read.cgi?mode=view2&f=118&no=13
教えていただいたここのを参考に自分でできるところまでやってみようと思います。
ありがとうございました^^
あとすみませんでした。。。
URLのグラフの折れ線のデータ（合計）の値は、関数でなく直接値を入力したものですよね？
Dat(1, 0) = "浅野"
Dat(1, 1) = 69 '国語の点数
Dat(1, 2) = 81 '数学の点数
Dat(1, 3) = 73 '英語の点数
Dat(1, 4) = 223 ←sumやavgなどの関数を使いたいんですが、式の求め方はどうなるんでしょうか？
ちなみに成績はaccessに入っているものです。
それと、一応わかりづらいと思いますが。。。
やった回数が10回以上のとき、日付順（科目関係なく）に表示するように作ったものです。
Private Sub Form_Load()
Set cn = New ADODB.Connection
cn.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);" & "DBQ=ユーザ管理.mdb"
cn.Open
'レコードセット取得
Set rs = New ADODB.Recordset
rs.Open "成績管理", cn, adOpenStatic, adLockOptimistic
Set DataGrid1.DataSource = rs
criteria = CurrentID
rs.MoveFirst
rs.Filter = "ID = '" & criteria & "'"
Dim i As Integer
i = rs.RecordCount '回数
Dim arrValues10(1 To 10, 1 To 2)
For i = 1 To 10 '回数＞＝10のとき
arrValues10(i, 1) = rs!日付 ' ラベル
arrValues10(i, 2) = rs!成績 ' 値
rs.MoveNext
Next i
MSChart1.ChartData = arrValues10
MSChart1.chartType = VtChChartType2dBar
End Sub
> Dat(1, 4) = 223 ←sumやavgなどの関数を使いたいんですが、式の求め方はどうなるんでしょうか？
VB6.0 には、sumやavgなどの関数は用意されていません、従ってVB6.0で
平均値を計算したいなら、通常のように個々のデータを足して合計を求め
それをデータの個数で割って平均を出して下さい。
Access を使っているなら、Accessの機能で平均を求めるとかして下さい。
関数ないんですか・・・わかりました。
ありがとうございました。
| ツイート |  |