Mschart点击曲线上任意点的位置,怎么能在在旁边显示该点数值??(不是该点的坐标值)我用的:
Private Sub MSChart1_Click()
With MSChart1.Plot.SeriesCollection(i).DataPoints(-1)
.DataPointLabel.LocationType = 1 ''&& 为1时显示数值,0为不显示
'将数据点标记设置成可见的。
.Marker.Visible = True
.Marker.Style = VtMarkerStyleDiamond
End With
end sub显示的是某个曲线上所有的数值,我只想点击曲线上任意点的位置,在旁边显示该点数值。
最好贴出代码,好的话多加分~~~
Private Sub MSChart1_Click()
With MSChart1.Plot.SeriesCollection(i).DataPoints(-1)
.DataPointLabel.LocationType = 1 ''&& 为1时显示数值,0为不显示
'将数据点标记设置成可见的。
.Marker.Visible = True
.Marker.Style = VtMarkerStyleDiamond
End With
end sub显示的是某个曲线上所有的数值,我只想点击曲线上任意点的位置,在旁边显示该点数值。
最好贴出代码,好的话多加分~~~
解决方案 »
- 窗体问题
- 请问MDI窗体的边框如何去掉,谢谢 !!!
- 现金求购VB+sql server 写的考勤系统源程序
- tcp传文件问题 急!!!
- 请问餐饮专用的那种小打印机和普通的打印机在编程控制上是否有区别
- +++ 关于dataGrid 多列排序问题 +++
- 关于VB连接SQL远程数据库
- 不能更新查询?
- vb6.0 调用dll 请高手帮忙 如何区姓名,余额 和读卡 谢谢 只要写出调用示例就行 另加200大米,测试通过绝不失言
- 实在惨愧,我做了vb+Ado+sqlser2000两年,可有一个问题一直没注意到!
- 如何用VB调整Excel中的图形大小,使得它的大小为100%,即图形的原始大小?
- VB中怎么增加SQL语句
For i = 1 To Max
For j = 6 To 7
xx = Text6.Text
.Column = 1
.Row = i
.RowLabel = MSHFlexGrid1.TextMatrix(xx, j)
Text7.Text = .RowLabel
.AllowSelections = True
.DragMode = 0
.Enabled = True
Next j
Next iEnd With