VB判断Word中的格式