Клас на изображението - работа с изображения в VBA

VBA Изображение контрол е отговорен за добавяне към изображението на повърхността форма. Самата Компонент е съвсем проста, и всички негови свойства са интуитивни, така че в тази статия ще се спра само на писане на код.

В близост до обекта изображението VBA има свойството Picture. че магазините достъп до чертежа. За да качите изображение, ще използваме функция VBA LoadPicture. който като параметър се минава по пътя към изображението.

Тук можем да предпише процедура ImageModule която осигурява нашия модул. Тялото на процедурата, ние казваме, че когато ти се обадя по текущата макро необходимостта да се покаже формуляр, наречен ImageForm.

Сега трябва да се форматира на външния вид на формата. Добави към повърхността на компонент VBA образ, отдолу място Знака за компонент, както и в долната част на публикацията двата бутона (CommandButton компонент). Външен вид форма може да се види на фигурата по-долу.

В началото, ние декларираме променлива аз, която е глобален. На нас ни трябва като брояч, и ще запази броя на кликванията върху един бутон. процедура GetFolders е отговорен за достъп до директорията C: \ Windows \ Web \ Wallpaper \. който съхранява файлове, изображения, използвани от операционната система за тапет. Във вашия случай, пътят може да бъде различна. Цикълът се случва за всяка обработка на всички файлове в определена папка, има отметка условия - сравним стойността на променливата аз и променлива й (тази променлива магазини броя на файла). В действителност, състоянието е необходимо, за да можем да прелистите снимките в папката.

CommandButton1_Click CommandButton2_Click процедури и са отговорни за обработка на кликвания върху бутон, разположен на формата. И при двете процедури, има процедура за разговори GetFolders (), като единствената разлика е, че в CommandButton1_Click намалява стойността аз, и по-CommandButton2_Click - увеличаване на стойността на променливата аз.

процедура UserForm_Initialize се извършва веднага при стартиране форма, тук са регистрирани форма надпис, имената на бутоните и първоначалната стойност на етикета (Label).

В резултат на това, когато работи макро ще формират преди контакт, натиснете бутона "Напред" и "Назад" движение възниква графични изображения от определена папка самата се показва на чертожната повърхност на матрицата (компонент VBA изображение). Tag ще съхранява пътя до снимката.

Заслужава да се отбележи, че не съм редактирате параметрите на дисплея (размер), ако желаете, можете да редактирате кода по свое усмотрение.