如何在MSchart中实现单击曲线上一点，获得X、Y轴的坐标

[eric_guang]

用mschart绘制曲线，想通过鼠标单击曲线，或鼠标移到曲线上，就能显示该点对应的x、y的值
不知要用什么事件或什么属性，希望有人能指点一下

[laviewpbt]

没有

[eric_guang]

我是通过一个矩阵给mschart赋值的，运行程序时，单击曲线，那些点会在曲线上显示出来
所以想知道能不能通过什么事件或属性，让我在点击那些点的时候知道该点所对应的X、Y轴坐标

[snowwolf80]

我是采用把数据在msflexgrid中显示计算出的数据，然后把表格中对应的列的数据读取到machart中，然后点击绘制的曲线点，该点的值（对应的x,y）在text控件显示的方法：楼主再自己调试下吧
'''Mschart2---运动轨迹的点击显示
Private Sub MSChart2_Click()
Dim i As Integer
Dim xx, j, Max, Min As Integer
Min = 1
Max = Val(VScroll1.Value)
ReDim arrdatac3(Max, 8)
With MSChart2
For i = 1 To Max
For j = 1 To 7
xx = Text6.Text
.Column = 1
Select Case j
Case 1
.RowLabel = MSHFlexGrid1.TextMatrix(xx, j) '''点击显示的指定曲线上的
Text4.Text = "步进变量nx:" & .RowLabel
Case 2
.RowLabel = MSHFlexGrid1.TextMatrix(xx, j) '''点击显示的指定曲线上的
Text5.Text = "角度变量αi:" & .RowLabel
Case 6
.RowLabel = MSHFlexGrid1.TextMatrix(xx, j) '''点击显示的指定曲线上的
Text7.Text = "齿尖切向阻力Fdt:" & .RowLabel
Case 7
.RowLabel = MSHFlexGrid1.TextMatrix(xx, j) '''点击显示的指定曲线上的
Text8.Text = "齿尖法向阻力Fdn:" & .RowLabel
End Select
.AllowSelections = True
.DragMode = 0
.Enabled = True
Next j
Next i
End With
'''''mschart上曲线上的数据全部显示
'''''For i = 1 To MSChart1.ColumnCount
'''' MSChart1.Plot.SeriesCollection(i).DataPoints(-1).DataPointLabel.LocationType = 0 ''&& 为1时显示数值，0为不显示
'''Next i
End Sub

[snowwolf80]

http://community.csdn.net/Expert/topic/4946/4946784.xml?temp=.3125116


楼主再去看下这个帖子