Windows-приложение "Формирование реестра заказов " - VB

Узнай цену своей работы

Формулировка задачи:

Помогите пожалуйста, не совсем понимаю как реализовать данное задание Создать Windows-приложение "Формирование реестра заказов ". Предусмотреть: 1. Создание входных файлов: Справочник услуг (Код услуги, Наименование услуги, Стоимость услуги); Клиенты (Код клиента, Наименование клиента, Адрес, Теле-фон). 2. На основе данных входных файлов и заданного в форме Кода клиента, Кода услуги и Стоимости услуги получение выходного файла: Заказы (Номер заказа, Дата заказа, Код клиента, Код услуги, Стоимость услуги). 3. Вывод Общей стоимости заказа по заданному Номеру заказа. 4. Создание меню для выполнения всех указанных в задании пунктов.

Решение задачи: «Windows-приложение "Формирование реестра заказов "»

textual
Листинг программы
  1. Open "TESTFILE" For Output As #1    ' Открывает файл для записи.
  2. Print #1, "Пример"  ' Печатает текст в файл.
  3. Print #1,   ' Печатает пустую строку в файл.
  4. Print #1, "Зона 1"; Tab ; "Зона 2"  ' Печатает в двух зонах печати.
  5. Print #1, "Пример" ; " " ; "всем"   ' Строки разделяются пробелом.
  6. Print #1, Spc(5) ; "5 пробелов" ' Печатает пять пробелов.
  7. Print #1, Tab(10) ; "Привет"    ' Печатает слово в столбце 10.
  8.  
  9. ' Присваивает значения типа Boolean, Date, Null и Error.
  10. Dim MyBool, MyDate, MyNull, MyError
  11. MyBool = False : MyDate = #February 12, 1969# : MyNull = Null
  12. MyError = CVErr(32767)
  13. ' Вместо слов True, False, Null и Error записываются слова,
  14. ' соответствующие им в текущем языке. Текстовые константы даты
  15. ' записываются в кратком системном формате даты.
  16. Print #1, MyBool ; " - логическое значение"
  17. Print #1, MyDate ; " - дата"
  18.  
  19. Print #1, MyNull ; " - значение Null"
  20. Print #1, MyError ; " - значение типа Error"
  21. Close #1    ' Закрывает файл.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы