Постс Таггед 'Модули наслова
Субота, мај 2нд, 2009 |
Понекад је неопходно да се спречи отворену форму ако постоје записи показују да, на пример када радите упит и нема производње није потребан, ми не треба да буде отворена форма, јер немамо података за приказ. Дакле, шта морамо да проверите је да ли постоје записи да покаже и ако не постоји покаже неку поруку и ометају форма отворена. Како?
Лако је ставити само код одоздо у облику некретнина у догађај 'да отворите':
= 0 Затим Ако Форм.РецордсетЦлоне.РецордЦоунт
МсгБок "Но рецордс фоунд.", ВбЕкцламатион, "Грешка!"
ДоЦмд.Цлосе ацФорм, "пронашли податке"
Екит Суб
Енд Иф
Да бисте видели пример довнлоад: Спречити Отвори формулар
Објављено у Примери и обрасци и модули се | 2 Цомментс »
Четвртак, 11. децембар, 2008 |
1 - Креирајте образац у структури и догађају "Кликом" на својства обрасца унесете следеће: ме.кеипревиев = труе
Или се то дешава да догађаји на тастатури су добили у првом облику.
2 - у виду својства, догађаја 'дугме испод да "стави следећи код:
Привате Суб Форм_КеиДовн (шифровани Ас Интегер, Схифт Ас Интегер)
Изаберите шифровани Цасе
Случај вбКеиФ2
ДоЦмд.ОпенФорм "Форм1"
Случај вбКеиФ3
ДоЦмд.ОпенФорм "Форм2"
Случај вбКеиФ4
ДоЦмд.ОпенФорм "формуларио3"
Случај вбКеиФ5
Као Доубле Дим Калкулатор
Калкулатор = Схелл ("цалц.еке", вбНормалФоцус)
Случај вбКеиФ6
ДоЦмд.Цлосе
Случај остало
Енд Селецт
Енд Суб
Шта то ради је следећи:
- Притиском на тастер Ф2 отвара Форм1
- Притиском на тастер Ф3 отвара Форм2
- Притиском на тастер Ф4 отвара формуларио3
- Притиском на тастер Ф5 отвара Виндовс Калкулатор
- Притиском на тастер Ф6 затвара форму
Поред функцијски тастер Ф1, Ф2 ... итд, такође можете да користите било који други тастер да обављају функције, али имајући у виду да ако желимо да унесете податке у облику није погодан за коришћење тастере који се користе за писање података у пољима.
Друга ствар је да се само ради о форми у којој сте ставили горе наведене кодове.
Довнлоад: Тастери
Објављено у Примери и обрасци и модули се | 1 Цоммент »
Субота, 20. септембар, 2008 |
Ово је врста менија који нам омогућава да уштедите време, линије кода и бољи аранжман у смислу отворених облика, јер уз то мени само треба отворену форму. Поред смањења броја отворених облика такође смањује број дугмади у менију да бисте отворили сваку форму.
Ова врста менија, сигурно да постоји већ неко време и већ се користи од стране многих корисника програма Аццесс.
Па где је то мени?
Хајде да креирамо мени користећи комбиновани оквир који садржи све облике који планирамо да отворимо кроз њега. Када изаберете опцију из комбинованог оквира Пријавни формулар се приказује у оквиру подобрасца. Онда смо почели да се корак по корак менија.
1 - Хајде да креирамо табелу где ће ускладиштити име које желите да сваки облик и име обрасца који ће се отворити. У примеру који сам створио То тблмену 'Тхе табелу са следећим пољима:
Поље Тип
Номедомену текст -> име које ће се видети у менију (комбиновани оквир)
формирају текст -> Наме обрасца који ће се отворити
Након што су подаци уведени у примеру су:
Образац НомедоМену
Рачуни Форм1
Депозити Форм2
Покрети формуларио3
Рачун-Бок формуларио4
Рачун Рачун-формуларио5
Ектрацт формуларио6
2 - Онда смо креирате упит из претходне табеле:
Тблмену изабрао табелу, а затим изабрати два поља у којима смо одабрали за растуће сортирање номедомену да лакше пронађу мени доста пута када желимо да отворе обрасце. За овај упит сам назива "ЦсМену '.
3 - Хајде да створи 'Мени' облику, односно изабрати новог обрасца у приказу дизајна. Онда смо креирали комбиновани оквир и промените следећа својства:
- Број колона: 2
- Колона ширине: 1цм, 0ин;
- Порекло линије: цсмену (што је име упита створеног у претходном пасусу)
4 - У истом облику ћемо створити подобразац неког невезаној главног обрасца (У примеру сам звао менукуадро). То је облик који ће се отворити сваки од облика изабрати из менија (комбиновани оквир).
5 - Сада направите модул који ће нам омогућити да отворите мени који је изабран у комбо боксу у подобрасца.
Направили смо модул (који сам назвао 'абрирмену') и залепио следећи код:
Јавна функција АтиварМену (Цомбмену Тхе цомбобокс, субабрир подобрасца)
Абрирформ Ас Стринг Дим
= Абрирформ Цомбмену.Цолумн (1)
субабрир.СоурцеОбјецт = абрирформ
субабрир.ЛинкЦхилдФиелдс = ""
субабрир.ЛинкМастерФиелдс = ""
Енд Фунцтион
Након одласка у особинама комбинованог оквира у обрасцу менију и после догађаја Упдате ставили креиран функција: ативармену = ([Мени], [менукуадро]) да 'Мени' је назив комбинованог оквира и 'менукуадро' име подобрасца.
И на крају мени је спреман за употребу. Само покушајте и користити. Надам се да сте уживали у овај савет.
Преузмите: Мени
Испод слике у менију.
Прилагођено Мени
Објављено у Примери и обрасци и модули се | 12 Цомментс »
Уторак, мај 6тх, 2008 |
Овај пример показује како систем управљања за пружање плаћања.
Пример показује да је ово не креирате и аутоматски једним кликом на дугме, предности уговора о продаји путем унетих података. То је, уводимо име клијента на датум почетка уговора, а укупан износ платив. Затим само кликните на "Израчунајте уплате" да се аутоматски генерише број рата и дели вредности означене од стране сваког од њих и израчунава датум сваке рате (једна месечно). Ово је такође пример који показује како да додате више записа одједном, јер када кликнете на дугме додаје евиденцију за сваку корист.
Довнлоад: Уметање више Рецордс
Постед ин Датуми и узорака и Формс и модула и евиденције се | 17 Цомментс »
Субота, март 29тх, 2008 |
Ово је пример примене поља која Сониа читач намењен базе података рекордних животиња. То је једноставна база података са само образац за унос података са сликом животиње.
Довнлоад: Анимал Схелтер
Свака промена само коментар овде.
Писмени Обрасци и фотографије и Модули и Рецордс и столови се | 11 Цомментс »
Среда, 20. фебруар, 2008 |
Постоји неколико начина да уђе у записник, а најчешће је да се кроз форму обавезује на табели. Други начин да то урадите је кроз неповезане области, односно користећи формулар са пољима независна невезаним за сто. На
унесете податке ћемо користити 'записа', тј од кода, који у случају овај пример је како следи:
Дим дб Ас Датабасе
Дим РС као записа
Ако МсгБок ("Желите ли да напишете?" ВбИесНоЦанцел, "Опције") = вбИес Онда
"Притиском се питао да ли да сачувате запис или не, ако је тако код наставља до краја
Сет дб = ЦуррентДб ()
Сет рс = дб.ОпенРецордсет ("подаци", дбОпенТабле)
"Отворите табелу да бисте уметнули податке регистровати
рс.АддНев
РС ("Име") = Ја ИНоме!
РС ("Адреса") = ме! Иморада
РС ("старост") = ме! Иидаде
рс.Упдате 'шаље податке у табелу
рс.Цлосе "Слободан подаци и затвара записа
Сет рс = Нотхинг
Сет дб = Нотхинг
Ме.ИНоме = Нула 'брише поља у форми
Ме.Иморада = НУЛЛ
Ме.Иидаде = НУЛЛ
МсгБок "Рекорд спасен", вбИнформатион, "Доне" "Дисплаи поруку о потврди
Ме.ИНоме.СетФоцус 'Померите курсор до првог поља
Друго: Екит Суб
Енд Иф
Довнлоад: Место Независна
Објављено у Примери и обрасци и модули и евиденције и табеле се | Но Цомментс »
Уторак, 19. фебруар, 2008 |
Овај пример показује како да извршите израчунавања на часовима. То је корисно за оне који треба да знају колико је времена протекло између старта и крајње време. Није довољно да се на одузимање од крајњег времена за време почетка, јер ако крајње време креће од једног дана до наредне рачуне више неће тачно, на пример:
Старт Тиме: 23:00:00
Крај Време: 02:00:00
Крај Време - Старт Тиме = 02:00:00 = -21:00:00 на 23:00:00
Очигледно то није тако једноставно да раде са временом, јер онда уместо три сата да се правилно резултат би погрешно -21 часова.
Да бисте решили овај период да иде из дана у дан морамо да прво проверите да ли крајње време је већи од почетка времена, које год је веће онда је рачуница: Крајње време - време стартовања.
Ако сте под онда морамо да урадимо обрачун на други начин, и то:
Старт Тиме: 23:00:00
Крај Време: 02:00:00
Укупно време: 23:59:59
Хит: 00:00:01
У суштини оно што ми радимо је додати на вредност 24:00:00 одузимањем да нам дају исправне три сата. То је:
Крај Време - Почетак Време + + Хит Укупно време = 02:00:00 на 23:00:00 + 23:59:59 + 00:00:01 = 24:00:00 = 03 + -21:00:00 : 00:00
Довнлоад: Рачун са временом
Објављено у Примери и обрасци и сати и модула се | 20 Цомментс »
Среда, фебруар 6тх, 2008 |
Овај пример показује како да изаберете датум кроз искачућем календару. То је, као и модул може формирати Изаберите датум јер је то календар. У примеру можемо да изаберемо датум кликом на дугме поред датуму поље или кликом на десни тастер миша на датум у пољу. Овај начин за унос датума је веома практична јер нам омогућава да видите календар и да изабере најбољу датум који желите.
Довнлоад: ПопУп Календар
Постед ин Датуми и узорака и Формс и модула се | 1 Цоммент »
Недеља, јануар 27тх, 2008 |
Обично када смо покренули центар дугме миша на образац, промените дневник приступа. У неким ситуацијама може бити корисно да се не дешава.
Овај пример користи модул у случају облику за учитавање, да спрече корисника крећете кроз записе помоћу миша за померање. Да бисте тестирали смо да користите точкић миша (средњи тастер) да се види да не мења регистрацију.
Преузмите овде: Вхеел Моусе
Објављено у Примери и обрасци и модули и миш и Рецордс се | Но Цомментс »
Понедељак, 21. јануар, 2008 |
Овај пример користи модул који скрива Мицрософт Аццесс главни прозор, остављајући само обрасца прозор видљив.
Да бисте користили овај модул морамо да користимо следећу команду на отварању манифестације у виду: Цалл фсетАццессВиндов (СВ_ХИДЕ).
Да бисте проверили путем пример урадите довнлоа: Манипулишите доступ Виндов
Објављено у Примери и обрасци и модули се | 8 Цомментс »
