Страница: 1 | 2 |
Вопрос: значение пеpеменной из одной фоpмы в дpугyю
Добавлено: 30.04.07 23:43
Автор вопроса: litt
Нужно передать значения переменных, которые вводятся в textbox одной формы, в другую... По этим значениям во второй форме должен строиться график.
Как реализовать эту "передачу"?
Ответы
Всего ответов: 17
Номер ответа: 1
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #1
Добавлено: 01.05.07 00:10
нужно просто объявить их как Public (вместо dim), а потом в коде второй формы вызывать так: Form1.[имя переменной]
Номер ответа: 2
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #2
Добавлено: 01.05.07 00:11
Form.Text1.Text=a
Номер ответа: 3
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #3
Добавлено: 01.05.07 00:15
Или ти имел ввиду как александр?
Номер ответа: 4
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #4
Добавлено: 01.05.07 00:25
Или ти имел ввиду как александр?
Номер ответа: 5
Автор ответа:
Arseny
ICQ: 298826769
Вопросов: 53
Ответов: 1732
Профиль | | #5
Добавлено: 01.05.07 12:40
А можно и свойство Tag заюзать. хотя оптимально, на мой взгляд, так, как это указал Docal/
Номер ответа: 6
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #6
Добавлено: 01.05.07 15:30
ну автор же написал
можно вообще по значениям текстбоксов непосредственно график строить: Line(frm1.text1.text,frm1.text2.text)-(...,...)
Номер ответа: 7
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #7
Добавлено: 01.05.07 20:52
Добавить модуль, объявить переменную в нём.
Номер ответа: 8
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #8
Добавлено: 01.05.07 21:10
Пришол папаша и написал рание написаное.
Номер ответа: 9
Автор ответа:
litt
Вопросов: 6
Ответов: 18
Профиль | | #9
Добавлено: 01.05.07 21:44
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a = form1.Text1.Text
b = form1.Text2.Text
Label1.Caption = Format$
Label2.Caption = Format$(b)
End Sub
Это у меня работает в проге, где две формы...
А если добавить к ним MDI форму, то не работает ... пишет, что несовпадение типов.
Почему так?
Номер ответа: 10
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #10
Добавлено: 02.05.07 03:14
Если програма должна работать на скорость то код више ейо "убйот"
Номер ответа: 11
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #11
Добавлено: 02.05.07 03:15
Если програма должна работать на скорость то код више ейо "убйот"
Номер ответа: 12
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #12
Добавлено: 02.05.07 11:19
Docal
а ты всегда дубль пост оставляешь?
Номер ответа: 13
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #13
Добавлено: 02.05.07 11:49
Не, просто инет страшний.Все время глючит
Номер ответа: 14
Автор ответа:
litt
Вопросов: 6
Ответов: 18
Профиль | | #14
Добавлено: 02.05.07 14:09
А как с модулем это сделать?
Номер ответа: 15
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #15
Добавлено: 02.05.07 17:10
добавляешь стандартный модуль, в нем объявляешь
Public v As Single
и можешь к ней обращаться в любой части своего проекта