那么如何展开所有内容呢?
我已经搜索了一下,但好像找不到适用的快捷键!
折叠到定义
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 + O 快捷键,展开则使用 CTRL + M + P。这在 VS2008 中有效。
CTRL + M + O
- 字母 O,不是数字 0。清理编辑引入了错误到答案中。 - goodeye请前往 工具->选项->文本编辑器->c#->高级,取消勾选第一个复选框“打开文件时进入大纲模式”。
这将永久解决此问题。
我一直希望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)的快捷方式,可以完成这个操作。