Функция для простой операции / Microsoft Access

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Функция для простой операции

6 сообщений из 6, страница 1 из 1

Функция для простой операции

#39371551

Taksebe

Гость

Всем здрасти и с наступающими всех, всех, всех!
Прошу помощи в следующем вопросе.
Есть много полей, которые я делаю высокими и значение поля находится на соответствующей высоте. Если снизу, то задача в начале выполнения, ну и ближе к верху поля означает приближение завершения задачи.
А место значения в поле я вычисляю по формуле:
Поле1.topmargin=(поле1.height-567/20*поле1.fontsize)/поле2*(поле2-поле1)

Можно ли здесь сделать простенькую функцию, чтобы указать, например: function1 (поле1, поле2) и избежать указания поля1 каждый раз по 3 раза.

Всем спасибо, всех еще раз с наступающими!!!!

...

Рейтинг:

0 / 0

21.12.2016, 09:12

| Ответить | Цитировать | Написать

Функция для простой операции

#39371631

NVT

Участник

Откуда: Санкт-Петербург

Сообщения: 184

Рейтинг: 0 / 0

Taksebe, with тебе в помощь

...

Рейтинг:

0 / 0

21.12.2016, 10:20

| Ответить | Цитировать | Написать

Функция для простой операции

#39371969

Лапух

Участник

Откуда: Стойбище № 7

Сообщения: 1 207

Рейтинг: 0 / 0

Taksebe, может стоило примерный примерчик примера выложить?
А то как сами видите на - Wiht посылают.
То глядишь еще и в - Help пошлют.

...

Рейтинг:

0 / 0

21.12.2016, 14:30

| Ответить | Цитировать | Написать

Функция для простой операции

#39372080

__Michelle

Участник

Сообщения: 3 247

Рейтинг: 0 / 0

Taksebe...Есть много полей, которые я делаю высокими и значение поля находится на соответствующей высоте.
Если снизу, то задача в начале выполнения, ну и ближе к верху поля означает приближение завершения задачи.
А место значения в поле я вычисляю по формуле:
Поле1.topmargin=(поле1.height-567/20*поле1.fontsize)/поле2*(поле2-поле1)

Можно ли здесь сделать простенькую функцию, чтобы указать, например: function1 (поле1, поле2)...Можно, конечно. Почему же "нельзя"?

Код: vbnet

1.
2.
3.

Private Sub sub_CtlTopMargin(Ctl1 As Control, Ctl2 As Control)
 Ctl1.TopMargin = (Ctl1.Height - 567 / 20 * Ctl1.FontSize) / Ctl2 * (Ctl2 - Ctl1)
End Sub

Вызов

Код: vbnet

Call sub_CtlTopMargin(поле1, поле2)

...

Рейтинг:

0 / 0

21.12.2016, 15:52

| Ответить | Цитировать | Написать

Функция для простой операции

#39373351

Ответ2

Гость

NVT и Лапух, нахрена вы вообще пишете, если помочь не можете? Флудильщики.
Мишелю огромное спасибо. Четко, по делу.

...

Рейтинг:

0 / 0

22.12.2016, 23:58

| Ответить | Цитировать | Написать

Функция для простой операции

#39373360

__Michelle

Участник

Сообщения: 3 247

Рейтинг: 0 / 0

Ответ2,

А вот к NVT Вы несправедливы.
Он просто не так понял задачу "избежать указания поля1 каждый раз по 3 раза"
и добросовестно напомнил о With.
То есть, можно записать вот так, именно без "указания поля1 каждый раз по 3 раза":

Код: vbnet

1.
2.
3.

With поле1
.TopMargin = (.Height - 567/20 * .FontSize) / поле2 * (поле2 - .Value) 
End With

______________________________________
Michel - мужское имя
Michelle - женское имя
)))

...

Рейтинг:

0 / 0

23.12.2016, 00:35

| Ответить | Цитировать | Написать

6 сообщений из 6, страница 1 из 1

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Функция для простой операции

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&msg=39373360&tid=1612860]:	0ms
get settings:	7ms
get forum list:	12ms
check forum access:	3ms
check topic access:	3ms
track hit:	46ms
get topic data:	10ms
get forum data:	2ms
get page messages:	47ms
get tp. blocked users:	1ms
others:	377ms

total:	508ms