«Программирование в объектно-ориентированной среде»

Ход работы:

1. Изучить теоретическую часть.

2. Выполнить задания, следуя указаниям.

3. Ответить на контрольные вопросы (в устной форме).

4. Предъявить преподавателю результаты работы программы и исходные коды.

5. Оформить отчет в соответствии с ходом работы (тема, цель, условие задачи, программный код, результаты тестирования программы, выводы).

Во многих случаях для взаимодействия с пользователем одной формы вполне достаточно. Но если вам требуется обмениваться с пользователем большим объемом информации, Visual Basic позволяет добавить в программу дополнительные формы. Каждая новая формы рассматривается как объект, который наследует свои свойства от класса System.Windows.Forms.Form. Первая форма программы называется Form1.vb. Последующие формы называются Form2.vb, Form3.vb и т.д. Следующая таблица содержит список способов практического применения дополнительных форм в вашей программе.

Каждая новая форма имеет уникальное имя и свой собственный набор объектов, свойств, методов и процедур событий.

Как используются формы

Если вы хотите отобразить форму, на которую пользователь сможет переключиться, используйте вместо метода ShowDialog метод Show. В Visual Basic 6 формы, которые могли терять фокус ввода, назывались немодальными формами, и вы по-прежнему можете услышать такое их название. Большинство приложений для Microsoft Windows использует для отображения информации обычные немодальные формы, так как они дают пользователю большую гибкость, и при создании новой формы в Microsoft Visual Studio этот стиль является стилем по умолчанию. Так как формы - это просто члены класса System.Windows.Forms.Form, вы также можете создать и отобразить формы с помощью кода программы.

Чтобы узнать, как в приложении на Visual Basic определяется форма по умолчанию, изучите код в разделе, сгенерированном Windows Form Designer, расположенном в верхней части каждой новой формы.

Использование свойства DialogResult в вызывающей форме

Создать приложение для Windows "Семерка" (LuckySeven). Эта программа имитирует игровой автомат со "счастливыми" Для отображения справочной информации о программе «Семерка» использовать вторую форму. Добавьте вторую форму с помощью команды Вторая форма должна отображать файл Readme.txt, который должен содержать справочную информацию.

Графический интерфейс "Семерки" имеет две кнопки, три поля для показа "счастливых" чисел, цифровую фотографию, символизирующую выигрыши, и текст "Счастливая семерка". Чтобы сконструировать этот интерфейс, нужно создать семь объектов на форме Семерка, а затем изменить некоторые свойства в каждом из них. Затем нужно добавить код программы для кнопок Крутить и Выход, который обрабатывает нажатия пользователя на этих кнопках и генерирует случайные числа. Чтобы создать эту программу с самого начала, необходимо выполнить в Visual Basic три основных шага по разработке программы: создать интерфейс пользователя, настроить свойства и написать код программы. В таблице описан этот процесс для "Семерки".

1. 
   Создайте новый проект командой Создать проект (New Project) из меню Файл (File) (порядок создания нового проекта подробно описан в лабораторной работе № 1).
   
2. 
   Выберите элемент Приложение Windows Forms и нажмите кнопку ОК.
   
3. 
   В области элементов выберите элемент управления Button и добавьте на форму две кнопки.
   
4. 
   Добавьте надписи, которые используются в программе для показа чисел.В области элементов выберите элемент управления Label. И создайте на форме четыре надписи с именами Label1, Label2, Label3 и Label4.
   

1. 
   Теперь добавьте на форму рамку для рисунка, чтобы показать графический приз, когда пользователь выбросит "7".В области элементов выберите элемент управления PictureBox.
   
2. 
   Нарисуйте большой прямоугольник прямо под тремя надписями для цифр. В результате поле рисунка должна выглядеть так.
   

Этот объект в программе будет называться PictureBox1, и это имя в дальнейшем используется при написании кода программы.

1. 
   Щелкните на первой кнопке Button1.Текущее значение свойства Text измените на слово "Крутить" и нажмите клавишу (Enter).
   
2. 
   Измените свойство Text для второй кнопки так, чтобы там было написано "Выход".
   

1. 
   Выберите первую надпись, предназначенную для чисел (Label1 ), а затем, удерживая нажатой клавишу (Shift), щелкните на второй и третьей надписях. Вокруг каждой из надписей, по которой вы щелкаете, появляются прямоугольники выделения и маркеры изменения размера. Выделите все три надписи и отпустите клавишу (Shift). Теперь нужно изменить свойства TextAlign, BorderStyle и Font так, чтобы числа, которые будут появляться в этих надписях, находились в центре, были обведены рамкой и показывались одним и тем же шрифтом одинакового размера. Все эти свойства перечислены в окне Свойства в категории Внешний вид.
   
2. 
   В окне Свойства выберите TextAlign, а затем нажмите справа на стрелку раскрывающегося списка. Появляется схема, показывающая варианты центровки текста в пределах поля надписи. Выберите вариант форматирования по центру MiddleCenter.
   
3. 
   Теперь измените свойство BorderStyle. Выберите его в списке и нажмите справу стрелку раскрывающегося списка. Выберите FixedSingle, чтобы добавить вокруг каждой надписи тонкую рамку.
   
4. 
   Теперь измените шрифт для надписей, изменив параметры свойства Font. Выберите его в окне Свойства, а затем нажмите справа кнопку многоточия. Появится диалоговое окно Шрифт, показанное ниже.
   

5. 
   Измените шрифт на Times New Roman, стиль шрифта - на жирный, а его размер - на 24, а затем нажмите OK. Шрифт, стиль и размер текста на надписях изменятся на новые.
   
6. 
   Теперь удалите текст для этих трех надписей, чтобы при запуске программы эти поля были пустыми. Выбор шрифта для надписей сохранится, так как он является отдельным свойством. Чтобы это сделать, необходимо выбрать каждую из надписей по отдельности и с помощью клавиши Delete очистить свойство Text.
   

1. 
   Выберите объект четвертой надписи Label4.
   
2. 
   В окне Свойства измените свойство Text на "Счастливая семерка".
   
3. 
   Щелкните на свойстве Font, а затем на кнопке многоточия.
   
4. 
   В диалоговом окне Шрифт измените шрифт на Arial, стиль шрифта - на жирный и размер - на 18. Нажмите OK, при этом шрифт надписи обновится.
   
5. 
   Теперь измените цвет отображаемого текста. В окне Свойства выберите ForeColor и во втором столбце нажмите стрелку раскрывающегося списка. Выберите пурпурный цвет на закладке Польз.(Custom). Цвет текста в поле надписи изменится на пурпурный.
   

Объект для показа изображения будет содержать картинку с человеком, платящим игроку деньги при выигрыше (то есть когда в числовых надписях формы есть хотя бы одна семерка). Чтобы задать размеры картинки, нужно изменить свойство SizeMode, а в свойстве Image следует указать имя JPEG-файла, который будет загружен в поле изображения. Следует также задать свойство Visible, которое определяет состояние изображения в начале работы программы.

1. 
   На поле формы щелкните на объекте поля изображения.
   
2. 
   В окне Свойства выберите свойство SizeMode, которое находится в категории Поведение. Нажмите на стрелке раскрывающегося списка и выберите StretchImage. Если для SizeMode выбрано значение StretchImage, то прежде чем показать файл изображения, VisualStudio изменит его размер так, чтобы оно в точности совпадало с размерами поля.
   
3. 
   В окне Свойства выберите свойство Image, а затем щелкните на кнопке многоточия во втором столбце. Появится диалоговое окно Открыть и выберите файл jpg с нужным изображением.
   
4. 
   В окне Properties Свойства в категории Behavior (Поведение) выберите свойство Visible. Чтобы сделать изображение невидимым при запуске программы, выберите False.
   

Дважды щелкните мышью на строке заголовка окна Properties (Свойства) , чтобы вернуть его в его закрепленное положение.

1. 
   В поле формы дважды щелкните мышью на кнопке Выход. В центральном окне среды разработки VisualStudioпоявится редактор кодаМежду строками PrivateSub и EndSub введите
   

1. 
   Дважды щелкните мышью на кнопке Крутить. Между строками PrivateSub и EndSub введите следующие ниже строки программы:
   

Функция Rnd в каждой строке возвращает случайное число в интервале между 0 и 1 (число с десятичной запятой и несколькими знаками после нее), а функция Int возвращает целую часть произведения этого случайного числа на 10. Это вычисление дает нам случайные числа в интервале между 0 и 9 - именно то, что нам требуется для нашего приложения игрового автомата.

Затем необходимо выполнить в нашем коде одно обязательное действие - скопировать эти случайные числа в три поля надписей на форме, но прежде, чем это сделать, эти числа должны быть преобразованы в текст с помощью функции CStr (converttostring - преобразовать в текст). Обратите внимание, как CStr, Int и Rnd объединены вместе в одно выражение в программе - они работают совместно и дают результат аналогично математической формуле. После вычисления и преобразования эти значения присваиваются свойствам Text первых трех надписей формы.

Последняя группа операторов программы проверяет, не равняется ли одно из случайных чисел "7". Если одно или несколько из этих чисел равны "7", то программа показывает средневековое изображение выплаты денег, а звуковой сигнал провозглашает о победе.

1. 
   Нажмите кнопку Начать отладку(Start) на стандартной панели инструментов. Программа "Семерка" будет скомпилирована и запущена в среде программирования. Появится созданный вами графический интерфейс.
   
2. 
   Нажмите кнопку Крутить. Программа найдет три случайных числа и покажет их в надписях на форме.
   

Так как в первом поле надписи выпала "7", появляется цифровое фото, изображающее выплату денег, и компьютер издает звуковой сигнал. Вы выиграли! Звук, который вы услышите, зависит от установок в окне Soundsand Devises (Звуки и аудиоустройства) в панели управления Windows - чтобы сделать звук в этой игре интереснее, измените звук, установленный по умолчанию, на что-нибудь более динамичное.

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

4. 
   Когда вы закончите экспериментировать с вашим новым детищем, нажмите кнопку Выход. Программа остановится, и на экране снова появится среда программирования.
   

Добавьте в программу "Семерка" специальный оператор с именем Randomize.

1. 
   Теперь вы должны добавить в процедуру Form_Load - специальную процедуру, которая ассоциирована с формой и исполняется каждый раз при запуске программы - оператор Randomize.
   
2. 
   Чтобы перейти к тексту процедуры Form_Load, дважды щелкните мышью на форме (но не на одном из ее объектов). В редакторе кода появится процедура Form_Load.
   
3. 
   Введите , а затем нажмите на клавишу со стрелкой вниз. Оператор Randomize добавлен в программу и будет исполняться каждый раз при ее запуске. Чтобы создать истинно случайную начальную точку для функции Rnd в процедуре Button1_Click, в Randomize используются системные часы. При использовании Randomize программа будет каждый раз выдавать новую последовательность, и числа не будут повторяться.
   
4. 
   Запустите новую версию "Семерки".
   

Работа с несколькими формами

Добавление второй формы

1. 
   Чтобы добавить в проект вторую форму, щелкните на команде Добавить форму Windows в меню Проект. Вы увидите такое диалоговое окно.
   

2. 
   Введите в текстовом поле Имя (Name) имя файла HelpInfo.vb, а затем щелкните наДобавить (Open). В проект Семерка будет добавлена вторая форма с именем HelpInfo.vb. Она появится в Обозревателе решений, как показано здесь.
   

Теперь необходимо добавить в форму HelpInfo.vb несколько элементов управления.

3. 
   Используйте элемент управления Label и нарисуйте в верхней части формы HelpInfo.vb метку. Сделайте длину этой метки равной ширине формы так, чтобы в ней уместился длинный текст.
   
4. 
   Используйте элемент управления TextBox и создайте объект текстового поля.
   
5. 
   Установите свойство Multiline этого объекта текстового поля на значение True, чтобы можно было изменить размер этого объекта.
   
6. 
   Измените размер объекта текстового поля так, чтобы он заполнял почти все пространство формы.
   
7. 
   Используйте элемент управления Button и создайте в нижней части формы объект кнопки.
   
8. 
   Установите для объектов формы HelpInfo.vb следующие свойства:
   

9. 
   Форма HelpInfo.vb выглядит так.
   

10. 
    Теперь необходимо ввести строку кода программы в процедуру события Button1_Click формы HelpInfo.vb.
    
11. 
    Чтобы отобразить в Редакторе кода процедуру события Button1_Click, сделайте двойной щелчок мышью на кнопке OK.
    
12. 
    Введите следующий оператор программы:
    

Форма HelpInfo.vb действует в этом проекте как диалоговое окно, так как она открывается в процедуре события Form1 с помощью метода ShowDialog. После того, как пользователь изучил справочную информацию в этом диалоговом окне, кнопка OK закрывает форму, устанавливая свойство DialogResultтекущей формы (Me) на значение DialogResult.OK. Это значение является константой VisualBasic, указывающей, что диалоговое окно закрыто, при этом вызывающую процедуру должно вернуться значение "OK". Более сложное диалоговое окно может с помощью параллельных процедур событий кнопок возвращать и другие значения, такие, как DialogResult.Cancel, DialogResult.No, DialogResult.Yes и DialogResult.Abort. Однако когда устанавливается свойство DialogResult, форма автоматически закрывается.

13. 
    Прокрутите код программы в Редакторе кода в начало. Введите следующий оператор Imports:
    

Этот оператор создает в проекте ссылку на библиотеку классов, содержащую класс StreamReader. Класс StreamReader не связан непосредственно с определением или использованием дополнительных форм - просто используем его как быстрый способ добавления в новую используемую форму текстовой информации.

14. 
    Снова отобразите форму HelpInfo.vb, а затем сделайте двойной щелчок мышью на фоне формы. В Редакторе кода появится процедура события HelpInfo_Load.
    
15. 
    Введите следующие операторы программы:
    

Вместо того чтобы вводить содержимое справочного файла в свойство Text объекта текстового поля, для открытия, чтения и отображения в объекте текстового поля файла Readme.txt используйте класс StreamReader. Файл Readme.txt является документом поддержки продукта, содержащим информацию об использовании программы Счастливая семерка. Он содержит инструкции по работе, информацию по деинсталляции и контактную информацию. К сожалению, выводить русские символы с помощью этого метода затруднительно. Поэтому мы выведем содержимое англоязычного файла Readme.txt, который вы самостоятельно создадите.

Вы закончили создание формы HelpInfo.vb. Теперь вы добавите объект кнопки и некий код в первую форму.

Отображение второй формы с помощью процедуры события

1. 
   Щелкните в Обозревателе решений на Form1.vb, а затем щелкните на кнопке Просмотреть конструктор. В среде разработки появится форма Семерка. Теперь необходимо добавить в нижний правый угол формы кнопку Справка.
   
2. 
   Используйте элемент управления Button и нарисуйте в нижнем правом углу формы небольшую кнопку.
   
3. 
   Используйте окно Свойства, чтобы установить свойство Text кнопки на значение Справка. Ваша форма должна выглядеть примерно так.
   
4. 
   Чтобы отобразить в Редакторе кода процедуру события Button3_Click, сделайте двойной щелчок мышью на кнопке Справка.
   
5. 
   Введите следующие операторы программы:
   

Эти операторы демонстрируют, как объявлять и отображать в коде программы вторую форму. VisualBasic .NET требует, чтобы перед использованием второй формы явно объявили переменную типа формы. Добавив в проект форму HelpInfo.vb, вы создали класс с именем HelpInfo; теперь вы используете его для объявления с помощью оператора Dim переменной с именем frmHelpDialog.

Второй оператор программы использует переменную frmHelpDialog, открывая форму HelpInfo.vb как диалоговое окно с помощью метода ShowDialog. Также можно использовать для открытия этой формы метод Show, но в этом случае VisualBasic не рассматривал бы HelpInfo.vb как диалоговое окно; форма была бы немодальной, и пользователь мог бы переключаться между этой и главной формами по мере необходимости. В дополнение к этому свойство DialogResult в процедуре события Button1_Click формы HelpInfo.vb не закрывало бы форму HelpInfo.vb - вместо этого потребовался бы оператор программы Me.Close

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

Запуск программы

1. 
   Щелкните на кнопке Начать отладку стандартной панели инструментов.
   

2. 
   Чтобы немного поиграть в игру, щелкните семь или восемь раз на кнопке Крутить.
   
3. 
   Щелкните на кнопке Справка первой формы. VisualBasic откроет вторую форму проекта (HelpInfo.vb) и отобразит в объекте текстового поля файл Readme.txt. Форма будет выглядеть примерно так.
   

4. 
   Чтобы просмотреть весь файл Readme, используйте вертикальную полосу прокрутки.
   
5. 
   Чтобы закрыть форму HelpInfo.vb, щелкните на кнопке OK. Форма закроется, и снова станет активной первая форма.
   
6. 
   Еще несколько раз щелкните на кнопке Крутить, а затем снова щелкните на кнопке Справка. Снова появится форма HelpInfo.vb, работающая точно так же, как и в первый раз. Обратите внимание, что пока активна вторая форма, вы не можете активизировать первую. Это происходит из-за того, что вторая форма является диалоговым окном или модальной формой, и прежде, чем вы сможете продолжить работу с программой, необходимо закрыть ее.
   
7. 
   Щелкните на кнопке OK, а затем на кнопке Закрыть первой формы. Программа остановится, и вернется среда разработки.
   

Использование свойства DialogResult в вызывающей форме

1. 
   Назвать класс, свойства которого наследует каждая форма.
   
2. 
   Характеристики модальных и немодальных окон.
   
3. 
   Назначение функций CStr, Int и Rnd.
   
4. 
   Назначение и различия методов Show и ShowDialog.
   
5. 
   Назначение оператора в программе.
   
6. 
   Что нам дает использование класса StreamReader.
   
7. 
   Использование свойства DialogResult в вызывающей форме