.NameFarEast = "宋体" //汉字字体
.NameAscii = "Times New Roman" //Ascii部分字体
.NameOther = "Times New Roman" //其它字体
.Name = "Times New Roman" //默认字体
.Size = 10.5 //字体大小
.Bold = False //是否加粗 True为加粗
.Italic = False //是否倾斜 True为倾斜
.Underline = wdUnderlineNone //下划线格式 有单下划 双下划 波浪线...
.UnderlineColor = wdColorAutomatic //下划线颜色
这部分是字体的样式
下面的代码是控件的参数.哪个不知道追问
Selection.WholeStory
With Selection.Font
.NameFarEast = "宋体" "-------------------------这行应该是设置字体
.NameAscii = "Times New Roman"
.NameOther = "Times New Roman"
.Name = "Times New Roman"
.Size = 10.5 "----------------------这行绝对是设置字号
.Bold = False '-------------------这行是设置字体 是否为粗体
.Italic = False
Size = 10.5