XYHitTest方法示例

以下示例检索图表 ChartChart1 在坐标 x,y 处笔的信息。请注意，x 和 y 参数来自MouseUp 和/或 MouseDown 事件原型。

Dim dDate As Date

Dim dValue As Double

Dim sPenName As String

Dim iPen As Object

Dim lPenNum As Long

Dim bReal As Boolean

Chart1.XYHitTest x, y, dDate, dValue, sPenName, iPen, lPenNum, bReal