|
|
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
в кратце примено так ' функция вынесена в отдельный модуль public Sub MySet(varMe as Form,str as string) ' в varMe передаем ссылку на форму ' в str находиться имя поля на форме ' мне нужно запихнуть значение в это поле ??? ??? End Sub Все выше перечисленное нужно для работы в аccess Если я чего-то сморозил, просьба поправить. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.04.2004, 22:56 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
Сморожено только одно - в функцию не передано само значение. public Sub MySet(varMe as Form,str as string,v as variant) varMe(str)=v end sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.04.2004, 23:00 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
Про значение не написал по той причине, что его я вычисляю в этой функции. >varMe(str)=v данный вариант не прокатил т.к. туда необходимо передавать ссылку на сам объект (Object) Т.е. меня как раз и интересует, как по имени переменной получить ссылку на объект? Что-то типа того. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.04.2004, 23:21 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
Если первый параметр описан как varMe as Form то в него и надо передавать форму как объект. Если его описать как varMe as String то в него можно будет передавать имя формы, и тогда надо будет писать так: Forms(varMe)(str)=v ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.04.2004, 23:25 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
Все проще чем кажеться: varMe.controls(str)=значение ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.04.2004, 00:06 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
все равно вылетает с ошибкой Run-time error 2448 Невозможно присвоить значение объету Вообще хотелось получить универсальную функцию, который в качестве параметров передаются Me и имя поля на форме (именно строкой, например 'Поле1'), а внутри самой функции вычисляется значение(всегда целое) и присваивает его, нужному нам полю. Данная функция используется при открытии формы. Сделал следующим образом. вызов происходит следующий образом Private Sub Form_Open(Cancel As Integer) MySet Me, "Поле1" End Sub public Sub MySet(varMe as Form,str as string) dim formname as string dim varint as integer varint=123'например хотим присвоить значение 123 полю 'Поле1' formname = varMe.name 'присваиваю специально через переменную,чтоб проверить работу Forms(formname)(str) = varint end sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.04.2004, 00:09 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
А зачем так сложно? Если varMe уже содержит ссылку на форму, то зачем брать от него name, а потом опять превращать в ссылку? Если выдается ошибка, то предлагаю для пробы написать аналогичный код прямо в обработчике события, без этой функции. Если будет такая же ошибка, значит функция ни при чем. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.04.2004, 00:16 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
To: Alexander Say Также вылетает вылетает с ошибкой Run-time error 2448 Невозможно присвоить значение объету ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.04.2004, 00:20 |
|
||
|
утановка значения поля на форме
|
|||
|---|---|---|---|
|
#18+
Не на событие Open надо, а на Load ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.04.2004, 00:42 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32476922&tid=1675412]: |
0ms |
get settings: |
8ms |
get forum list: |
18ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
173ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
43ms |
get tp. blocked users: |
2ms |
| others: | 220ms |
| total: | 481ms |

| 0 / 0 |
