决定指定文档的 示例代码 (VBA) 项目是否具有数字签名。只读
MsoTriState 类型。
语法
表达式.VBASigned
表达式 一个代表 Presentation 对象的变量。
返回值
MsoTriState
说明
MsoTriState 可以是下列 MsoTriState 常量之一。 |
msoCTrue |
msoFalse |
msoTriStateMixed |
msoTriStateToggle |
msoTrue 指定文档的 VBA 项目已有数字签名。 |
示例
本示例加载一篇名为“MyPres.ppt”的演示文稿,并检测其是否具有数字签名。如果没有数字签名,则代码将显示一条警告消息。
示例代码 |
Presentations.Open("c:\\My Documents\\MyPres.ppt",msoFalse,msoTrue)
let tion = ActivePresentation
if(tion.VBASigned == msoFalse && tion.VBProject.VBComponents.Count > 0) {
MsgBox("Warning! The Visual Basic project for" + "\r\n" + "this presentation has not"
+ "\r\n" + " been digitally signed.", jsCritical, "Digital Signature Warning")
}
|