袋子里的袋鼠

摘要： 1.大写转小写 Option ExplicitValidationMode = TrueInteractiveMode = im_Batch Dim mdl ' the current model ' 取得当前ModelSet mdl = ActiveModelIf (mdl Is Nothing) 阅读全文

摘要： 执行VB脚本： Option Explicit Dim mdl ' the current model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no Active Model" End If Dim HaveEx 阅读全文