作業(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
承擔因您的行為而導致的法律責任,
本站有權(quán)保留或刪除有爭議評論。
參與本評論即表明您已經(jīng)閱讀并接受
上述條款。