Скачиваний:
30
Добавлен:
02.05.2014
Размер:
86.53 Кб
Скачать

Федеральное агентство по образованию

Государственное образовательное учреждение

профессионального высшего обучения

Уфимский государственный авиационный университет

Кафедра информатики

Отчет по лабораторной работе № 6

По теме «Работа с файлами и строками»

Выполнил:

Проверила: старший преподаватель Хамзина Е.А.

Уфа 2006

Отчет

Цель работы

Изучение возможностей разработки приложений, взаимодействующих с файловой системой персонального компьютера и работы со строками.

Задание 1

Удалить часть символьной строки, заключенной в скобки (вместе со скобками).

Таблица

Объект

Свойство

Значение

Form1

Caption

лаба 6-1

Text1

Text

-

Text2

-

Label1

Caption

Введите текст

Command1

преобразовать

Интерфейс

Код программы

Private Str1, str2 As String

Private pos1, pos2 As Long

Private Sub Command1_Click()

Str1 = Text1.Text

pos1 = InStr(Str1, "(")

pos2 = InStr(Str1, ")")

str2 = Left(Str1, pos1 - 1) & Right(Str1, Len(Str1) - pos2)

Text2.Text = str2

End Sub

Задание 2

Дан текст. Преобразовать его, удалив каждый символ «*».

Таблица

Объект

Свойство

Значение

Form1

Caption

6-2

Text1

Text

-

Text2

-

Text3

in.txt

Text4

out.txt

Label1

Caption

Исходный текст

Label2

Текст, из которого удалили звездочки

Label3

Входной файл

Label4

Выходной файл

Command1

переделать

Интерфейс

Код программы

Private tmp As String

Private Sub Command1_Click()

Text1.Text = ""

Text2.Text = ""

infile = Text3.Text

outfile = Text4.Text

Open infile For Input As #1

Open outfile For Output As #2

Do Until EOF(1)

Line Input #1, tmp

Text1.Text = Text1.Text & tmp & vbCrLf

Do Until InStr(tmp, "*") = 0

tmp = Left(tmp, InStr(tmp, "*") - 1) & Right(tmp, Len(tmp) - InStr(tmp, "*"))

Loop

Text2.Text = Text2.Text & tmp & vbCrLf

Print #2, tmp

Loop

Close (1)

Close (2)

End Sub

Вопросы:

  1. Какие основные операции операции с файлами есть в Visual Basic?

  2. Как открыть или создать файл?

  3. Как закрыть файл?

  4. Как закрыть все открытые файлы?

  5. Как прочитать данные из файла?

  6. Как записать данные в файл?

  7. Как задать имя файла, находящегося в некоторой папке  на жестком диске?

  8. Как добавить данные в файл?

  9. Как определить метку конца файла?

  10. Что должно присутствовать в текстовом файле, чтобы запятые не воспринимались как признак перехода на новую строку?

  11. Какой объект можно использовать для вывода текста, прочитанного из текстового файла?

  12. Какой символ является разделителем при вводе числовых данных из файла?

  13. Какой объект используется для визуального выбора диска?

  14. Какой объект используется для визуального выбора папки?

  15. Какой объект используется для визуального выбора файла?

Соседние файлы в папке Лабораторные работы. Вариант 11