1、如何在初始化时把mschart清空,x、y轴的刻度也不要显示
2、在有数据的情况下,如何把 RowLable和ColumnLable 同时显示出来
3、在显示的图形上,如何标记出相应的数据(比如条状时,顶部显示数据)4、附带一个其他问题
怎么使msflexgrid 支持鼠标滚轮
2、在有数据的情况下,如何把 RowLable和ColumnLable 同时显示出来
3、在显示的图形上,如何标记出相应的数据(比如条状时,顶部显示数据)4、附带一个其他问题
怎么使msflexgrid 支持鼠标滚轮
解决方案 »
- delphil转换成VB
- 我的程序需要在台湾地区运行,这个编码问题怎么解决?
- [同步多个串口操作]写了一个串口操作的ActiveX EXE,已经能正常通信了,但是我需要和四个串口一起通信,我的方法可以吗?
- 大师帮忙!!!解决后百分全送!!!
- 各位,请问有没有一个控件可以点击后直接弹出一个IE浏览器,登陆到某一个网站
- 使用image 或 picturebox 控件,如何实现切换2张透明图片不闪烁。
- 问:怎么在vb中在一个文字段中,作一个超级链接 链接一个网址?
- 谁能提供开发语音聊天的方面的资料(27分等着你~)~
- 关于TabStrip控件的一点问题.
- 求大神帮助,vb改数据库的记录
- VB_在物品的有效期过期前作出提示!
- VB 推箱子 源代码 出错了
dim T(1 to 120 0 to 1) as double
With mschart1
.Left = 120
.Top = 4560
.Width = 11400
.Height = 3735
.TitleText = "℃ /时间"
' '设置图线的外观
.Plot.SeriesCollection(1).Pen.Width = 25
.Plot.SeriesCollection(1).Pen.Style = VtPenStyleSolid
' '设置XY轴
.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
.Plot.Axis(VtChAxisIdY).ValueScale.Auto = False
'// 设置最大值
.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = 1800 'X最大值
.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 125 'Y最大值
'// 设置最小值
.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = -25 'Y最小值
.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0 'X最小值
'//
.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision = 10 'X轴主要网格数量
.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision = 6 'Y轴主要网格数量
.Plot.Axis(VtChAxisIdX).ValueScale.MinorDivision = 0 'X轴次要网格数量
.Plot.Axis(VtChAxisIdY).ValueScale.MinorDivision = 0 'Y轴次要网格数量
.Plot.Axis(VtChAxisIdX).AxisGrid.MajorPen.Style = VtPenStyleSolid 'VtPenStyleDotted
.Plot.Axis(VtChAxisIdY).AxisGrid.MajorPen.Style = VtPenStyleSolid 'VtPenStyleDotted
.Plot.AutoLayout = False
.Plot.UniformAxis = False
.ChartType = VtChChartType2dXY
.ChartData = T '数据
End With
不对数组:T赋值,就没有曲线,对T赋值就能显示出曲线
在实际使用中,可用Redim来重定义数组T,改变曲线