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

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

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

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

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

Отчет по лабораторной работе № 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. Какой объект используется для визуального выбора файла?