A quick and dirty VB.NET property generator

[Richard]

Modified to work with c#. Only works on one property declaration at a
time. Inserts the public property accessors after the declaration. Cut
and paste to where you need it.

Sub PropertyMacro()
Dim ClassDeclaration As Document = DTE.ActiveDocument
Dim temp As TextWindow =
CType(ClassDeclaration.ActiveWindow.Object, TextWindow)

Dim PropDeclaration As String = "public "
Dim decl As String() = Trim(temp.Selection.Text).Split(" ")
Dim memvar As String = decl(2)
memvar = memvar.Substring(0, memvar.Length - 1)
Dim propName As String = memvar
propName = propName.Substring(1, 1).ToUpper() &
propName.Substring(2)
Dim dataType As String = decl(1)
PropDeclaration += dataType & " " & propName

temp.Selection.LineDown()
temp.Selection.Insert(vbTab & vbTab & PropDeclaration)
temp.Selection.Insert("{")
temp.Selection.Insert("get{")
temp.Selection.Insert("return " & memvar & ";}")
temp.Selection.Insert("set{")
temp.Selection.Insert(memvar & " = value;}")
temp.Selection.Insert("}")
temp.Selection.NewLine()
End Sub