快捷搜索:  as  2018  FtCWSyGV  С˵  test  xxx  Ψһ  w3viyKQx

yth206游艇会官网线路检测_Vb中如何消除MSchart的闪烁现象



MSChart控件是用来将多少组数据以棒图、饼图、曲线图等图形要领显示出来的一种很方便、快捷的控件。然则每当数据刷新时,MSChart控件总会在屏幕上呈现一种亮白色的闪烁征象,而且机械速率越慢,闪烁征象越显着。在这里供给一种用Picyth206游艇会官网线路检测tureBox控件办理闪烁问题的措施。

1、在有MSChart控件的窗体中别的加入一个PictureBox控件,如MSChart1和Picture1。

2、使Picture1和MSChart1大年夜小同等,位置相同(经由过程左yth206游艇会官网线路检测对齐和顶端对齐)。

3、使Picture1在MSChart1前端,设置Picture1的Visible为False,即弗成见。只有刷新数据时Picture1才显示。

4、包括MSChart1第一次赋值和刷新数据两个历程。如下:

注释:初始化历程

Private Sub Form_load()

Dim V_char() 注释:n维数组

Dim I as Integer 注释:计数变量

Diyth206游艇会官网线路检测m V_series as Intyth206游艇会官网线路检测eger 注释:标记几个系列的变量……

MSChart1.ChartData = V_char 注释:给MSChart1初始化赋值

For I = 1 To V_series

……

注释:必须以此要领显示图例,否则Picture控件不能显示

MSChart1.DataGrid.ColumnLabel(I, 1) = 图例

Next I

MSChart1.Backdrop.Fill.Style = VtFillStyleBrush

注释:按必要设置MSChart1的背景致,否则Picture1会显示白色

MSChart1.Backdrop.Fill.Brush.FillColor.Set 192, 192, 192

End Sub

注释:刷新数据历程

Private Syth206游艇会官网线路检测ub Refresh()

Dim V_newchar() 注释:n维数组

……

Picture1.Visible = True

MSChart1.ChartData = V_newchar 注释:给MSChart1从新赋值,即刷新数据

MSChart1.EditCopy 注释:将当前图表的图片复制到剪贴板中

Picture1.Picture = Clipboard.GetData() 注释:给Picture1赋值剪贴板中的图片

End Sub

这样每一次刷新数据时Picture1显示的图片都不会孕育发生闪烁征象

您可能还会对下面的文章感兴趣: