Презентация "Использование меню" по информатике – проект, доклад

Использование меню

Тема практической работы

События «Дата-время»

Установка свойства SizeMode - StrechImage

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

Ниже перечисленные действия не выполняем Выберите элемент меню Открыть: и измените его свойство Name на mnuOpenItem. Выберите элемент меню Закрыть и измените его свойство Name на mnuCloseItem. Выберите элемент меню Выход и измените его свойство Name на mnuExitItem. Оставляем Name так, как рекомендует VB ….ToolStripMenuItem

Private Sub ОткрытьToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ОткрытьTooLStripMenuItem.Click, ОткрытьTooLStripMenuItem.Click OpenFileDialog1.Filter = "Графические файлы(*.jpg)|*.jpg" If OpenFileDialog1.ShowDialog() = DialogResult.OK Then PictureBox1.Image = System.Drawing.Image.FromFile(OpenFileDialog1.FileName) ОткрытьTooLStripMenuItem.Enabled = True End If End Sub Private Sub ВыходToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ВыходToolStripMenuItem.Click End End Sub Private Sub ЗакрытьToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ЗакрытьToolStripMenuItem.Click PictureBox1.Image = Nothing ЗакрытьToolStripMenuItem.Enabled = True End Sub Private Sub mnuColorTextItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuColorTextItem.Click ColorDialog1.ShowDialog() Label1.ForeColor = ColorDialog1.Color End Sub End Class

Добавление команды Цвет текста в меню Дата Выберите меню Дата, а затем щелкните на нижней ячейке Прототип для текста. Чтобы добавить в это меню команду Цвет текста с клавишей "Ц" в качестве клавиши доступа, введите &Цвет текста…. Команда будет добавлена в меню Дата. Эта команда заканчивается многоточием, которое указывает, что при ее выборе откроется диалоговое окно. В окне Properties (Свойства) измените свойство Name команды Цвет текста на значение mnuTextColorItem. Удаляем слово Lable1 из свойств.