Управление полосами прокрутки из-под кода

Я занимаюсь систематикой грибов и люблю программировать для своей научной работы. У меня есть аксессовская база данных с довольно навороченным уже интерфэйсом. Есть одна форма, которую я использую для просмотра микрофотографий своих грибов, а также для измерения структур их строения с автоматическим занесением измерений в поле таблицы, соотвествущее категории структуры, и запись, соответсвующую номеру образца гриба.
В принципе всё работает. То есть я могу, как в фотошопе нажать мышку на одном конце споры довести ее до другого, отпустить и измерение будет пересчитано в соотвествии с увеличением и занесено куда следует. Я хочу сделать небольшое усовершенствование, так как задолбался прокручивать форму (когда картинка большая, а это чаще всего так), таща мышкой за полосы прокрутки. Хотелось сделать возможным переключение с помощью какой-нибудь клавиши на 'руку' (которая бывает во многих программах). Тут я с столкнулся с двумя проблемами:
1.Среди properties объекта form я не нашел таких как положение полос прокрутки. Оно как-нибудь управляется из-под VBA или нет? Может быть можно подключить какие-нибудь дополнительные references? Чего особо мудреного мне делать не хотелось, так как это программа на одного человека (пока), и это не моя основная работа. То есть в чем-то совсем сложной разбираться некогда.
2.Второй вопрос больше эстетический, чем принципиальный, но всё было неплохо его решить тоже. Форма указателя мыши задается свойством Screen.MousePointer. Но там их совсем немного и 'руки' ессно нет. Можно подключить дополнительные указатели?

0

Ответ на эстетический вопрос. Похоже нет. Однако можно поставить под Windows бесплатный CursorXP, мне понравилось, особенно курсор в виде дождевой капли (а вместо часиков там - капающая вода)

0

Возможно это подойдет

Метод GoToPage объекта DoCmd выполняет макрокоманду 'НаСтраницу' (GoToPage) в программе Visual Basic. Подробное описание макрокоманды и ее аргументов см. в разделе справки о макрокоманде.

Синтаксис

DoCmd.GoToPage [номерСтраницы] [, отЛевогоКрая, отВерхнегоКрая]
Метод GoToPage использует следующие аргументы.

Аргумент Описание

номерСтраницы Числовое выражение, представляющее допустимый номер страницы активной формы. Если оставить данный аргумент пустым, фокус остается на текущей странице. Аргументы отЛевогоКрая и отВерхнегоКрая позволяет указать часть страницы, выводящуюся на экран.
отЛевогоКрая Числовое выражение, представляющее допустимый горизонтальный сдвиг страницы от левого края окна.
отВерхнегоКрая Числовое выражение, представляющее допустимый вертикальный сдвиг страницы от верхнего края окна.

Дополнительные сведения

Значения аргументов отЛевогоКрая и отВерхнегоКрая измеряются в единицах твип.
Для того чтобы определить аргумент отЛевогоКрая и отВерхнегоКрая, оставив аргумент номерСтраницы пустым, необходимо ввести запятую, представляющую аргумент номерСтраницы. Если аргументы отЛевогоКрая и отВерхнегоКрая не заданы, вводить запятые после аргумента номерСтраницы не требуется.
Метод GoToPage объекта DoCmd, выполняющий макрокоманду 'НаСтраницу' (GoToPage) в программе Visual Basic, был добавлен в Microsoft Access для Windows 95 для совместимости с предыдущими версиями. Рекомендуется использовать в новых программах метод GoToPage объекта Form. Метод GoToPage объекта DoCmd и метод GoToPage объекта Form являются разными методами.

0

Спасибо!
GoToPage никогда раньше не пользовался, в голову не приходило, что там может указывать не только номер страницы, но и сдвиг в конкретное место. Только теперь я не понимаю, какой командой снять текущий (до перемещения рукой)сдвиг по вертикали и горизонтали. Сам, конечно, попробую порыться, но, может, кто знает?

0

Собственно, конечно, можно начать с нулей, а дальше хранить значения от предыдущих сдвигов в каких-нибудь тэгах. Пожалуй, так и сделаю.

0