Use Find/Replace To Replace Arbitrary Text Per Line?

I have a bunch of object variables which are all initialised in their declarations such that:

Private _myObject As New ThisObject("SomeString")

where ThisObject is one of a number of object types, but all are initialised using a string.

I would like to use the Visual Studio Find/Replace dialog box to search for "As New" then replace everything from "As New" to the first set of speech marks with some text such that:

EDIT

My original example could be solved using other methods. This example is more representative of the actual problem:

Private _myObjectA As New ThisObjectA("SomeString")
Private _myObjectLongName As New ThisObjectLongName("SomeString")

[Code]....