Новости



Visual FoxPro 9 позволяет создавать ещё более производительные приложения баз данных.
Двадцатиление FoxPro! Microsoft принимает поздравления.
Visual FoxPro Toolkit for .NET - более 225 функций VFP 7.0, для языков .NET (подробнее)

fox00020.gif

* В следующем примере функция INLIST( ) определяет, какому кварталу
* соответствует текущий месяц. Имя месяца хранится в переменной
* gcMonth. Каждый оператор CASE с помощью функции INLIST( )
* определяет, находится ли содержимое gcMonth в списке имен месяцев.
* Возвращаемое имя квартала записывается в переменную gcReporTitle.

SET TALK ON

STORE CMONTH(DATE( )) TO gcMonth

DO CASE

CASE INLIST(gcMonth,'January','February','March')

STORE 'First Quarter' TO gcReporTitle

CASE INLIST(gcMonth,'April','May','June')

STORE 'Second Quarter' TO gcReporTitle

CASE INLIST(gcMonth,'July','August','September')

STORE 'Third Quarter' TO gcReporTitle

OTHERWISE

STORE 'Fourth Quarter' TO gcReporTitle

ENDCASE

WAIT WINDOW gcReporTitle



Новое на сайте

  • Обновлен портфель программиста

    Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский)

  • Новые примеры программ

    Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2)

  • Обновленна справка

    Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.