Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

ЗОТФ-ЗФ / 4.9. Обработка строковых данных и текстовые файлы

.docx
Скачиваний:
18
Добавлен:
06.11.2017
Размер:
251.57 Кб
Скачать

ФЕДЕРАЛЬНОЕ АГЕНСТВО СВЯЗИ

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

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

Московский технический университет связи и информатики

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

по дисциплине «Программирование и алгоритмизация».

Тема 4.9. «Обработка строковых данных и текстовые файлы».

Вариант №6.

2016 г.

Задание.

Цель работы. Изучение языковых средств работы со строковой информацией и текстовыми файлами, а также совместной обработки строковой и числовой информации, освоении операций, методов и элементов управления для работы со строковой информацией.

1. Выбрать задание в соответствии с вариантом для реализации процедуры обработки строковых данных.

2. Составить схему алгоритма обработки строк в соответствии с индивидуальным заданием и, если необходимо, провести предварительную формализацию задания.

3. Разработать интерфейс пользователя.

4. Написать программный код проекта, причем обмен данными между пользовательскими процедурами должен осуществляться через параметры, без использования глобальных переменных.

5. Подготовить тесты для контрольного решения задачи.

6. Получить решение.

Задача.

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

Графический интерфейс.

Таблица объектов.

Имя

Свойство

Значение свойства

Form1

Name

Form1

Label1

Text

Введите строку, которую необходимо преобразовать:

Label2

Text

Введите символ, который необходимо удвоить:

Label3

Text

Введите имя файла:

Label4

Text

Результат:

Label5

Text

Преобразовать заданную строку, повторив в ней каждый символ,

Label6

Text

совпадающий с заданным.

Label7

Text

Задача:

TextBox1

Name

TextBox1

TextBox2

Name

TextBox2

TextBox3

Name

TextBox2

TextBox4

Name

TextBox2

Button1

Name

Button1

Text

Ок

Button2

Name

Button2

Text

Стереть

Button3

Name

Button3

Text

Ок

Программный код.

Public Class Form1

'Процедура чтения данных из файла

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

TextBox1.Text = My.Computer.FileSystem.ReadAllText(TextBox3.Text)

End Sub

'Процедура очистки формы

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TextBox1.Text = ""

TextBox2.Text = ""

TextBox3.Text = ""

TextBox4.Text = ""

End Sub

'Процедура вызова преобразования строки

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

TextBox4.Text = Preobrazovanie_Stroki(TextBox1.Text, TextBox2.Text)

End Sub

'Процедура удвоения заданного символа в строке

Function Preobrazovanie_Stroki(ByVal Vxod As String, ByVal n As Char)

Dim vixod As String 'Переменная для хранения преобразованной строки

Dim i As Short 'Переменная счётчик цикла

vixod = ""

For i = 0 To Vxod.Length - 1 'Цикл перебора каждого символа строки

If Vxod(i) = n Then 'Проверка условия совпадения символа в строке и заданного

vixod = vixod + n 'Дополнительное приписывание символа в строку

End If

vixod = vixod + Vxod(i) 'Основное приписывание символа в строку

Next i

Return vixod 'Возврат преобразованной строки

End Function

End Class

Блок-схема.

~ 7 ~