tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル webアプリケーションでのchart
投稿日: 2005/01/25(Tue) 18:44
投稿者トシ
[OSのVer]:Windows XP   [VBのVer]:VB.NET  

VBを始めて間もない者です。こちらのサイトには大変お世話になっています。
自分なりに調べてみて分からなかったので、こちらに投稿させて貰う事にしました。

webアプリケーションでMSChartを使おうと思い、こちらのサイトを参考にプログラムを作りましたが

AxMSChart,MSChart20Libの部分でエラーが出てしまいます。何かwebアプリケーション用のコマンドが
あるのでしょうか?
ちなみに、普通のwindowsアプリケーションでは正常に作動しました。

With AxMSChart1 'エラー表示になります
    .chartType = MSChart20Lib.VtChChartType.VtChChartType2dLine 'エラー表示になります
    .ColumnCount = 5
    .RowCount = 144
    .ShowLegend = True

    For i = 1 To .RowCount
        For j = 1 To .ColumnCount
            .Column = j
            .Row = i
            .Data = intDat(i, j)
        Next j
    Next i
End With

With AxMSChart1 'エラー表示になります
    For i = 1 To 144
        .DataGrid.RowLabel(i, 1) = DName(l)
        l = l + 1

    Next i
    For i = 1 To 5
        .DataGrid.ColumnLabel(i, 1) = syurui(i)
        .Plot.SeriesCollection(i).LegendText = syurui(i)
    Next i
End With

With AxMSChart1.Plot.Axis(MSChart20Lib.VtChAxisId.VtChAxisIdX) 'エラー表示になります
    .CategoryScale.Auto = False          ' Sets manual scaling.
    .CategoryScale.DivisionsPerLabel = 6 ' Label appears every two
    ' divisions.
    .CategoryScale.DivisionsPerTick = 5  ' Ticks appear every two
    ' divisions.
    .CategoryScale.LabelTick = True   ' Labels displayed on top of
    ' Tick marks.
End With

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。