在Visual Studio 2010中计算要选择的非空白字符数

我最终在下面创建了这个粗糙的宏,首先在Visual Studio中录制了一个临时宏,然后将其修改为如下所示:

Option Strict Off
Option Explicit Off
Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports EnvDTE90a
Imports EnvDTE100
Imports System.Diagnostics

Public Module CountNonWhiteSpaceCharacters
    Sub Count()
        Dim selection As EnvDTE.TextSelection = DTE.ActiveDocument.Selection()
        Dim text As String = selection.Text

        text = text.Replace(" ", "")
        text = text.Replace(vbCrLf, "")
        text = text.Replace(vbTab, "")

        MsgBox("Count " + text.Length.ToString())
    End Sub    
End Module

如果需要,可以将其绑定到keybord快捷方式。否则,在宏资源管理器中双击它将运行它。