17038

Використання файлів: послідовний доступ у VB 6.0

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторна робота № 16 Тема: Використання файлів: послідовний доступ Ціль: ознайомитися з принципами організації роботи з файлами у послідовному доступі і використання файлових функцій у VB 6.0. Обладнання: ПК ПЗ MathCad. Завдання 1. Відкрити файл для введення....

Украинкский

2013-06-29

67 KB

2 чел.

Лабораторна робота № 16

Тема: Використання файлів: послідовний доступ

Ціль: ознайомитися з принципами організації роботи з файлами у послідовному доступі і  використання файлових функцій у VB 6.0.

Обладнання: ПК, ПЗ MathCad.

Завдання 1.

  1.  Відкрити файл для введення.
  2.  Прочитати з файлу рядок і зберегти її в текстовій перемінній.
  3.  Додати вміст перемінної в елемент керування списком ListBox.
  4.  Повторите пп.. 2-3 для кожного рядка файлу.
  5.  Закрийте файл.

Завдання 2.

  1.  Відкрити файл для введення в режимі Append.
  2.   За допомогою операторів: Print #, Write # здійсните запис інформації.
  3.  Результат виконання переглянете в програмі Notepad.

Листинг

Программа

Dim та As Integer

Dim t As String

Private Sub Command1_Click()

nf = FreeFile()

Open "c:\text.txt" For Input As nf

Do Until EOF(nf)

Line Input #nf, t

List1.AddItem t

Loop

Close nf

End Sub

Private Sub Command2_Click()

nf = FreeFile()

Open "c:\text.txt" For Append As nf

t = Text2.Text

Print #nf, t

Close nf

End Sub

Private Sub Form_Load()

nf = FreeFile()

Open "c:\text.txt" For Input As nf

End Sub

Проверка файла

Контрольні питання:

  1.  Що таке послідовний доступ?
  2.  Використання функції FreeFile.
  3.  Використання операторів: Open, Close, Print # , Get#, Put# , Write #, Line Input # .
  4.  Параметр mode, як режим доступу.


 

А также другие работы, которые могут Вас заинтересовать

33972. НЕПРОХОДИМОСТЬ КИШЕЧНАЯ 29.5 KB
  Классификация По этиологии Динамическая Спастическая заболевания нервной системы истерия спазмофилия дискинезия глистная инвазия полипы толстой кишки Паралитическая воспалительный процесс в брюшной полости флегмона гематома забрюшинного пространства состояние после лапаротомии рефлекторные влияния патологических состояний внебрюшинной локализации например пневмонии плеврита ИМ тромбоз брыжеечных сосудов инфекционные заболевания токсические парезы Механическая Обтурационная: интраорганная глистная инвазия...
33973. Тактика хирурга при лечении кишечной непроходимости. Особенности 35.5 KB
  Тактика хирурга при лечении кишечной непроходимости. Перед началом лечения необходимо четко представлять с каким видом непроходимости приходится иметь дело. При странгуляционной непроходимости или обоснованном подозрении на нее показана экстренная операция ибо задержка хирургического вмешательства может привести к некрозу кишки и разлитому перитониту. При обтурационной кишечной непроходимости можно попытаться использовать консервативное лечение с целью ликвидации кишечной непроходимости с последующим устранением вызвавшей .
33974. Неспецифический язвенный колит 34 KB
  Это заболевание представляет собой хронический воспалительный процесс с развитием язвеннонекротических изменений в слизистой оболочке прямой и ободочной кишки. В сыворотке крови больных неспецифическим язвенным колитом можно обнаружить специфические антитела к слизистой оболочке толстой кишки. Слизистая оболочка толстой кишки продуцирует антиген образуются антитела. Далее присоединяется вторичная инфекция кишечная микрофлора поражение нервного аппарата кишки алиментарная недостаточность.
33975. Болезнь Крона 32 KB
  Болезнь Крона Болезнь Крона хроническое неспецифическое воспалительное заболевание которое может поражать любой отдел пищеварительного тракта от пищевода до прямой кишки. наблюдавшими его в терминальном отделе подвздошной кишки и назвавшими терминальным илеитом. В патогенезе заболевания основным считают поражение лимфатической системы приводящее к поражению стенки кишки и развитию гранулематозного воспаления. Патологическая анатомия: стенка кишки отечна утолщена рубцово изменена.
33976. Дифузный полипоз. (Полипы толстой кишки. Ворсинчатые опухоли.) 26 KB
  Полипы толстой кишки. Полипы доброкачественное новообразование исходящее из эпителия склонное к малигнизации. Хирургическое: одиночные полипы ворсинчатые опухоли с хорошо выраженной ножкой электрокоагуляция через ректо и колоно скоп при малигнизации ворсинчатой опухоли радикальная операция право и левостороняя гемиколэктомия резекция сигмовидной. Множественные полипы ограниченная резекция пораженного отдела кишки.
33977. Прямая кишка. Исследования 24.5 KB
  Нижнеампулярный отдел прямой кишки переходит в анальный канал длиной 25 4 см и заканчивается задним проходом. В отличие от других отделов толстой кишки прямая кишка не имеет гаустрации ее продольный мышечный слой не собран в ленты а равномерно распределен по всей окружности. Слизистая оболочка прямой кишки покрыта цилиндрическим эпителием. В нижнеампулярном отделе прямой кишки слизистая оболочка образует продольные складки колонны Морганьи у основания которых находятся анальные пазухи крипты.
33978. Трещины анального канала. Локализация. Клиника. Механизм боли. Лечение 25.5 KB
  Трещины анального канала. Боль обусловливает спазм и углубление трещины. Может быть несколько трещин в таком случае наиболее типичная локализация их передняя и задняя комиссуры зеркальные трещины. Трещины заднего прохода чаще наблюдают у женщин в возрасте от З0 до 50 лет.
33979. ВЫПАДЕНИЕ ПРЯМОЙ КИШКИ (Пролапс прямой кишки) 28 KB
  ВЫПАДЕНИЕ ПРЯМОЙ КИШКИ Пролапс прямой кишки Выпадение прямой кишки прогрессирующее заболевание характеризующееся смещением стенок дистального отдела толстой кишки и выпадением выворачиванием их через заднепроходное отверстие. Длительно существующее выпадение приводит к выраженным морфологическим и функциональном изменениями в стенке кишки и её замыкательном аппарате. Выпадение влагалища и прямой кишки 176780. Этиология Производящие причины Повышение внутрибрюшного давления: тяжёлый физический труд затяжные роды упорные запоры...
33980. Полипы прямой кишки 23.5 KB
  Полипы прямой кишки. Гиперпластические полипы. Аденоматозные полипы. Согласно гистологическим критериям различают следующие виды аденоматозных полипов: тубулярные 6580 тубуловорсинчатые 1025 и ворсинчатые 510 Аденоматозные полипы являются предшественниками карциномы.