Vb 08

[Ze21038]

boas,

é possível os valores que estão nas variáveis do form2, ao fechar o form 2 "leva-las" para outro form?

se é como se faz sff?

cumprimentos,
ze21038

 

[ribeiro55]

É sim. É possível fazer algo parecido.

Pode-se parecer algo com isto:

Form 1 :

Public Class Form1

    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        Form2.VTransporte = "Sou o zé da Form 1 !! "
        Form2.Show()
    End Sub

End Class

Na Form2:

Public Class Form2

    Private ValorTransportado As String

    Public Property VTransporte() As String
        Get
            Return ValorTransportado
        End Get
        Set(ByVal value As String)
            ValorTransportado = value
        End Set
    End Property

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

Deve fazer o que pretendes.
O código está testado.

 

[pmaster]

Os valores das variaveis nao sei mas se quizeres ir buscar um valor de uma textbox ou outro objecto que esteja noutro form usa a propriedade MY

por exemplo:

My.Forms.Form1.TextBox1.Text

 

[Ze21038]

ok muito obrigado eu tentava criar as mesmas variaveis mas nao ia la..

so uma pergunta eu tenho uma listbox com sites,mas estao como texto á alguma maneira de os tornar em hiperligacao?
cumprimentos,
ze21038

 

[Ze21038]

ninguem? :S..

 

[ribeiro55]

Não precisas de ter os links em lista.
Popular uma ListBox com outros controlos como a LinkLabel é desnecessário neste caso, pois basta meteres algo deste género (eis um exemplo completo e a funcionar):

Public Class Form1

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Process.Start("IExplore.exe", ListBox1.Text)
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ListBox1.Items.Add("www.google.com")
    End Sub

End Class

A única linha que faz o que queres é:

Process.Start("IExplore.exe", ListBox1.Text)

O resto é só para criar contexto.

 

[Ze21038]

muito obrigado percebes bastante disto, tipo eu tenho uma textbox que adiciona sites para la, e qeria qe os sites se transformassem em link's xD, mas acho que agora vai funcionar..

cumprimentos,
ze21038