|
|
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
Подскажите, пожалуйста, в процедуре вычисляются 2 переменные, как в форме их получить ? Public Sub plan() ... g=... t=... plan=g,t? End Sub Private Sub построить_Click() Модуль.plan Forms![virabotk].k=plan(g) Forms![virabotk].r=plan(t) End Sub Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 10:33:56 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
объявить переменные на уровне модуля (глобальные) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 10:35:18 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
kedzoобъявить переменные на уровне модуля (глобальные) Public Sub plan() dim g as ... plan=(g,t) а как в форме их получить ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 10:39:39 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
Мари а как в форме их получить ? dim g as ... Public Sub plan() g=... Me.TextBox1 = g End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 10:44:54 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
Витал[quot Мари] dim g as ... Public Sub plan() g=... Me.TextBox1 = g End Sub plan() вызывается из формы сначала для одного поля, потом для другого Public Sub plan() g=... End Sub Private Sub построить_Click() Модуль.plan Me.TextBox1 = plan(g)??? ... Модуль.plan Me.TextBox2 = plan(t)??? End Sub Me.TextBox1 = g ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 10:58:26 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
Передать через пареметры Public Sub plan(g as Тип, t as Тип) g=..... t=..... end sub В форме Dim a as Тип, b as Тип plan a,b Вычисленные в процедуре значения g и t передадутся в переменные a и b ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 11:10:10 |
|
||
|
переменная (в процедуре вычисляются 2 переменные, как в форме их получить ?)
|
|||
|---|---|---|---|
|
#18+
Мари Витал[quot Мари] dim g as ... Public Sub plan() g=... Me.TextBox1 = g End Sub plan() вызывается из формы сначала для одного поля, потом для другого Public Sub plan() g=... End Sub Private Sub построить_Click() Модуль.plan Me.TextBox1 = plan(g)??? ... Модуль.plan Me.TextBox2 = plan(t)??? End Sub Me.TextBox1 = g Преобразуйте plan в функцию - тогда действительно будет Me.TextBox1 = plan(g) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.08.2004, 11:23:55 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32654089&tid=1672389]: |
0ms |
get settings: |
6ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
60ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
34ms |
get tp. blocked users: |
1ms |
| others: | 210ms |
| total: | 341ms |

| 0 / 0 |
