霹雳啪啦啦 发表于 2006-12-5 23:20:00

zfbj版主进来帮帮我

.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不支持多文档吗?
页: [1]
查看完整版本: zfbj版主进来帮帮我