Всё сдал! - помощь студентам онлайн Всё сдал! - помощь студентам онлайн

Реальная база готовых
студенческих работ

Узнайте стоимость индивидуальной работы!

Вы нашли то, что искали?

Вы нашли то, что искали?

Да, спасибо!

0%

Нет, пока не нашел

0%

Узнайте стоимость индивидуальной работы

это быстро и бесплатно

Получите скидку

Оформите заказ сейчас и получите скидку 100 руб.!


Работа с диалоговыми окнами

Тип Реферат
Предмет Информатика и программирование
Просмотров
1731
Размер файла
18 б
Поделиться

Ознакомительный фрагмент работы:

Работа с диалоговыми окнами

Самостоятельная работа

По дисциплине:

Языки программирования


Задание

Тема № Стандартные диалоговые окна открытия, закрытия, сохранения файла. Использование общего диалога для функций шрифтов, цветов, печати, справочной системы

Прочитайте внимательно условия следующих задач и аналогично №1 составьте программу задачи № 2

Задача №1. Создайте меню Файл-Открыть, Вид -Шрифт. Загрузите в окно RihtTextBox файл в формате .rtf , выбранный из окна «Открыть». Сделайте текст в окне жирным через подменю Шрифт

Задача №2. Создайте меню Файл-Открыть, Вид -Шрифт. Загрузите в окно RihtTextBox файл в формате .rtf , выбранный из окна «Открыть». Сделайте текст в окне курсивным через подменю Шрифт

Краткое содержание темы: Использование общего диалога для функций шрифтов, цветов, печати, справочной системы

Диалоговое окно настройки шрифтов текста

Для вызова диалогового окна настройки шрифтов используется метод ShowFont, например:

CommonDialog1. ShowFont

Всё просто, но следует учитывать один нюанс с свойством Flags. При желании воспользоваться окном выбора шрифтов, отображающим только шрифты для печати, шрифты экрана или те и другие, то Visual Basic потребует установить свойство Flags перед тем, как вызывать на экран окно Font

Ниже представлена таблица с описанием наиболее важных свойств:

Color

Используется только для цветных принтеров

FontBold, FontItalic,

FontStrikeThru,

FontUnderline,

Эти свойства принимают значения True или False. Если установлен флаг cdlCFEffects, то это позволяет пользователю использовать эти свойства

FontName

Возвращает / устанавливает имя шрифта

FontSize

Возвращает / устанавливает размер шрифта

Min, Max

Используется для указания размеров. Необходимо установить cdlCFLimitSize перед использованием этих свойств

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

Диалоговое окно настройки цветовой палитры

Для настройки цвета фона формы и расположенных в форме элементов можно использовать диалоговое окно настройки цветовой палитры. Для вызова этого диалогового окна используется метод ShowColor, например: CommonDialog1. ShowColor

Константы, используемые для настройки диалогового окна выбора цветовой палитры, перечислены в табл. Значения для метода Flags диалогового окна цветовой палитры

Константа

Значение

Описание

cdlCCFullOpen

&H2

Помещает в диалоговое окно дополнительную кнопку Добавить в набор и цветовое поле с маркером и линейкой назначения оттенка для добавления цветов в поля Дополнительные цвета диалогового окна цветовой палитры (рис. 7.25)

cdlCCShowHelp

&H8

Добавляет в диалоговое окно кнопку Справка

cdlCCPreventFullOpen

&H4

Скрывает кнопку Добавить в набор

cdlCCRGBInit

&H1

Восстанавливает в диалоговом окне исходный набор цветов


Решение задачи №1

Private Sub Открыть_Click()

CommonDialog1.DialogTitle = "открыть"

CommonDialog1.Filter = "текстовые документы RTF|*.rtf|рисунки|*.bmp"

CommonDialog1.ShowOpen

If CommonDialog1.FilterIndex = 1 Then

RichTextBox1.LoadFile (CommonDialog1.FileName)

ElseIf CommonDialog1.FilterIndex = 2 Then

Image1.Picture=LoadPicture(CommonDialog1.FileName)

End If

End Sub

Private Sub Шрифт_Click()

CommonDialog1.Flags = 1

CommonDialog1.ShowFont

RichTextBox1.SelBold = CommonDialog1.FontBold

End Sub


Нет нужной работы в каталоге?

Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.

Цены ниже, чем в агентствах и у конкурентов

Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит

Бесплатные доработки и консультации

Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки

Гарантируем возврат

Если работа вас не устроит – мы вернем 100% суммы заказа

Техподдержка 7 дней в неделю

Наши менеджеры всегда на связи и оперативно решат любую проблему

Строгий отбор экспертов

К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»

1 000 +
Новых работ ежедневно
computer

Требуются доработки?
Они включены в стоимость работы

Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован

avatar
Математика
История
Экономика
icon
159599
рейтинг
icon
3275
работ сдано
icon
1404
отзывов
avatar
Математика
Физика
История
icon
156804
рейтинг
icon
6076
работ сдано
icon
2739
отзывов
avatar
Химия
Экономика
Биология
icon
105734
рейтинг
icon
2110
работ сдано
icon
1318
отзывов
avatar
Высшая математика
Информатика
Геодезия
icon
62710
рейтинг
icon
1046
работ сдано
icon
598
отзывов
Отзывы студентов о нашей работе
65 308 оценок star star star star star
среднее 4.9 из 5
Сургутский государственный университет
Большое спасибо! Все сделано и доработано! Презентации очень качественно оформлены
star star star star star
Финансовый Университет при Правительстве РФ
Все как всегда на высшем уровне, в срок, спасибо огромное, работу читать очень интересно
star star star star star
МПГУ
Заказ был выполнен очень быстро и качественно, автор прикрепила документ не только в ворде...
star star star star star

Последние размещённые задания

Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн

отчет по практике

Отчет по практике, Психология

Срок сдачи к 30 мар.

только что

Web-сервис размещения объявлений (узконаправленная тема - поиск...

Диплом, Комьютерные системы и технологии

Срок сдачи к 15 мая

2 минуты назад

Решить две контрольных по математике за 1 курс

Контрольная, Математика

Срок сдачи к 16 мар.

2 минуты назад

оценка сенсорно- перцептивной деятельности детей среднего дошкольного...

Отчет по практике, Дефектология (Специальная педагогика)

Срок сдачи к 14 мар.

4 минуты назад

Выполнить кр

Курсовая, Киберфизические системы и интернет вещей

Срок сдачи к 15 мар.

7 минут назад

фыв

Курсовая, Экономика

Срок сдачи к 18 мар.

9 минут назад

Тусур Лабораторная (Функциональное и логическое программирование)

Лабораторная, Функциональное и логическое программирование

Срок сдачи к 31 мар.

10 минут назад

Работа по Методическому заданию

Другое, Маркетинг

Срок сдачи к 20 мар.

10 минут назад

решить задание 12.32 (Рис2)

Решение задач, статистическая радиотехника

Срок сдачи к 15 мар.

11 минут назад

Карьера: Сущность, виды, планирование в гостиничном деле

Презентация, Управление персоналом/Управление конкурентоспособностью

Срок сдачи к 17 мар.

11 минут назад

Решение задач

Решение задач, Математика

Срок сдачи к 14 мар.

11 минут назад

Проект

Другое, Русский язык

Срок сдачи к 17 мар.

11 минут назад

составить отчет по практике

Отчет по практике, Реклама и PR

Срок сдачи к 17 мар.

11 минут назад

Составить презентацию по теме : «понятие и виды общения

Презентация, Психология

Срок сдачи к 16 мар.

11 минут назад

Написать курсовую

Курсовая, Основы Конструирования, теплотехника, теплофизика

Срок сдачи к 19 мар.

11 минут назад

Тусур Лабораторная (Моделирование и анализ бизнес-процессов)

Лабораторная, Моделирование и анализ бизнес-процессов

Срок сдачи к 31 мар.

11 минут назад
planes planes
Закажи индивидуальную работу за 1 минуту!

Размещенные на сайт контрольные, курсовые и иные категории работ (далее — Работы) и их содержимое предназначены исключительно для ознакомления, без целей коммерческого использования. Все права в отношении Работ и их содержимого принадлежат их законным правообладателям. Любое их использование возможно лишь с согласия законных правообладателей. Администрация сайта не несет ответственности за возможный вред и/или убытки, возникшие в связи с использованием Работ и их содержимого.

«Всё сдал!» — безопасный онлайн-сервис с проверенными экспертами

Используя «Свежую базу РГСР», вы принимаете пользовательское соглашение
и политику обработки персональных данных
Сайт работает по московскому времени:

Вход
Регистрация или
Не нашли, что искали?

Заполните форму и узнайте цену на индивидуальную работу!

Файлы (при наличии)

    это быстро и бесплатно