使用 VBA 以外的其它编程语言

Sub Example_Regen()
    ' The following example regenerates the complete drawing
    ThisDrawing.Regen acAllViewports
    
    ' The following example regenerates the active viewport in the current drawing
    ThisDrawing.Regen acActiveViewport
    
End Sub