2010-03-18 43 views
0

添加.Append(「和」),以每行發現這一點:Visual Studio的宏:循環遍歷選擇,在選擇

Sub SurroundWithAppendTag() 
     DTE.ActiveDocument.Selection.Text = ".Append(""" + DTE.ActiveDocument.Selection.Text + """)" 
End Sub 

但我似乎無法通過的每一行弄清楚如何循環文本中的選擇。有什麼想法嗎?

回答

2

簡單:

Dim lines = DTE.ActiveDocument.Selection.Text.Replace(vbCrLf, vbLf).Split(vbLf) 

剩下的就是給你......

+0

你丟失了所有的魔.Append – JaredPar 2010-03-18 17:23:10

+0

@JaredPar他想要一個完整的代碼?呵呵:-P那麼一些汗水呢?! – 2010-03-18 17:29:27

+0

明白了,我相信。我假設每一行都被推入行,所以我只需要迭代並返回? – jlrolin 2010-03-18 18:20:26