Научный журнал
Современные наукоемкие технологии
ISSN 1812-7320
"Перечень" ВАК
ИФ РИНЦ = 0,940

ИСПОЛЬЗОВАНИЕ МУЛЬТИМЕДИЙНЫХ ВОЗМОЖНОСТЕЙ ЯЗЫКА ПРОГРАММИРОВАНИЯ VISUAL BASIC.NET ПРИ РАЗРАБОТКЕ ПРОЕКТОВ

Корниевский Д.В. 1 Кораблёва О.И. 1
1 Авиационный колледж

Цель настоящей работы – разработать программный продукт на языке Visual Basic.NET с использованием средств мультимедия, который будет использоваться для выполнения лабораторных работ по прикладному программированию.

Проект включает в себя - две связанные между собой формы. На первой, расширяемой форме, располагается калькулятор(простейшие операции +,-,/,* и несколько функций, такие как возведение в степень и вычисление корня) и окно плеера windows media player, который реализован как встраиваемый модуль. Также она имеет функцию прозрачного экрана, которая реализуется с помощью инструмента полосы прокрутки. На второй - игра «Угадай число», которая имеет 3 уровня сложности : легкий, средний, сложный. Уровни отличаются интервалом рандомизирования чисел.

Инструкции пользователю:

• Запустить программу

• Для использования калькулятора вводить числа в текстовые поля и нажать клавиши нужных арифметических действий. Также на форме доступны окна информации и календарь.

• Для расширения формы 1 , нажмите кнопку «Далее» . Для воспроизведения файла в плеере нажмите кнопку «open file»

• Для возвращения формы в исходный размер нажимаем кнопку «Назад»

• Чтобы активировать форму 2 , на которой располагается «Угадай число» нажмите кнопку «Игра» на первой форме.

• Игра «Угадай число» : 1 шаг – выбор уровня игры, затем в поле ввода записываем придуманное число, после чего нажимаем кнопку «попытка», далее появиться сообщение машины с результатами ваших действий.

Фрагмент кода программы:

 

Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click

TextBox4.Text = CInt(TextBox4.Text) * CInt(TextBox4.Text)

End Sub

Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click

TextBox5.Text = TextBox5.Text ^ 0.5

End Sub

Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click

Me.Size = New Size(1297, 458)

End Sub

Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button13.Click

Me.Size = New Size(656, 458)

End Sub

Private Sub AxWindowsMediaPlayer1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxWindowsMediaPlayer1.Enter

 

End Sub

Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click

OpenFileDialog1.ShowDialog()

AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName

 

End Sub

Private Sub Button15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button15.Click

Form4.Show()

Me.Hide()

 

End Sub

End Class

korn1.tif korn2.tif
korn3.tif

Данный проект может быть использован студентами колледжа для ознакомления с базовым уровнем языка Visual Basic.NET и на лабораторных работах при разработке учебных игровых программ.

Заключение

Visual Basic .NET – это производительное и надежное оружие в руках профессионального программиста. К тому же, очень удобное и, несмотря на мощь, достаточно простое. Поэтому Visual Basic .NET более других профессиональных языков подходит для освоения начинающими программистами.


Библиографическая ссылка

Корниевский Д.В., Кораблёва О.И. ИСПОЛЬЗОВАНИЕ МУЛЬТИМЕДИЙНЫХ ВОЗМОЖНОСТЕЙ ЯЗЫКА ПРОГРАММИРОВАНИЯ VISUAL BASIC.NET ПРИ РАЗРАБОТКЕ ПРОЕКТОВ // Современные наукоемкие технологии. – 2014. – № 5-1. – С. 56-57;
URL: https://top-technologies.ru/ru/article/view?id=33696 (дата обращения: 28.03.2024).

Предлагаем вашему вниманию журналы, издающиеся в издательстве «Академия Естествознания»
(Высокий импакт-фактор РИНЦ, тематика журналов охватывает все научные направления)

«Фундаментальные исследования» список ВАК ИФ РИНЦ = 1,674