Главная / Информатика / Практическая работа Проект в Visual Basic «Cтроковый калькулятор» 9 класс

Практическая работа Проект в Visual Basic «Cтроковый калькулятор» 9 класс

Документы в архиве:

151.5 КБ Пр

Название документа Пр

Практическая работа
Проект в Visual Basic «Cтроковый калькулятор»

9 класс



Цель работы: разработать проект  «Строковый калькулятор», позволяющий рассмотреть применение строковых функций.
Оборудование: персональный компьютер, среда объектно-ориентированного программирования Visual Basic.
Ход работы:


  1. Открыть среду объектно-ориентированного программирования Visual Basic (Пуск-Программа-Microsoft Visual Basic).

  2. Выделить форму и в окне свойства изменить имя формы (frm1), BackColor (выбрать цвет), Coption (Строковый калькулятор).

  3. Поместить на форму метку (A) –Label1 в свойствах: BackColor (выбрать зеленый цвет), Coption (Исходное слово), Font (размер шрифта 16 пт).

  4. Аналогичным образом разместить на форме метку – Label2 изменив свойство Cаption на (Результат).

  5. Поместить на форму текстовое поле (ab) – в окне свойства: имя поля (text1): BackColor (выбрать цвет), Text (убрать всю информацию).

  6. Аналогичным образом поместить текстовые поля (text2), (text3), (text4).

  7. С помощью инструмента лилия ( / ) - Line отделяем аргументы, инструменты и результат. В свойствах линии BorderWidht изменим размер линии (с 1 на 2).

  8. Поместить на форму командную кнопку CommandButton – в окне свойств изменить: имя кнопки (cmd1); Style – 1(Graphical),  BackColor (выбрать желтый цвет), Cаption   (), Font (размер шрифта 16 пт).

  9. Аналогичным образом разместить на форме  командные кнопки (cmd2), (cmd3), изменив соответственно свойство Cаption ( LEFT), ( RIGHT).

  10. Событийная процедура для кнопки Cmd1 имеет вид:

Private Sub Cmd1_Click()
Text2.Text = Mid$(Text1.Text, Val(Text3.Text), Val(Text4.Text))
End Sub

  1. Событийная процедура для кнопки Cmd2 имеет вид:

Private Sub Cmd2_Click()
Text2.Text = Left$(Text1.Text, Val(Text3.Text))
End Sub

  1. Событийная процедура для кнопки Cmd3 имеет вид:

Private Sub Cmd3_Click()
Text2.Text = Right$(Text1.Text, Val(Text3.Text))
End Sub

  1. Запустить проект на выполнение, введите с клавиатуры в первое текстовое окно слово «информатика», в третье текстовое окно цифру 3, а в четвертое – цифру 5. В результате получится слово «форма».

   14*.Дополнительное задание. Получить из слова   
        «железнодорожник» слова: «жезл», «Колено», «Крокодил».



hello_html_m52dc3c70.jpg

Практическая работа Проект в Visual Basic «Cтроковый калькулятор»

Практическая работа Проект в Visual Basic «Cтроковый калькулятор» 9 класс
  • Информатика
Описание:

Цель работы: разработать проект  «Строковый калькулятор», позволяющий рассмотреть применение строковых функций.

Оборудование: персональный компьютер, среда объектно-ориентированного программирования Visual Basic.

Ход работы:

  1. Открыть среду объектно-ориентированного программирования Visual Basic (Пуск-Программа-Microsoft Visual Basic).
  2. Выделить форму и в окне свойства изменить имя формы (frm1), BackColor (выбрать цвет), Coption (Строковый калькулятор).
  3. Поместить на форму метку (A) –Label1 в свойствах: BackColor (выбрать зеленый цвет), Coption (Исходное слово), Font (размер шрифта 16 пт).
  4. Аналогичным образом разместить на форме метку – Label2 изменив свойство Cаption на (Результат).
  5. Поместить на форму текстовое поле (ab) – в окне свойства: имя поля (text1): BackColor (выбрать цвет), Text (убрать всю информацию).
  6. Аналогичным образом поместить текстовые поля (text2), (text3), (text4).
  7. С помощью инструмента лилия (/ ) - Line отделяем аргументы, инструменты и результат. В свойствах линии BorderWidht изменим размер линии (с 1 на 2).
  8. Поместить на форму командную кнопку CommandButton – в окне свойств изменить: имя кнопки (cmd1); Style – 1(Graphical),  BackColor (выбрать желтый цвет), Cаption   (), Font (размер шрифта 16 пт).
  9. Аналогичным образом разместить на форме  командные кнопки (cmd2), (cmd3), изменив соответственно свойство Cаption ( LEFT), ( RIGHT).
  10. Событийная процедура для кнопки Cmd1 имеет вид:

Private Sub Cmd1_Click()
Text2.Text = Mid$(Text1.Text, Val(Text3.Text), Val(Text4.Text))
End Sub

Событийная процедура для кнопки Cmd2 имеет вид:

Private Sub Cmd2_Click()
Text2.Text = Left$(Text1.Text, Val(Text3.Text))
End Sub

Событийная процедура для кнопки Cmd3 имеет вид:

Private Sub Cmd3_Click()
Text2.Text = Right$(Text1.Text, Val(Text3.Text))
End Sub

Запустить проект на выполнение, введите с клавиатуры в первое текстовое окно слово «информатика», в третье текстовое окно цифру 3, а в четвертое – цифру 5. В результате получится слово «форма».

   14*.Дополнительное задание. Получить из слова   
        «железнодорожник» слова: «жезл», «Колено», «Крокодил».



avd0.jpg


30.10.2012
Автор Авдеева Татьяна Юрьевна
Дата добавления 30.10.2012
Раздел Информатика
Подраздел
Просмотров 6491
Номер материала 322
Скачать свидетельство о публикации

Оставьте свой комментарий:

Введите символы, которые изображены на картинке:

Получить новый код
* Обязательные для заполнения.


Комментарии:

↓ Показать еще коментарии ↓