ПОНЯТНО О Visual Basic NET


Звук и видео Проект «Плеер» - часть 5


End Sub

 

Private Sub Играть_непрерывно_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)  _

Handles Играть_непрерывно.Click

        Плеер.PlayCount = 0

End Sub

 

Private Sub Играть_1_раз_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Играть_1_раз.Click

        Плеер.PlayCount = 1

End Sub

 

Private Sub Быстрее_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Быстрее.Click

        Плеер.Rate = 2

End Sub

 

Private Sub В_обычном_темпе_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)  _

Handles В_обычном_темпе.Click

        Плеер.Rate

= 1

End Sub

Пояснения. Прежде всего, некоторые операторы из-за их длины я перенес на следующую строку при помощи «знака переноса», состоящего из пробела и знака подчеркивания. Подробнее об этом – в 3.12.2

Первые 6 процедур соответствуют 6 белым кнопкам. Вы легко их различите по именам кнопок в заголовках процедур. Все они делают одно и то же дело – подготавливают для последующего воспроизведения конкретный файл. Конечно, адреса файлов на вашем компьютере будут совершенно другими.

Смысл остальных 6 процедур ясен после следующих пояснений:

  • Stop – это метод объекта Плеер – приказ остановить воспроизведение. При следующем нажатии на кнопку «Старт» воспроизведение продолжится с того места, на котором оно было остановлено.
  • PlayCount – это свойство объекта Плеер (сколько раз подряд проигрывать файл). Если установить его в 0, то воспроизведение будет повторяться бесконечно.
  • Rate – это свойство объекта Плеер (темп воспроизведения). Если установить его, например, в 2, то воспроизведение будет осуществляться в 2 раза быстрее нормального, то есть люди на экране будут бегать, как сумасшедшие, и разговаривать голосом Буратино. А если в 0,5 – будут ползать, как вареные, и рычать.

Запустите проект. Проверьте, как работают все кнопки. Потаскайте влево-вправо указатель текущей позиции воспроизведения, подвигайте регулятор громкости.




Начало  Назад  Вперед