How to: Usar uma Macro para Adicionar Texto em um Editor de Código do C# ou o Visual Basic
Você pode usar o modelo de objeto de extensibilidade para adicionar código para qualquer Visual Basic ou Visual C# editor de código. Possíveis usos desse recurso incluem a adição de novos procedimentos e adição de blocos padrão. Essa tarefa pressupõe que você saiba como acessar o ambiente de desenvolvimento de Macros e crie um projeto de macro. Para obter mais informações, consulte Adicionar caixa de diálogo de projeto de Macro. Para implementar a seguinte amostra de macro, você precisa ter uma Visual Basic Abrir do projeto.
As etapas a seguir adicionam texto a um Visual Basic editor de código. Para adicionar código para um Visual C# editor de código, use o prjKindCSharpProject o valor de enumeração na etapa cinco (5).
Observação |
---|
As caixas de diálogo e comandos de menu demonstradas podem ser diferentes daqueles descritos na Ajuda, dependendo das configurações ativas ou configurações de edição. Esses procedimentos foram desenvolvidos com o General Development Settings ativo. Para alterar as configurações, escolha Import and Export Settings sobre o Ferramentas menu. Para obter mais informações, consulte Trabalhando com configurações. |
Para adicionar o texto na parte superior do editor de código ativo do Visual Basic
Crie um novo módulo de macro chamado EditorMacros.
Criar uma nova macro, AddSomeText, adicionando o seguinte código no módulo de macro:
Public Sub AddSomeText() ' Will add code here to add text. End Sub
Declarar e inicializar uma variável para referir-se o editor de código aberto.
Dim doc As Document = DTE.ActiveDocument
Para obter mais informações, consulte Document objeto e ActiveDocument propriedade.
O Document objeto contém um TextDocument o objeto, que você pode acessar com o Object método, como mostrado abaixo.
Dim textDoc As TextDocument = _ CType(doc.Object("TextDocument"), TextDocument)
Para certificar-se de que você está adicionando código para o Visual Basic o editor de código, você pode testar o Kind a propriedade do projeto que contém a janela.
If doc.ProjectItem.ContainingProject.Kind = _ VSLangProj.PrjKind.prjKindVBProject Then ' Add code here to insert text. End If
Usando o TextDocument o objeto, criar um ponto de edição no início do editor. Em seguida, use o Insert método o Selection propriedade para adicionar texto ao editor. Para obter mais informações, consulte CreateEditPoint método e Selection propriedade.
textDoc.StartPoint.CreateEditPoint() textDoc.Selection.Insert("' A comment")
A macro completa aparece abaixo:
Public Sub AddSomeText() Dim doc As Document = DTE.ActiveDocument Dim textDoc As TextDocument = _ CType(doc.Object("TextDocument"), TextDocument) If doc.ProjectItem.ContainingProject.Kind = _ VSLangProj.PrjKind.prjKindVBProject Then textDoc.StartPoint.CreateEditPoint() textDoc.Selection.Insert("' A comment") End If End Sub
Salvar a macro, feche o Macros IDE e executar a macro Macro Explorer.