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

タイトル X軸のスケール表示位置変更
投稿日: 2018/08/13(Mon) 09:02
投稿者Ace
VB6.0
Windows7

VB6のmschartで、折れ線グラフを作成しているのですが、
Y軸の下限がマイナス値、上限がプラス値の場合に
X軸のスケールを表示すると、
Y軸が0の位置(グラフの中)に表示されてしまいます。

Y軸の値に関係なく、X軸のスケールをグラフの一番下に
表示させる方法はないでしょうか?


Private Sub Form_Load()
    Dim MyData(1 To 10, 1 To 2) As Single
    Dim i As Integer
    Dim series As Object

    'X軸
    MyData(1, 1) = 0
    MyData(2, 1) = 10
    MyData(3, 1) = 20
    MyData(4, 1) = 30
    MyData(5, 1) = 40
    MyData(6, 1) = 50
    MyData(7, 1) = 60
    MyData(8, 1) = 70
    MyData(9, 1) = 80
    MyData(10, 1) = 90

    'Y軸
    MyData(1, 2) = 20
    MyData(2, 2) = -30
    MyData(3, 2) = 50
    MyData(4, 2) = -60
    MyData(5, 2) = 70
    MyData(6, 2) = -10
    MyData(7, 2) = 0
    MyData(8, 2) = 30
    MyData(9, 2) = -30
    MyData(10, 2) = 70
    
    With MSChart1
        .ChartData = MyData()
        .Plot.UniformAxis = False
        .chartType = VtChChartType2dXY
    End With

    MSChart1.Plot.SeriesCollection(1).ShowLine = True
    MSChart1.Plot.SeriesCollection(1).SeriesMarker.Show = False
    MSChart1.Plot.Axis(1).ValueScale.Auto = False
    MSChart1.Plot.Axis(1).ValueScale.Maximum = 100
    MSChart1.Plot.Axis(1).ValueScale.Minimum = -100

End Sub

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

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