Помоћу макроа испод можете приказати ЦоммандБар центриран на екрану, хоризонтално и вертикално.
Макро такође приказује како можете добити величину екрана помоћу функције ГетСистемМетрицс32.
Прогласи функцију ГетСистемМетрицс32 Либ "Усер32" _ Алиас "ГетСистемМетрицс" (БиВал нИндек Ас Лонг) Ас Лонг Под ЦентерЦоммандБар () Дим в Ас Лонг, х Ас Лонг в = ГетСистемМетрицс32 (0) 'сцреенвидтх ин поинтс х = ГетСистемМетрицс32 (1)' сцреенхете у тачкама Са командним тракама ("МиЦоммандБарНаме"). Позиција = мсоБарФлоатинг .Лефт = в / 2 - .Видтх / 2 .Топ = х / 2 - .Хеигхт / 2 Енд Витх Енд Суб