Outlook) (FormDescription.ScriptText 屬性
會傳回 String，此字串包含表單之 [指令碼編輯器] 中的所有 VBScript 程式碼。 唯讀。
語法
expression。 ScriptText
表達 代表 'FormDescription' 物件的變數。
範例
這個 Microsoft Visual Basic Scripting Edition (VBScript) 範例會使用Open事件來存取MailItem的HTMLBody屬性。 這會將MailItem的Inspector的EditorType屬性設定為olEditorHTML。 設定 MailItem 的 Body 屬性時， EditorType 屬性會變更為預設值。 例如，如果預設的電子郵件編輯器設定為 RTF， EditorType 會 設定為 olEditorRTF。 如果此程式碼置於設計模式表單的腳本編輯器中，執行時間期間的訊息方塊會在表單主體變更時反映 EditorType 中的變更。 最後一個訊息方塊會使用 [腳本文字 ] 屬性，在腳本編輯器中顯示所有 VBScript 程式碼。
Function Item_Open()
'Set the HTMLBody of the item.
Item.HTMLBody = "<HTML><H2>My HTML page.</H2><BODY>My body.</BODY></HTML>"
'Item displays HTML message.
Item.Display
'MsgBox shows EditorType is 2.
MsgBox "HTMLBody EditorType is " & Item.GetInspector.EditorType
'Access the Body and show
'the text of the Body.
MsgBox "This is the Body: " & Item.Body
'After accessing, EditorType
'is still 2.
MsgBox "After accessing, the EditorType is " & Item.GetInspector.EditorType
'Set the item's Body property.
Item.Body = "Back to default body."
'After setting, EditorType is
'now back to the default.
MsgBox "After setting, the EditorType is " & Item.GetInspector.EditorType
'Access the items's
'FormDescription object.
Set myForm = Item.FormDescription
'Display all the code
'in the Script Editor.
MsgBox myForm.ScriptText
End Function
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。