Publisher) (Font.SetScriptName 方法

設定要在文字範圍中使用的字型指令碼的名稱。

語法

運算式。SetScriptName (Script、 FontName)

運算式 代表 Font 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Script 必要 PbFontScriptType script 名稱。 可以是 Microsoft Publisher 型別程式庫中宣告的其中一個 PbFontScriptType 常數。
FontName 必要 String 字型名稱。

範例

此範例會驗證用於指定文字範圍的預設字型指令碼是否為 Tahoma，如果不是，則將其設定為預設字型指令碼。

Sub GetScript() 
 With ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.Font 
 If .GetScriptName(Script:=pbFontScriptDefault) <> "Tahoma" Then 
 .SetScriptName Script:=pbFontScriptDefault, _ 
 FontName:="Tahoma" 
 End If 
 End With 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • 上次更新時間：