本示例询问用户是否在第一次保存文档时生成一个备份文件,并提供了“是”和“否”两个按钮来响应。

If MsgBox("是否在第一次保存文档时生成一个备份文件?", 36, _
    "生成备份文件?") = vbYes Then
    Options.CreateBackupOnFirstSave = True
Else
    Options.CreateBackupOnFirstSave = False
End If