powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Может кто-нибудь объяснить почему:
4 сообщений из 4, страница 1 из 1
Может кто-нибудь объяснить почему:
    #32935184
Kicel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть 2 формы: Form1 и Form2.
Если в первой форме:
-------------------------------------
Forma2.Caption = "value1"
Forma2.myTable = "value2"
Load Forma2
Forma2.Show 1
-------------------------------------
Во второй форме:
-------------------------------------
Option Explicit
Public myTable As String
-------------------------------------

то во второй форме значение переменной myTable будет пустым.

Но если изменить порядок:

Forma2.myTable = "value2"
Forma2.Caption = "value1"

то все в порядке и переменная myTable будет со значением.

Вопрос: почему?

Заранее благодарен откликнувшимся.
...
Рейтинг: 0 / 0
Может кто-нибудь объяснить почему:
    #32943011
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Forma2.Caption = "value1"
Forma2.myTable = "value2"
Load Forma2
Forma2.Show 1

Во время Load данные формы заново инициализируются. Ставь load в начале.
...
Рейтинг: 0 / 0
Может кто-нибудь объяснить почему:
    #32943028
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пардон, был не прав, погорячился. Вопрос все еще без ответа.
...
Рейтинг: 0 / 0
Может кто-нибудь объяснить почему:
    #32943335
Дурак
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуйте так.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Dim frm as Form2

Set frm = New Form2

With frm 
.Caption = "Value 1"
.MyTable = "Value 2"

.Show vbModal

End With

Unload frm

Set frm = Nothing
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Может кто-нибудь объяснить почему:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]