Visual Studio展开/折叠键盘快捷键[复制]

Posted 2021-04-05

这个问题在这里已有答案：

• Command to collapse all sections of code? 19个答案

在Visual Studio中，如果我打开了代码文件，我可以按CTRL + M或CTRL + M + O来折叠所有代码块，区域，命名空间等。

如何做相反的事情并扩展一切？

我用Google搜索了这个，但似乎找不到有效的捷径！

答案

折叠到定义

CTRL + M，O

展开所有概述

CTRL + M，X

展开或折叠所有内容

CTRL + M，L

这也适用于TypeScript和javascript等其他语言

另一答案

如您所见，有几种方法可以实现这一目标。

我个人使用：

全部展开：CTRL + M + L.

全部折叠：CTRL + M + O.

奖金：

在光标位置展开/折叠：CTRL + M + M.

另一答案

Visual Studio 2015：

Tools > Options > Settings > Environment > Keyboard

默认值：

Edit.CollapsetoDefinitions：CTRL + M + O.

Edit.CollapseCurrentRegion：CTRL + M + CTRL + S.

Edit.ExpandAllOutlining：CTRL + M + CTRL + X.

Edit.ExpandCurrentRegion：CTRL + M + CTRL + E.

我喜欢设置和使用IntelliJ的快捷方式：

Edit.CollapsetoDefinitions：CTRL + SHIFT + NUM-

Edit.CollapseCurrentRegion：CTRL + NUM-

Edit.ExpandAllOutlining：CTRL + SHIFT + NUM +

Edit.ExpandCurrentRegion：CTRL + NUM +

另一答案

您可以使用Ctrl + M和Ctrl + P.

它叫做Edit.StopOutlining

另一答案

转到工具 - >选项 - >文本编辑器 - > c＃ - >高级，取消选中第一个复选框打开文件时输入大纲模式。

这将永远解决这个问题

另一答案

对于折叠，您可以尝试CTRL + M + O并使用CTRL + M + P进行扩展。这适用于VS2008。

另一答案

我一直希望Visual Studio包含一个折叠/扩展区域的选项。我有以下宏可以做到这一点。

Imports EnvDTE
Imports System.Diagnostics
' Macros for improving keyboard support for "#region ... #endregion"
Public Module CollapseExpandRegions
' Expands all regions in the current document
  Sub ExpandAllRegions()

    Dim objSelection As TextSelection ' Our selection object

    DTE.SuppressUI = True ' Disable UI while we do this
    objSelection = DTE.ActiveDocument.Selection() ' Hook up to the ActiveDocument's selection
    objSelection.StartOfDocument() ' Shoot to the start of the document

    ' Loop through the document finding all instances of #region. This action has the side benefit
    ' of actually zooming us to the text in question when it is found and ALSO expanding it since it
    ' is an outline.
    Do While objSelection.FindText("#region", vsFindOptions.vsFindOptionsMatchInHiddenText)
        ' This next command would be what we would normally do *IF* the find operation didn't do it for us.
        'DTE.ExecuteCommand("Edit.ToggleOutliningExpansion")
    Loop
    objSelection.StartOfDocument() ' Shoot us back to the start of the document
    DTE.SuppressUI = False ' Reenable the UI

    objSelection = Nothing ' Release our object

  End Sub

  ' Collapses all regions in the current document
  Sub CollapseAllRegions()
    Dim objSelection As TextSelection ' Our selection object

    ExpandAllRegions() ' Force the expansion of all regions

    DTE.SuppressUI = True ' Disable UI while we do this
    objSelection = DTE.ActiveDocument.Selection() ' Hook up to the ActiveDocument's selection
    objSelection.EndOfDocument() ' Shoot to the end of the document

    ' Find the first occurence of #region from the end of the document to the start of the document. Note:
    ' Note: Once a #region is "collapsed" .FindText only sees it's "textual descriptor" unless
    ' vsFindOptions.vsFindOptionsMatchInHiddenText is specified. So when a #region "My Class" is collapsed,
    ' .FindText would subsequently see the text 'My Class' instead of '#region "My Class"' for the subsequent
    ' passes and skip any regions already collapsed.
    Do While (objSelection.FindText("#region", vsFindOptions.vsFindOptionsBackwards))
        DTE.ExecuteCommand("Edit.ToggleOutliningExpansion") ' Collapse this #region
        'objSelection.EndOfDocument() ' Shoot back to the end of the document for
        ' another pass.
    Loop
    objSelection.StartOfDocument() ' All done, head back to the start of the doc
    DTE.SuppressUI = False ' Reenable the UI

    objSelection = Nothing ' Release our object

  End Sub
End Module

编辑：现在有一个名为Edit.ToggleOutliningExpansion（Ctrl + M，Ctrl + M）的快捷方式。