Visual Studio:快捷键:重复行

在Visual Studio 2022中

__abc0 + __abc1， __abc2

在Visual Studio 2019中

__abc0 + __abc1

在Visual Studio 2017 (v15.6及以后版本)中

__abc0 + __abc1

在Visual Studio 2017 (pre v15.6)

(编辑)这个特性现在内置在VS2017中:Ctrl + E，如果没有选择，V会重复一行，或者重复选择。你可以将它分配给不同的键组合，或者在菜单中找到它:

.

更多信息请参见这个引用。

Pre VS2017，内置方法使用剪贴板

正如@cand提到的，你可以只做Ctrl + C;__abc0 + __abc3。

如果没有选择，Ctrl + C将复制该行。

宏观解决方案(VS2017前期)

如果你想实现一个更完整的解决方案，也许是创建一个更简单的键盘快捷键，或者你不想影响剪贴板，请参阅以下指南:

Visual Basic:

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports System.Diagnostics
 

Public Module DuplicateLastLineModule
Sub DuplicateLine()
Dim line As String
DTE.ActiveDocument.Selection.StartOfLine(0)
DTE.ActiveDocument.Selection.EndOfLine(True)
line = DTE.ActiveDocument.Selection.Text
DTE.ActiveDocument.Selection.EndOfLine()
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.StartOfLine(0)
DTE.ActiveDocument.Selection.Text = line
End Sub
End Module

要创建宏，只需转到宏资源管理器 (“工具→宏→宏观Explorer"或Alt+F8)并复制粘贴代码 一个新的模块。现在只需给它分配一个键盘快捷键:

1. 点击工具->选项…
2. 在环境下，单击键盘
3. 在“Show Commands contains”;文本框，输入“复制”;(这是根据你给模块的名字。)
4. 您现在应该在下面的列表中看到宏
5. 选择“文本编辑器”;从“使用新的快捷方式”;列表
6. 在“;按快捷键”中设置焦点;然后在键盘上键入你想要使用的组合(Ctrl+转变+D in) 李我的情况)< / >
7. 点击“指派”;按钮
8. 您现在应该在“选定命令的快捷方式”中看到快捷方式;文本框
9. 点击OK按钮

就是这样。享受吧!

如果你喜欢使用CTRL+ALT+向上或CTRL+向上+下来复制eclipse样式的行(或块)，下面我发布了用于此目的的宏:

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports System.Diagnostics


Public Module DuplicateLineModule
Sub DuplicateLineDown()
Dim selection As TextSelection = DTE.ActiveDocument.Selection
Dim lineNumber As Integer
Dim line As String


If selection.IsEmpty Then
selection.StartOfLine(0)
selection.EndOfLine(True)
Else
Dim top As Integer = selection.TopLine
Dim bottom As Integer = selection.BottomLine


selection.MoveToDisplayColumn(top, 0)
selection.StartOfLine(0)


selection.MoveToDisplayColumn(bottom, 0, True)
selection.EndOfLine(True)
End If


lineNumber = selection.TopLine
line = selection.Text


selection.MoveToDisplayColumn(selection.BottomLine, 0)
selection.EndOfLine()
selection.Insert(vbNewLine & line)
End Sub
Sub DuplicateLineUp()
Dim selection As TextSelection = DTE.ActiveDocument.Selection
Dim lineNumber As Integer
Dim line As String


If selection.IsEmpty Then
selection.StartOfLine(0)
selection.EndOfLine(True)
Else
Dim top As Integer = selection.TopLine
Dim bottom As Integer = selection.BottomLine


selection.MoveToDisplayColumn(top, 0)
selection.StartOfLine(0)


selection.MoveToDisplayColumn(bottom, 0, True)
selection.EndOfLine(True)
End If


lineNumber = selection.BottomLine
line = selection.Text


selection.MoveToDisplayColumn(selection.BottomLine, 0)
selection.Insert(vbNewLine & line)
selection.MoveToDisplayColumn(lineNumber, 0)
End Sub
End Module

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports EnvDTE90a
Imports EnvDTE100
Imports System.Diagnostics


Public Module RemoveLineOrBlock


Sub RemoveLineOrBlock()
Dim selection As TextSelection = DTE.ActiveDocument.Selection
Dim lineNumber As Integer
Dim line As String


If selection.IsEmpty Then
selection.StartOfLine(0)
selection.EndOfLine(True)
Else
Dim top As Integer = selection.TopLine
Dim bottom As Integer = selection.BottomLine


selection.MoveToDisplayColumn(top, 0)
selection.StartOfLine(0)


selection.MoveToDisplayColumn(bottom, 0, True)
selection.EndOfLine(True)
End If


selection.LineDown(True)
selection.StartOfLine(vsStartOfLineOptions.vsStartOfLineOptionsFirstColumn,True)


selection.Delete()


selection.MoveToDisplayColumn(selection.BottomLine, 0)
selection.StartOfLine(vsStartOfLineOptions.vsStartOfLineOptionsFirstText)


End Sub


End Module

下面是一个基于Wael发布的链接的宏，但在以下方面进行了改进:

• 稍短的
• 稍快
• 评论:)
• 以"///"开头的行。
• 可以用一次撤消撤消吗

Imports System
Imports EnvDTE
Imports EnvDTE80


Public Module Module1


Sub DuplicateLine()
Dim sel As TextSelection = DTE.ActiveDocument.Selection
sel.StartOfLine(0) '' move to start
sel.EndOfLine(True) '' select to end
Dim line As String = sel.Text
sel.EndOfLine(False) '' move to end
sel.Insert(ControlChars.NewLine + line, vsInsertFlags.vsInsertFlagsCollapseToEnd)
End Sub


End Module

对于visual studio 2010，尝试使用这些命令来快速复制行(使用剪贴板):

• 单击要复制的行。 Ctrl + C将复制该行

• 然后按Ctrl + 转变 + 输入在插入点下方插入空白

  (或者使用Ctrl + 输入在插入点上方插入空行)

• 然后简单地使用Ctrl + V来粘贴该行。

http://www.jetbrains.com/resharper/

我的故事:开始在一个新公司工作，以前从未使用过Visual Studio。第一件事之一，如何复制线条。在设置宏ReSharper告诉我:你想替换我的快捷方式是:“重复文本”:)

虽然我意识到这不是一个键盘快捷键，但我想我应该添加这个，因为它不需要使用剪贴板，可能会帮助到一些人。

突出显示要复制的行。 按控制，鼠标单击突出显示的文本，并拖动到您想要去的地方。它将复制突出显示的文本

我不知道这是否存在于Visual Studio 2008，但在Visual Studio 2010+你可以很容易地做到这一点:

不要选择任何东西，然后按Ctrl + C，然后(不做任何其他事情)Ctrl + V

Ctrl + D在VS2012与Resharper工作。这是Resharper的热键。

有一个免费的扩展，你可以下载在这里，让你复制行而不替换剪贴板的内容。

默认情况下，它绑定到Alt + D，但你可以通过到工具->选项->环境->键盘将其更改为任何你想要的。在搜索框中输入“复制”，然后查找“编辑”。DuplicateSelection”，并编辑快捷方式为任何你想要的。我更喜欢Ctrl + D与其他编辑器一致。