VB6.0のMSChartコントロールで
タイトルにちゃんと改行文字が表示されていますが、
ラベルに改行文字を入れることが不可能でしょうか。
知っている方がいらしゃいましたら、是非教えてください。

---------------------------------------------------
Private Sub Command1_Click()
    Dim arrData(3, 1 To 3)
    arrData(1, 1) = "00:00:01" '+ vbCrLf + "2005/01/01" ' Set the label
s in the first
series.
    arrData(2, 1) = "00:00:02" '+ vbCrLf + "2005/01/01"
    arrData(3, 1) = "00:00:03" '+ vbCrLf + "2005/01/01"
    
    arrData(1, 2) = 8
    arrData(2, 2) = 4
    arrData(3, 2) = 0.3
    
    arrData(1, 3) = 0.2
    arrData(2, 3) = 3
    arrData(3, 3) = 6.3
    MSChart1.ChartData = arrData

    MSChart1.chartType = VtChChartType2dLine
    MSChart1.ChartData = arrData
    
    With MSChart1.Title
        'タイトル文字の設定
        .Text = "First Line" + vbCrLf + "Second Line"
        'テキストは折り返されます
        .TextLayout.WordWrap = True
    End With

    Dim lIndex As Integer
    With MSChart1.Plot.Axis(VtChAxisIdX).Labels
        For lIndex = 1 To .Count
            'ラベル文字は折り返されます
            .Item(lIndex).TextLayout.WordWrap = True
        Next
    End With
End Sub

以上、よろしくお願い致します。

> 知っている方がいらしゃいましたら、是非教えてください。

多分、出来ないと思うので解る方もいないかと、従ってだれからもレスがつかないかも。

> > 知っている方がいらしゃいましたら、是非教えてください。
>
> 多分、出来ないと思うので解る方もいないかと、従ってだれからもレスがつかないかも。

早速回答いだだき、どうもありがどうございました。

やりたいことは、X軸のラベルを２行に表示すること。
ラベルに改行を入れることがだめみたいなんで、
二つのラベルを付く方法をやってみて、できましたが、
２行目のラベルの２行目のラベルのスキップする区分数の設定はうまくいけない。
解決方法がありますでしょうか。

Private Sub Command1_Click()
    Dim arrData(6, 1 To 4)
    arrData(1, 1) = "00:00:01" 'Set the labels in the first series.
    arrData(2, 1) = "00:00:02"
    arrData(3, 1) = "00:00:03"
    arrData(4, 1) = "00:00:04"
    arrData(5, 1) = "00:00:05"
    arrData(6, 1) = "00:00:06"
    
    arrData(1, 2) = "2005/01/01" 'Set the labels in the second series.
    arrData(2, 2) = "2005/01/01"
    arrData(3, 2) = "2005/01/01"
    arrData(4, 2) = "2005/01/01"
    arrData(5, 2) = "2005/01/01"
    arrData(6, 2) = "2005/01/01"

    arrData(1, 3) = 8
    arrData(2, 3) = 4
    arrData(3, 3) = 8
    arrData(4, 3) = 4
    arrData(5, 3) = 0.3
    arrData(6, 3) = 0.3
    
    arrData(1, 4) = 0.2
    arrData(2, 4) = 3
    arrData(3, 4) = 6.3
    arrData(4, 4) = 0.2
    arrData(5, 4) = 3
    arrData(6, 4) = 6.3
    
    chtMileage.ChartData = arrData

    chtMileage.chartType = VtChChartType2dLine
    chtMileage.ChartData = arrData
    
    With chtMileage.Title
        'タイトル文字の設定
        .Text = "First Line" + vbCrLf + "Second Line"
        'テキストは折り返されます
        .TextLayout.WordWrap = True
    End With
    
    '【質問】：
    '   ２行目のラベルのスキップする区分数の設定はうまくいけないです。
    '   Axis オブジェクトの2番目のパラメーターの意味は何でしょう。
    '
    Dim index As Integer
    index = -1
    With chtMileage.Plot.Axis(VtChAxisIdX, index).CategoryScale
        '軸に自動的にスケールを付けるフラグ。
        .Auto = False
        'ラベル間でスキップする区分数。
        .DivisionsPerLabel = 2
        '大きい目盛りマーク間でスキップする区分数
        .DivisionsPerTick = 1
    End With
End Sub

ソースが長くなってしまいますが、すいませんでした。
以上、よろしくお願い致します。