Regular Expression Find and Replace

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Richard Bysouth - 16 Feb 2006 00:55 GMT

Hi

In some of the code I'm working with (porting very very old code with bits
going back to VB1 days!), we've got comments that are un uppercase. I want to
be able to change these to lowercase without going through them manually.

Is there a way to do this using the RegEx bit of the Find and Replace
dialog? If so, can you provide an example of the RegEx needed for the Find
and Replace fields please?

Or would this have to be done using a Macro?

e.g. 'THIS IS MY COMMENT

should become

'this is my comment

ok, it's just an aesthetic thing but ucase looks out of place!

thanks

Richard

Reply to this Message

"Gary Chang[MSFT]" - 16 Feb 2006 07:55 GMT

Hi Richard,

>Is there a way to do this using the RegEx bit of the Find
>and Replace dialog?

You can use the following RegEx to match all the comment in the Visual
Studio's Find what field:
'.+$

but I am afraid the Replace filed does not support RegEx, so you could not
use the RegEx to replace those commnets in Visual Studio.

>Or would this have to be done using a Macro?

yes, based on my test, the following Macro code could change all the
characters of the current active document's comments text to lowercase:

Public Sub FindAndReplace()
Dim objTextDoc As TextDocument
Dim objEditPt As EditPoint, iCtr As Integer

objTextDoc = DTE.ActiveDocument.Object("TextDocument")
objEditPt = objTextDoc.StartPoint.CreateEditPoint

While (objEditPt.FindPattern("'.+$",
vsFindOptions.vsFindOptionsRegularExpression) = True And
objEditPt.AtEndOfDocument <> True)
objEditPt.ChangeCase((objEditPt.LineLength -
objEditPt.LineCharOffset) + 1, vsCaseOptions.vsCaseOptionsLowercase)
objEditPt.LineDown()
End While

End Sub

Whish this helps!

Best regards,

Gary Chang
Microsoft Community Support
======================================================
PLEASE NOTE the newsgroup SECURE CODE and PASSWORD will be updated at 9:00
AM PST, February 14, 2006. Please complete a re-registration process by
entering the secure code mmpng06 when prompted. Once you have entered the
secure code mmpng06, you will be able to update your profile and access the
partner newsgroups.
======================================================
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from this issue.
======================================================
This posting is provided "AS IS" with no warranties, and confers no rights.
======================================================

Reply to this Message

Richard Bysouth - 16 Feb 2006 08:23 GMT

Gary

thanks for the quick response - yes that works fine for me.

I think i'll modify it to loop through the entire project at some point.

Haven't really used VS macros before but think I will have to now - very
useful!

Richard

Reply to this Message

"Gary Chang[MSFT]" - 16 Feb 2006 09:06 GMT

Hi Richard,

I am glad to know it helps, good luck.:)

Thanks!

Best regards,

Gary Chang
Microsoft Community Support
======================================================
PLEASE NOTE the newsgroup SECURE CODE and PASSWORD will be updated at 9:00
AM PST, February 14, 2006. Please complete a re-registration process by
entering the secure code mmpng06 when prompted. Once you have entered the
secure code mmpng06, you will be able to update your profile and access the
partner newsgroups.
======================================================
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from this issue.
======================================================
This posting is provided "AS IS" with no warranties, and confers no rights.
======================================================

Reply to this Message

Regular Expression Find and Replace

Free Magazines