如何在VBA中定义Graphics矩阵?

时间:2017-01-28 08:19:10

标签: vba graphics

我正在使用VBA构建一个程序,然后使用Graphic填充位图图片并将其显示在图片框中,此图形必须随时间变化。

因为每个时间步都有很多关于更新图形的计算,所以它不能正常工作,并且在计算开始扩展后会有一段时间滞后。

那么,我可以定义一个Graphics矩阵并在显示它之前设置它们以及它在播放时我只是在每个时间步骤中更改root图形吗?

我试图像这样定义一个图形矩阵:

 Dim my_graph(360) As Graphics

在Set_Graph函数中,我通过画线,点等形成了my_graph(i)

Set_Graph(my_graph(i), w, t, b, POINTS_x, POINTS_y)
my_graph(i) = Graphics.FromImage(My_Bitmap)
PICTURE_BOX_2.Image = My_Bitmap

但是在Set_Graph中,my_graph(i)为null且没有。当我使用一个Graphics时它可以工作:

Dim my_graph As Graphics = Graphics.FromImage(My_Bitmap)
Set_Graph(my_graph, w, t, b, POINTS_x, POINTS_y)
PICTURE_BOX_2.Image = My_Bitmap

0 个答案:

没有答案