Переход с формы на форму

@RedL1ght · Регистрация: 22.05.2020

Студворк — интернет-сервис помощи студентам

Здравствуйте нужна ваша помощь! У меня есть несколько форм , на Form2 происходить запись данных из TextBox , на Form3 они выводятся в Label. Код работает, но когда я создал Form4 и сделал на ней кнопку , которая возращает на Form3 , с Form3 все данные пропадают .
Переход с Form4 на Form3 сделал аналогично тому , что показано в коде снизу.
Понимаю что скорее всего проблема заключается в том , что создаю форму в обработчике (Dim Form3 As New Form3) . Как можно по другому перейти с формы на форму , Form3.Show пока не объявлена не работает.
Работаю Visual Studio 19. Я новичок , дайте пожалуйста развернутый ответ.

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Form3 As New Form3
        Form3.Label1.Text = TextBox1.Text
        Form3.Label2.Text = TextBox2.Text
        Form3.Label3.Text = TextBox3.Text
        If RadioButton1.Checked = True Then
            Form3.Label4.Text = Label1.Text
            Form3.PictureBox1.Image = PictureBox1.Image
        ElseIf RadioButton2.Checked = True Then
            Form3.Label4.Text = Label2.Text
            Form3.PictureBox1.Image = PictureBox2.Image
        ElseIf RadioButton3.Checked = True Then
            Form3.Label4.Text = Label3.Text
            Form3.PictureBox1.Image = PictureBox3.Image
        ElseIf RadioButton4.Checked = True Then
            Form3.Label4.Text = Label4.Text
            Form3.PictureBox1.Image = PictureBox4.Image
        End If
        Me.Hide()
        Form3.Show()
    End Sub

Uswer · 24.05.2020, 18:48

Сообщение от RedL1ght

Понимаю что скорее всего проблема заключается в том , что создаю форму в обработчике (Dim Form3 As New Form3)

Верно понимаете. Если до перехода на Form4 Вы не уничтожили Form3, то просто обратитесь к ней.
Пример.

VB.NET
1
2
3
4
5
6
7
Public Class Form4
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Form3.Label1.Text = Me.TextBox1.Text
        Me.Hide()
        Form3.Show()
    End Sub
End Class

@RedL1ght · 24.05.2020, 19:21 **[ТС]**

Выдает ошибку BC30469 "Для ссылки на член , не используемый совместно , требуется ссылка на объект"

Добавлено через 6 минут
Как использовать объекты с другой формы не объявляя форму и переходить по формам , пишу также как вы , ошибку выдает

Сообщение от RedL1ght

Выдает ошибку BC30469 "Для ссылки на член , не используемый совместно , требуется ссылка на объект"

@ViterAlex · 24.05.2020, 19:49

RedL1ght, чтобы обращаться друг к другу, формы должны знать друг о друге. Можно воспользоваться коллекцией My.Application.OpenForms

Uswer · 24.05.2020, 21:11

RedL1ght, как Вы создаёте формы? Я поэкспериментировал, всё передаётся из формы в форму, сами формы скрываются и поочерёдно отображаются.

@RedL1ght · 24.05.2020, 23:03 **[ТС]**

Добавляю к проекту

@RedL1ght · 24.05.2020, 23:17 **[ТС]**

Сообщение от Uswer

RedL1ght, как Вы создаёте формы? Я поэкспериментировал, всё передаётся из формы в форму, сами формы скрываются и поочерёдно отображаются.

Создаю путем добавления формы к проекту, приложу скрин, возможно я делаю не правильно.

@RedL1ght · 24.05.2020, 23:21 **[ТС]**

Можете на моем примере показать , пожалуйста

Uswer · 24.05.2020, 23:41

Вот проект из недавней ветки. На нём экспериментировал. Вызов формы2 = двойной клик по свободному месту на форме1. Затем жмём Button1.

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

@ViterAlex 8952 / 4864 / 1886 Регистрация: 11.02.2013 Сообщений: 10,246
	24.05.2020, 19:49
	RedL1ght, чтобы обращаться друг к другу, формы должны знать друг о друге. Можно воспользоваться коллекцией My.Application.OpenForms 0

Uswer 2287 / 1603 / 400 Регистрация: 26.06.2017 Сообщений: 4,753 Записей в блоге: 1
	24.05.2020, 21:11
	RedL1ght, как Вы создаёте формы? Я поэкспериментировал, всё передаётся из формы в форму, сами формы скрываются и поочерёдно отображаются. 0

@RedL1ght 0 / 0 / 0 Регистрация: 22.05.2020 Сообщений: 5
	24.05.2020, 23:03 [ТС]
	Добавляю к проекту 0

@RedL1ght 0 / 0 / 0 Регистрация: 22.05.2020 Сообщений: 5
	24.05.2020, 23:21 [ТС]
	Можете на моем примере показать , пожалуйста 0