开发者

How can I paste curly quotes into my IDE as straight quotes?

开发者 https://www.devze.com 2023-01-16 13:25 出处:网络
How can I paste curly quotes into my IDE as straight quotes? I will often paste code into Visual Studio from PDF files. Then I have to change all the quotation marks to \"straight\" ones. Ive tried th

How can I paste curly quotes into my IDE as straight quotes? I will often paste code into Visual Studio from PDF files. Then I have to change all the quotation marks to "straight" ones. Ive tried the programs that strip formatting but they don't 开发者_开发百科work. Below is a pic of what I mean.

How can I paste curly quotes into my IDE as straight quotes?

Thanks


You could write an Add-In to do this, but for quick and easy I did it with this Macro and added a button to my Toolbar to run it:

Imports EnvDTE

Public Module Module1

    Sub RemoveSmartQuotes()

        Dim sFind() As String = New String() {Chr(145), Chr(146), Chr(147), Chr(148)}
        Dim sReplace() As String = New String() {Chr(39), Chr(39), Chr(34), Chr(34)}

        For i As Integer = 0 To sFind.Length - 1
            DTE.Find.Action = vsFindAction.vsFindActionReplaceAll
            DTE.Find.FindWhat = sFind(i)
            DTE.Find.ReplaceWith = sReplace(i)
            DTE.Find.Target = vsFindTarget.vsFindTargetCurrentDocument
            DTE.Find.MatchCase = False
            DTE.Find.MatchWholeWord = False
            DTE.Find.MatchInHiddenText = True
            DTE.Find.PatternSyntax = vsFindPatternSyntax.vsFindPatternSyntaxLiteral
            DTE.Find.KeepModifiedDocumentsOpen = False
            DTE.Find.FilesOfType = ""
            DTE.Find.ResultsLocation = vsFindResultsLocation.vsFindResultsNone
            DTE.Find.Execute()
        Next i

    End Sub
End Module


Not perfect, but when I have that issue (assuming you're pasting large chunks of text?) I paste into notepade (or notepad++) and do a find - replace.

0

精彩评论

暂无评论...
验证码 换一张
取 消