• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Luis Marques

Distribuir

6 mensagens neste tópico

Eu tenho uma form em que serve para distribuir os numeros para outra form e ao abrir outra form para inserir imagens e texto esses numeros desaparecem, aqui deixo o codigo quando desaparecem.


Form11.Label2.Text = Ref_perfilTextBox.Text
        Form11.Label1.Text = TextBox1.Text
        Form11.Show()

        Dim B As Bitmap = PictureBox2.Image
        Form11.PictureBox1.Image = B

        Me.Close()

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

hmm tambem nao percebi a tua duvida nem o que queres fazer, mas tenta assim:

        Form11.Label2.Text = Me.Ref_perfilTextBox.Text
        Form11.Label1.Text = Me.TextBox1.Text

        Dim B As Bitmap = Me.PictureBox2.Image
        Form11.PictureBox1.Image = B

        Form11.Show()
        Me.Close()

cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

não funciona como disseste.

Vou tentar explicar melhor , eu tenho uma form que ao clicar no botao envia os numeros para as textbox, depois a form onde se encontra estas textbox, tenho uma picturebox que abre uma form, essa form é onde coloco os valores e a imagem para enviar para a form onde estao as textbox e os valores que estao dentro das textbox desaparecem!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

hmh, mostra os codigos que tens nos botoes e como tas a declarar as forms para as depois abrires, se calhar tens que usar clones..

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não é boa prática, mas resolve-te o problema.

Para exprimentares faz o seguinte:

1- Cria um projecto novo

2- Adiciona uma form, de forma a teres Form1 e Form2

3- Na Form1 adiciona 2 Textboxes, 1 PictureBox e 1 botão

4- Exactamente o mesmo na Form2

5- Copia integralmente este código para a Form1

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Form2.ShowDialog()
        Me.TextBox1.Text = Form2.TextBox1.Text
        Me.TextBox2.Text = Form2.TextBox2.Text
        Me.PictureBox1.Image = Form2.PictureBox1.Image
    End Sub
End Class

6- Copia integralmente este código para a Form2

Public Class Form2

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Close()
    End Sub

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        PictureBox1.Image = Me.Icon.ToBitmap
    End Sub
End Class

Explicação:

Carrega no botão na form1. Aparece-te o form2. Preenche os campos e carrega no botão. Voltam para a form1.

Consegues passar valores da segunda form para a primeira através de referência directa à form e porque a form1 a chama como modal o que congela o thread que faz bulir a form1.

Assim que fechas o form2, o gajo continua com o código e vai buscar os valores.

Sapateiro ;)

Seria menos sapateiro se criasses uma nova instância do form2, sacando-lhe a informação de uma forma segura e mais correcta, mas começa por isto.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora