VBNet - Форум - Проблема. Помогите чем можете!

Вопрос: Проблема. Помогите чем можете! Добавлено: 06.01.03 18:01

Автор вопроса: WESSS | ICQ: 311299111

Проблема вот в чем: делаю прогу по регионам франции. В зависимости от того, что юзвреи выбирают в комбобоксе в модуль передается переменная (Module1.x=1 например). Так вот, мне нужно, чтоб я смог считать эту переменную в другой форме из этого модуля.

Ответить

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

Номер ответа: 1 Автор ответа: dba_netanya Вопросов: 8 Ответов: 24	Web-сайт: www.jnews.com Профиль \| \| #1	Добавлено: 06.01.03 21:27
	Maybe you should try using a word "Public" (IMHO) Ответить

Номер ответа: 2
Автор ответа:

CyRax

Разработчик Offline Client

ICQ: 204447456

Вопросов: 180
Ответов: 4229

Web-сайт: basicproduction.nm.ru
Профиль | | #2

Добавлено: 06.01.03 22:27

Глянул я твою ситуацию.
Можно в принципе и общую переменную задать.

Вот для переменной модуля
'модуль m1
Dim a As Integer
Function LocalValue(Operation, Value)
Const SetValue = 1
Const GetValue = 2
Select Case Operation
Case 1
a = Value: LocalValue = a: Exit Function
Case 2
LocalValue = a: Exit Function
End Select
End Function

'форма form1
Private Sub Form_Load()
For z = 1 To 100: Combo1.AddItem z: Next z
End Sub
Private Sub Combo1_Click()
x = m1.LocalValue(1, Combo1.Text): Form2.Show
End Sub

'форма form2
Private Sub Form_Load()
Caption = m1.LocalValue(2, 0)
End Sub

Ответить

Номер ответа: 3
Автор ответа:

WESSS

ICQ: 311299111

Вопросов: 4
Ответов: 3

Профиль | | #3

Добавлено: 07.01.03 18:08

С Public не прокатило! А со вторым случаем разбираюсь. Сппасибо.

Ответить

Номер ответа: 4 Автор ответа: Fenix Вопросов: 1 Ответов: 9	Профиль \| \| #4	Добавлено: 24.02.03 23:14
	Public-видимость для формы и т.д.Тебе нужен Global- видмость для всего проекта Ответить

Номер ответа: 5 Автор ответа: f8 ICQ: 177987366 Вопросов: 0 Ответов: 2	Профиль \| \| #5	Добавлено: 25.02.03 03:33
	2Fenix : Чушь! Ответить

Страница: 1 |