АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция

Задание 1. Создать проект, который позволит производить преобразование строк с использованием строковых функций

Читайте также:
  1. Window(x1, y1, x2, y2); Задание окна на экране.
  2. Б) Задание на проверку и коррекцию исходного уровня.
  3. В основной части решается практическое задание.
  4. Домашнее задание
  5. Домашнее задание
  6. Домашнее задание
  7. Домашнее задание
  8. Домашнее задание
  9. Домашнее задание
  10. Домашнее задание
  11. Домашнее задание
  12. Домашнее задание

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

Запустите в операционной системе Windows систему объектно-ориентированного программирования Visual Basic и создайте новый проект Приложение Windows Forms.

Разместите на форме (рис.8.1.)

Рис.8.1. Строковый калькулятор

1. текстовое поле TextBox1 для вывода строкового аргумента Строка;

2. текстовое поле TextBox2 для вывода числового аргумента Позиция;

3. текстовое поле TextBox3 для вывода числового аргумента Длина;

4. текстовое поле TextBox4 для ввода числового аргумента Код символа;

5. надпись Label1 для вывода результата;

6. шесть кнопок для запуска обработчика событий.

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

Событийная процедура реализующая функцию Left()

Private Sub Button1_Click() Handles Button1.Click

Label1.Text = Microsoft.VisualBasic.Left(TextBox1.Text, Val(TextBox2.Text))

End Sub

Событийная процедура реализующая функцию Right()

Private Sub Button2_Click() Handles Button1.Click

Label1.Text = Microsoft.VisualBasic.Right(TextBox1.Text, Val(TextBox2.Text))

End Sub

Событийная процедура реализующая функцию Mid()

Private Sub Button3_Click() Handles Button3.Click

Label1.Text = Mid(TextBox1.Text, Val(TextBox2.Text), Val(TextBox3.Text))

End Sub

Событийная процедура реализующая функцию Len()

Private Sub Button4_Click() Handles Button4.Click

Label1.Text = Len(TextBox1.Text)

End Sub

Событийная процедура реализующая функцию Asc()

Private Sub Button5_Click() Handles Button5.Click

Label1.Text = Asc(TextBox1.Text)

End Sub

Событийная процедура реализующая функцию Chr()

Private Sub Button6_Click() Handles Button6.Click

Label1.Text = Chr(Val(TextBox4.Text))

End Sub

Запустите проект, в первое поле введите слово, (например, «студентка»), во второе поле – порядковый номер символа, (например, 1), в третьем поле – количество вырезаемых символов, (например, 7). Кликните по кнопке Mid(). На метке появится слово «студент».

Введите в текстовое поле возле кнопки Chr() любой символ от 0 до 255, (например, 200) и кликните по кнопке Chr(). На метке появится символ И.


1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 |

Поиск по сайту:



Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.003 сек.)