|
|
| |
|
|
| |
to: час
(21.04.2011 в 21:30)
|
| | готовься! | |
| |
| |
|
|
| |
|
|
| |
to: Lukas
(21.04.2011 в 21:16)
|
| |
А у мну подчёркивание усюду усюду усюду усюду 
| |
| |
| |
| |
|
|
| |
to: Explorer
(21.04.2011 в 20:56)
|
| | Символ подчеркивания хотели зарезервировать для VBA, но, видать, пока не решаются.
Все-же, лучше не пользовать. | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 20:55)
|
| | 
час классно пишет :) очень читабельно
некоторые рекомендуют заменять имена созвучные (даже визуально похожие на) системым на акронимы или условные сокращения
т.е. не использовать WIDTH_P или HEIGHT_P
а писать что-то вроде:
W_PARCEL
H_PARCEL
T_PARCEL
L_PARCEL
вроде понятно и глаз не режет... но к этому нужно привыкнуть
-----------
ну и конечно все операции с объектами через коллекции (а потом For each Item in)
| |
| |
| |
|
|
| |
|
|
| |
to: час
(21.04.2011 в 20:18)
|
| |
Private sf As Form
На откритии
Set sf=Me.LIST_ACTUAL_PRODUCT.Form
Где надо
sf.SetVisible False
На закрытии
Set sf=Nothing
|
Кстати, подчиненная, часом, не в табличном режиме? | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 20:17)
|
| | >>> Совсем ничего не происходит
э-э-э-э... | |
| |
| |
| |
|
|
| |
to: Lukas
(21.04.2011 в 20:16)
|
| | А как к ней абратиться из основной? | |
| |
| |
| |
|
|
| |
to: Explorer
(21.04.2011 в 20:15)
|
| | Не ругается - глотает, а поля не прячет (С) 
-----------------------------
Совсем ничего не происходит.....  | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 20:12)
|
| | Public SetVisible(blnVisible As Boolean)
Кстати, подчиненная, часом, не в табличном режиме? | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 19:51)
|
| | топек не четал
Visible = False это коряво
должно быть Enabled & Locked
так что совсем ничего не происходит или ругается? | |
| |
| |
| |
|
|
| |
to: Lukas
(21.04.2011 в 20:10)
|
| | Это - возможно?
Вот так?
Public СкрытьНафиг() | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 19:51)
|
| | А фокус где?
Я бы описал метод в подчиненной форме, и вызывал бы его из основной. | |
| |
| |
| |
|
|
| |
to: час
(21.04.2011 в 17:13)
|
| | Хочу из основной формы в подчинённой скрыть три поля
Forms("DIRECTOR_FRM").LIST_ACTUAL_PRODUCT.Form.WIDTH_P.Visible = False
Forms("DIRECTOR_FRM").LIST_ACTUAL_PRODUCT.Form.HEIGHT_P.Visible = False
Forms("DIRECTOR_FRM").LIST_ACTUAL_PRODUCT.Form.COMMENT.Visible = False
Me.LIST_ACTUAL_PRODUCT.Form.WIDTH_P.Visible = False
Me.LIST_ACTUAL_PRODUCT.Form.HEIGHT_P.Visible = False
Me.LIST_ACTUAL_PRODUCT.Form.COMMENT.Visible = False
|
ничего не происходит?
Почему? | |
| |
| |
| |
|
|
| |
to: kot_k_k
(21.04.2011 в 11:16)
|
| | 
| |
| |
| |
|
|
| |
|
|
| |
to: час
(21.04.2011 в 11:00)
|
| | Ну ладно, - голь на выдумки хитра
Забил проблему - поступив иначе
Не даром - ранее была муштра....
Решил с другого боку - я - задачу!!!!! | |
| |
| |
|
|
| |
|
|
| |
to: час
(21.04.2011 в 10:08)
|
| | Помнится, вы работаете в VB? Там нет CurrentDb. Нужно создать объект DBEngine, в нем OpenDatabase, а в ней уже OpenRecordset. | |
| |
| |
| |
|
|
| | Хочу открыть запрос ("FILE_NAME_YES") как Recordset
Set db = CurrentDb
Set RST = db.OpenRecordset("FILE_NAME_YES", dbOpenDynaset)
|
abu_вам | |
| |
| |