再次提问：如何把我选中的文字的前面都统一添加“//”

Question

主要的功能是：做一个winform窗体，使他一直运行在最前面，这个窗体上有两个按钮，一个是添加，另一个删除。当我打开一个word文档后，选中几行。然后点击这个winform窗体上的添加按钮，就会自动把我刚刚选择的几行的最前面自动加上“//”。

Answer 1

在一个WORD文件中增加一个宏
然后选中几行文字运行这个宏试试
要注意:这个只是给选中的每段增加 ///Sub DefAdd()
    Dim p() As Paragraph
    
    Dim i As Integer
    For i = 1 To Application.Selection.Paragraphs.Count
        ReDim Preserve p(i)
        Set p(i) = Application.Selection.Paragraphs(i)
    Next
    
    For i = 1 To UBound(p)
        p(i).Range.Text = "///" & p(i).Range.Text
    
    Next
End Sub

Answer 2

不要使用宏，我是想做一个winform窗体。
这个你可以实现吗？

Answer 3

//不要使用宏，我是想做一个winform窗体。你引用word对象,然后参考sdfkfkd(特别)提供的代码

Answer 4

rainstormmaster(暴风雨 v2.0) ( ) 信誉
能给点详细的代码吗？