Passar valor entre formularios

[laboss]

Boas ppl estou aqui com uma duvida 👍

É o seguinte tenho o FORM1 e o FORM2

no form1 gero uma lista de resultados vindos do sql e quero que ao clicar em cima da linha da grid ele abra o outro form

Até aqui tudo bem, mas eu preciso de passar o valor da variavel (ID) para o FORM2 estou a fazer desta maneira

no form1

  Dim ver_conversa As New Form2
ver_conversa.chat_code = 2
                        ver_conversa.Show()
                        

e no Form2 estou a recolher assim

    Public chat_code As String

    Public Property [PassedText]() As String
        Get
            Return chat_code
        End Get
        Set(ByVal Value As String)
            chat_code = Value
        End Set
    End Property

so que quando faco algo do genero

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        MsgBox(chat_code)

    End Sub

Ele não manda valor nenhum,

mas se tirar isso do Load e meter num botão e clicar depois ele já da o valor que devia ser

À solução?

Obrigado

* Edit

Era so falta de atenção xD

meti

ver_conversa.chat_code = 2

depois do

ver_conversa.show

[jpaulino]

Já está resolvido, e ainda bem, mas normalmente o "Public chat_code As String" deverá ser "Private chat_code As String" (optimização de recursos) 😉

[ribeiro55]

Optimização de recursos e regras de encapsulamento.

O "point" de uma property é precisamente oferecer um ponto controlado de afectação.

Com a variável pública poderia afectá-la directamente o que ignoraria qualquer fluxo preparado no Set/Get da propriedade.