摘要： 支持单行多行、行尾注释。VB不熟，垃圾代码很多 :) Sub Field2Porperty() Dim str As String str = DTE.ActiveDocument.Selection.Text() Dim lines As String() lines = System.Text.RegularExpressions.... 阅读全文