.net菜鸟一个,以前用过VBA。写了下面第一个程序,想要一次关闭所有打开的图纸,且不保存。
Public Sub FileCloseCustom()
Dim dwgCols As IEnumerator = Application.DocumentManager.GetEnumerator
Dim dwgOpen As Document
dwgCols.MoveNext() '注意此句
Do While dwgCols.MoveNext
dwgOpen = dwgCols.Current
dwgOpen.CloseAndDiscard()
Loop
End Sub
此程序开始时无法工作,提示"Drawing is busy"。加入了中间“注意此句”处的一个movenext后,程序可以在打开的5张图纸中关闭3张,然后就出错和以前一样。
Why?难道.net不支持多文档吗?