タイトル | : Re^2: Chartスクロールバーの操作【解決】 |
記事No | : 10952 |
投稿日 | : 2012/11/08(Thu) 18:22 |
投稿者 | : MM3 |
VBレスキュー(花ちゃん)様 返信ありがとうございます。
説明不足ですみません。 ---------------------------------------------- 最初に、フォームを追加し、フォームデザインで、chartを追加し、 プロパティウインドウで設定しました。 【設定項目】 Series コレクションエディター ChartType:FastLine ChartArea コレクションエディター CurSorX IsUserEnabled,IsUserSelectionEnabled:Ture 【コード】 Private Sub Form4_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim dateX As DateTime = DateTime.Now Dim random As New Random For pointIndex = 0 To 30 Chart1.Series(0).Points.AddXY(dateX, random.Next(0, 100)) dateX = dateX.AddDays(1) Next End Sub コードは、上記のみです。ここまでは、確認されたということで。
この状態から。 【コード】 Private Sub Form4_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Chart1.ChartAreas("ChartArea1").AxisX.LabelStyle.Format = "HH:mm:ss.FFF ← 追加 Dim dateX As DateTime = DateTime.Now Dim random As New Random For pointIndex = 0 To 30 Chart1.Series(0).Points.AddXY(dateX, random.Next(0, 100)) dateX = dateX.AddMilliseconds(100) ← 変更 Next End Sub 【設定項目】 Series コレクションエディター XValue Type:DateTime ChartArea コレクションエディター CurSorX InterValOffsetType,InterValType:Milliseconds と、プロパティウインドウで操作し、変更しました。 データは、コード内にランダムに設定しています。 ---------------------------------------------- 自己解決しました。
【設定項目】 ChartArea コレクションエディター Axis コレクションエディター ScaleView (SizeType):Milliseconds SmallScrollMinSize:100 SmallScrollMinSizeType:Milliseconds 上記を設定することにより、解決しました。
お騒がせしました。
|