VBNet - Форум - Уж что-что, а этого я не знал. в VB6

Вопрос: Уж что-что, а этого я не знал. в VB6 Добавлено: 21.01.07 00:57

Автор вопроса: AgentFire | ICQ: 192496851

есть форма Form1, форма Form2, модуль Module1

в модуле -

Public NewServerName As String

активная - форма1, вторая не загружена.
далее -
Form2.Show(1, Form1)

далее код в Форм1 :

NewServerName="vbnet"

далее в ней же

unload me

выполнение кода возражается к Форм1, т.к. Show был с параметром 1.

msgbox NewServerName

проблема - выдает vbnullstring, в чем дело?
Ответить

Ответы Всего ответов: 7

Номер ответа: 1 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #1	Добавлено: 21.01.07 00:58
	далее код в Форм1 : NewServerName="vbnet" в этом месте опечатался, не Форм1, а Форм2 Ответить

Номер ответа: 2 Автор ответа: VilyaBeBack ICQ: 415-022-373 Вопросов: 2 Ответов: 5	Профиль \| \| #2	Добавлено: 21.01.07 02:55
	хмммм, я даж заметил, что если пишешь Form2.Show Unload Form2 тоже даёт ошибку.... может беда в том что когда используем метод Show - происходит событие Form_Load и кончается оно выгрузкой формы2 и поэтому возвращает ошибку Ответить

Номер ответа: 3 Автор ответа: VilyaBeBack ICQ: 415-022-373 Вопросов: 2 Ответов: 5	Профиль \| \| #3	Добавлено: 21.01.07 02:55
	хотя не, бред Ответить

Номер ответа: 4 Автор ответа: Алексей black admin ICQ: 261779681 Вопросов: 87 Ответов: 633	Web-сайт: aleksey.nemiro.ru Профиль \| \| #4	Добавлено: 21.01.07 04:59
	Form1: Private Sub Form_Load() Form2.Show 1, Form1 MsgBox NewServerName End Sub Form2: Private Sub Form_Activate() Unload Me End Sub Private Sub Form_Load() NewServerName = "vbnet" End Sub Ответить

Номер ответа: 5 Автор ответа: Серёга ICQ: 262809473 Вопросов: 17 Ответов: 561	Web-сайт: houselab.narod.ru Профиль \| \| #5	Добавлено: 21.01.07 11:29
	Или так: form1: Private Sub Form_Load() On Error Resume Next Form2.Show 1, Me MsgBox NewServerName End Sub form2: Private Sub Form_Load() NewServerName = "vbnet" Unload Me End Sub Ответить

Номер ответа: 6 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #6	Добавлено: 21.01.07 12:48
	Ошибок у меня не выдается, просто получается, что после выгрузки Form2 переменная NewServerName теряет свое значение.. даже если оно уже было установлено. PS. админы, вы че тут рекламы навешали? Че за гугл? че за Петерхост? или вы новый сайт у них держите? Ответить

Номер ответа: 7 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #7	Добавлено: 21.01.07 12:50
	Да, все оказалось, по моей тупости происходило. Тема закрыта. Ответить

Страница: 1 |