objectmodel.htm
来自「《ATL深入解析》随书源码」· HTM 代码 · 共 21 行
HTM
21 行
<html>
<script language=vbscript>
dim app
set app = CreateObject("ObjectModel.Application")
dim docs
set docs = app.Documents
dim doc
set doc = docs.AddDocument
doc.Data = "Document 1"
set doc = docs.AddDocument
doc.Data = "Document 2"
for each doc in docs
msgbox doc.data
next
</script>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?