Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из VBA при определённых условиях, в форме, присваивать координаты полю / 16 сообщений из 16, страница 1 из 1
27.01.2018, 17:26
    #39592203
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Здравствуйте, очередная задача (по моим знаниям не выполнимая), как можно указать координаты полю в форме, если к примеру значение А=1 то координаты сверху 4 слева 5, а при А=2 координаты сверху 2 слева 1.
Заранее спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2018, 20:43
    #39592251
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005,
ничего не поняла,, но что-то похожее на это
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Sub main27()
m180127 1
m180127 2
m180127 3
End Sub
Sub m180127(a)
'Здравствуйте, очередная задача (по моим знаниям не выполнимая),
'как можно указать координаты полю в форме,
'если к примеру значение А=1 то координаты сверху 4 слева 5,
'а при А=2 координаты сверху 2 слева 1.
'Заранее спасибо.
Dim x, y
If a = 1 Then
x = -5: y = 4
ElseIf a = 2 Then
x = -1: y = 2
Else
x = 0: y = 0
End If

Debug.Print "a="; a, "x="; x, "y="; y

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2018, 20:49
    #39592252
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005,

если это форма аксесс, то
if a=1 then
me.pole1.left=5
me.pole1.top=4
else
.......аналогично
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2018, 21:41
    #39592259
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005,

примерно так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 00:24
    #39603859
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
ПЕНСИОНЕРКА,

Если кому интересно, то в моём случае, правильный ответ выглядит в таком виде:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
    
Private Sub П_ВидОбъкта_AfterUpdate()
     If Me.П_ТипМХИГ = "домовладение" Then
           Me.Н_Подвал.Left = 5600
           Me.Н_Подвал.Top = 6000
           Me.П_Подвал.Left = 6300
           Me.П_Подвал.Top = 6000
      Else
           Me.Н_Подвал.Visibl = -0
           Me.П_Подвал.Visibl = -0
    End If
End Sub



Координаты указываются в пикселях (а не в сантиметрах).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 01:31
    #39603868
хм-м-м
хм-м-м
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005Координаты указываются в пикселях (а не в сантиметрах).Не в пикселях, а в твипах.

Минус ноль (-0) это что за чудо такое?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 05:07
    #39603880
Панург
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
хм-м-мМинус ноль (-0) это что за чудо такое?

«Отрицательный ноль» и «положительный ноль» — это не числа в обычном смысле, а абстракции, представляющие бесконечно малую последовательность (или функцию), сходящуюся к нулю, соответственно, слева (-0) или справа (+0). Тем самым они позволяют обозначить тот факт, что сходимость — односторонняя.
© Википедия
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 08:25
    #39603917
хм-м-м
хм-м-м
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Вряд ли ТС теорией рядов занимается...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 09:00
    #39603929
vmag
vmag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
хм-м-мМинус ноль (-0) это что за чудо такое?

А это собственная авторская разработка...
Новое свойство Visibl к полю прикручено, а к нему соответственно и свои параметры...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2018, 23:46
    #39604476
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
хм-м-м,
vmag,
Панург.

Минус 0 в данном контексте работает как надпись Н_Подвал и поле П_Подвал становятся не видимыми , и здесь не "минус ноль" как вы по незнанию увидали, а "тире ноль", что в корне меняет дело, если поставить "тире один" поля станут видимыми, но мне нужны невидимые элементы при данных условиях.

Но если до вас всё равно не доходит в данном случае можно также писать "-False" и "-True" просто "-0" и "-1" короче.
Так, на будущее, а вообще - читайте хелпы, там много интересного.

P.S.: Данный кусок выдернут из рабочего VBA кода. (в других моих темах я выкладывал даже полностью базу, правда пустую)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.02.2018, 00:15
    #39604477
эхе-хе
эхе-хе
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005,
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.02.2018, 04:03
    #39604491
Панург
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005, да, это в корне меняет дело
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.02.2018, 22:40
    #39605139
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Панург,

Задело, "чтоль"?

эхе-хе
А на счёт царя Вы правы, я такой и этим горжусь!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2018, 03:56
    #39605166
Панург
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Wawan2005Задело, "чтоль"?ага, пиши ещё, хоть посмеяться можно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2018, 10:25
    #39605311
тире ноль
тире ноль
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
Тире чернеющих в пустыне
Несказанных в досаде слов -
От века присно и доныне
Неслышный ропот голосов.
И многоточие гордыни -
Обсце́нной лексике упрек,
Расцветший ниже ватерлиний
Умомрачительный цветок.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2018, 19:09
    #39605727
vmag
vmag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из VBA при определённых условиях, в форме, присваивать координаты полю
тире ноль,

Глубоко
Как будто сочинили на японском, а потом перевели на русский
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из VBA при определённых условиях, в форме, присваивать координаты полю / 16 сообщений из 16, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 426ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1611670]:
 0ms
get settings:
 12ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 43ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 56ms
get tp. blocked users:
 2ms
others: 274ms
total:  426ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]