DEIXAR TEXT DO FORM DINÂMICO.

[rl28]

Boa noite!

Andei procurando em alguns fóruns a respeito de alterar a informação do text da form, mas não encontrei muita coisa. Por exemplo, cada vez que clico em uma ação/botão, ele abre um form, só que traz o nome que informei nas propriedades, gostaria que cada vez que eu abrisse a form, mostrasse o nome diferente de cada uma, assim consigo controlar cada transação que estiver aberta.

Abri um form, tela 1, chamei de novo, tela 2 e assim por diante.. Montei um código mas está dando erro, vi em um fórum a dica, mas no meu carro não consegui fazer rodar ainda..segue abaixo:

Public Class Principal
    Public formularios As New Collection
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles abretransacao.Click

        Dim Form As New Form()
        Static intnumero As Integer

        intnumero = intnumero + 1
        Form.Caption = "Formulário # " & intnumero ---- aqui onde está dando erro, informando que é uma expressão e por isso não pode ser um destino de uma atribuição
        Form.Show()
    End Sub

Código original que peguei:

Public formularios As New Collection

Private Sub Command1_Click()
Dim NovoForm As New Form1
Static intnumero As Integer

  intnumero = intnumero + 1
  NovoForm.Caption = "Formulário # " & intnumero
  NovoForm.BackColor = QBColor(intnumero)
  formularios.Add NovoForm
  NovoForm.Show
End Sub 

[Alyson Ronnan Martins]

Boa noite @rl28, Desculpa mais não entendi o objetivo.