作業(yè)：
a = 0
FS = 5
For Each char In ThisDocument.Paragraphs（4）.Range.Characters
If a = 0 And FS < 20 Then
FS = FS + 1
Else
a = 1
If a = 1 And FS > 5 Then
FS = FS - 1
Else
a = 0
End If
End If
char.Font.Size = FS
Next
承擔因您的行為而導致的法律責任，
本站有權保留或刪除有爭議評論。
參與本評論即表明您已經(jīng)閱讀并接受
上述條款。