Доступ к файлам - VB

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

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

Налоговая инспекция поощряет налогоплтельциков, вносящих подоходный налог до истечения февральского контрольного срока, делая им скидку. Создайте файл, в котором содержались бы имена, сведения о сроках уплаты и размере налога для каждого налого плательщика. Пусть ваша программа читает файл и делает скидку в 10% для тех, кто уплатил нолог досрочно, а также выводит на экран имена и размер скидки в рублях. Очень срочно надо. Буду очень сильно благодарен.

Решение задачи: «Доступ к файлам»

textual
Листинг программы
   Dim File As String, CF As String    'объявим пеpеменнyю для имени файла и его cодеpжимого 
   File = "d:\ca.log"    'ycтановим имя файла и пyть 
   Open File For Binary As #1   'откpоем файл для чтения 
      CF = Input(FileLen(File), 1)   'загpyзить в пеpеменyю CF вcе cодеpжимое файла 
   Close #1    'закpыть файл

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


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

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

10   голосов , оценка 4.1 из 5
Похожие ответы