屏幕实时更新

guntopztm · 发表于 2015-8-31 16:07:00

我有个VBA程序计算一个点就插入一个块，点很多但程序开始运行后就显示插入几个块之后就卡住了，直到程序全部运行完成才一次性更新，有无办法在程序运行过程中实时更新屏幕上图形的变化

edata · 发表于 2015-8-31 16:25:00

重生成整个图形并重计算所有对象的屏幕坐标和显示精度。
参阅 | 示例
语法
object.Regen WhichViewports
Object
Document
使用该方法的对象。
WhichViewports
Integer[整数]; 仅用于输入
acActiveViewport
只重生成活动视口。

acAllViewports
重生成文档中的所有视口。

说明
它还重新创建图形数据库索引，从而优化显示和对象选择的性能。