Поиск

Полнотекстовый поиск:
Где искать:
везде
только в названии
только в тексте
Выводить:
описание
слова в тексте
только заголовок

Рекомендуем ознакомиться

'Документ'
О внесении изменений в приложение № 1 «Перечень общеобразовательных предметов, сроки и этапы проведения диагностических контрольных работ и репетицион...полностью>>
'Документ'
Если ваш ККА не поддерживает функцию безналичного расчета, рекомендуется заменить ККА на новую модель....полностью>>
'Документ'
Согласно ст. 73 ТК РФ, если в соответствии с медицинским заключением работник нуждается во временном переводе на другую работу на срок более четырех м...полностью>>
'Документ'
2015 год – Год литературы в России. В программе Года литературы запланированы Международный писательский форум «Литературная Евразия», проект «Литерат...полностью>>

Главная > Документ

Сохрани ссылку в одной из сетей:
Информация о документе
Дата добавления:
Размер:
Доступные форматы для скачивания:

7

Visual Basic

Visual Basic — что это?

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

Бурное развитие вычислительной техники, потребность в эффективных средствах разработки программного обеспечения привели к появлению систем программирования, ориентированных на так называемую "быструю разработку", пионером среди которых был пакет Microsoft Visual Basic.

Microsoft Visual Basic — это среда быстрой разработки, в которой в качестве языка программирования используется Visual Basic. В основе идеологии Visual Basic лежит технология визуального проектирования и методология объектно-ориентированного событийного программирования.

Microsoft Visual Basic может работать в среде операционных систем: от Windows 98 до Windows XP. Особых требований, по современным меркам, к ресурсам компьютера пакет не предъявляет.

Начало работы

Запуск программы Пуск Программы Microsoft Visual Basic 6.0 Microsoft Visual Basic 6.0.

После запуска программы появится окно Новый Проект (New Project). В этом окне на вкладке Новый (New) перечислены виды проектов (программ), которые можно создать в Visual Basic. Чтобы приступить к работе над новым Windows-приложением, надо выбрать Standard EXE и щелкнуть кнопку Открыть (Open). Если после запуска Visual Basic, окно Новый Проект не открывается на экране, то надо выбрать команду Файл/Новый Проект.

Рис. 1

Внешний вид окна

Задание 1. Настройка окна:

  1. Закрыть панель компонентов, окна слева, щелчком на кнопке.X.

  2. Вывести палитру компонентов командой ViewToolbox (Вид/Инструменты) или щелкнуть на соответствующей кнопке панели инструментов.

  3. Вывести окно менеджера проектов командой ViewProject Explorer (Вид/Проводник проектов) или щелкнуть на соответствующей кнопке панели инструментов.

  4. Вывести окно свойств командой View/Properties (Вид/Окно параметров).

Задание 2. Вывод стихотворения «Утес»

Создадим программу, которая выводит на экран стихотворение. Текст должен быть красиво оформлен — отформатирован. Как это сделать в Visual Basic?

Последовательность действий:

  1. Запустить Visual Basic. После щелчка на кнопке Пуск, выбрать:

  1. На вкладке New окна New Project выбрать Standard EXE и щелкнуть на кнопке Открыть.

  2. В середине экрана увидим два окна

  1. Сохраним наш проект в начале работы, хотя это можно сделать в любой момент. В Visual Basic сохраняются два файла — один с формой: визуальной частью программы, а другой — с кодом программы:

    1. Выбрать команду Сохранить проект как…(Save project As).

    2. Имя файлу с формой дадим frmPoem и щелкнем Сохранить

    3. Имя проекту дадим prjPoem и щелкнем Сохранить.

    4. В процессе работы над проектом сохраняем изменения щелчком на кнопке (Сохранить).

    5. Создание программы можно разбить на два этапа. 1 этап — создание графического интерфейса на форме Form1 (видимая часть программы) и 2 этап: написание программного кода.

  2. Начнем работу с 1 этапа и настроим стартовую форму:

    1. Выделим форму щелчком мыши и зададим значения свойств формы

      Свойство

      Значение

      Описание

      Name

      frmPoem

      Имя формы

      Caption

      Стихотворение

      Заголовок формы

      Width

      5800

      Ширина формы (единицы измерения твипы)

      Height

      5200

      Высота формы (единицы измерения твипы)

      StartUpPosition

      Center

      Положение формы при ее появлении на экране

      MaxButton

      False

      Признак наличия кнопки Развернуть

      MinButton

      False

      Признак наличия кнопки Свернуть

      ScaleMode

      Pixel

      Задает единицы измерения размеров компонентов, которые находятся на поверхности формы

    2. Поместим на форме две кнопки двойным щелчком (компонент CommandButton).

Для кнопки 1 зададим свойства

Свойство

Значение

Описание

Name

cmdPoem

После щелчка на этой кнопке на экране увидим стихотворение

Caption

Стихотворение

Текст на кнопке

Height

33

Высота кнопки

Width

137

Ширина кнопки

Font

Courier New 11 пт

Шрифт надписи на кнопке

Для кнопки 2 свойства:

Свойство

Значение

Описание

Name

cmdExit

Выход их программы

Caption

Выход

Текст на кнопке

Height

33

Высота кнопки

Width

81

Ширина кнопки

Font

Courier New 11 пт

Шрифт надписи на кнопке

Получим форму:

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

Код для формы напишем после двойного щелчка на форме (Набивает только выделенный текст):

Private Sub Form_Load()

frmPoem.BackColor = QBColor(1)

End Sub

Введенный код означает, что форма, при появлении на экране (загрузке) окрасится в синий цвет (номер синего цвета — 1).

Теперь напишем код для первой кнопки (cmdPoem). Вернемся к форме, выполнив команду Вид/Объект.

Щелкнем на кнопке Стихотворение два раза и напишем (после апострофа даны пояснения к строкам программы, их набивать не надо):

Private Sub cmdPoem_Click()

FontName = "Courier New Cyr"Установка шрифта

FontItalic = True Установка курсива

FontBold = True Полужирное начертание

ForeColor = QBColor(15) Цвет шрифта белый (номер 15)

FontSize = 12 Размер шрифта

Print: Print ‘Вывод двух пустых строк

Print Tab(15); "Утес" Вывод названия стихотворения

Print Вывод пустой строки

FontSize = 10 Изменение размера шрифта

Print Tab(5); "Ночевала тучка золотая" Функция Tab указывает сколько пробелов надо отступить от левого края формы, чтобы текст располагался в центре формы.

Print Tab(5); "На груди утеса — великана"

Print Tab(5); "утром в путь она умчалась рано."

Print Tab(5); "По лазури весело играя"

Print

Print Tab(5); "Но остался влажный след в морщине "

Print Tab(5); "Старого утеса. Одиноко "

Print Tab(5); "Он стоит: задумался глубоко"

Print Tab(5); "И тихонько плачет он в пустыне."

Print

FontSize = 8

Print Tab(30); "М.Ю. Лермонтов"

cmdPoem.Visible = False После вывода стихотворения сделаем первую кнопку невидимой.

End Sub

И, наконец, напишем код программы для второй кнопки, он состоит из одной команды :

Private Sub cmdExit_Click()

End

End Sub

  1. Теперь осталось запустить программу на выполнение:

    1. Щелкнуть кнопку Старт на панели Стандартная

    2. Проверить правильность работы программы.

      1. Получить результат:

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




© Нечаева Ольга Ивановна 2006 год



Похожие документы:

  1. Увсего отдела продаж слетает программа, все начинют визжать и дергать it: работы мол много, чини. Каждые 20 минут спрашивают ну что долго, долго еще?! Вэто время каждый сидит, кто фотки смотрит, кто в косынку рубится

    Программа
    ... начинает предъявлять мне ... особых требований ... современную лазерную начинку ... из ресурсов по поиску работы, на ... пакетом, намереваясь съездить гаду по шее. Пакет не ... Компьютеров у большинства из нас не было, но в том году уже ввели требование: дипломная работа ...
  2. Уроки американского менеджмента

    Урок
    ... современного производства и оказания услуг. Это вызвано не только применением компьютеров ... до начала практической реализации плана. Потребности в ресурсах ... предъявляются противоречивые требования по поводу того, каким должен быть результат его работы ...
  3. Велосипедный туризм ббк 75. 81 В27

    Документ
    ... Современный велотуризм в России клуб, который начал ... и ресурс соответствуют ... требования по велотуризму и условия присвоения разрядов, планы работы ... су-мерках. ... пакете, а чтобы они не ... компьютера называется нели-нейным. Особое ... меньшие требования предъявляются к ...
  4. Автор, Заслуженный деятель науки рф, несколько десятилетий проработал в научно-исследовательском секторе отечественного ядерно-промышленного комплекса, в центр

    Документ
    ... Не будет преувеличением сказать, что, по современным меркам, первые годы работы ... что начало работы В.  ... предъявляются чаще всего огромным компаниям. Транснациональная табачная корпорация без особой ... авиалайнеров, или компьютеров, не уступающих аппаратуре ...
  5. СПб., издательство «Петербург-xxi век», 1997

    Документ
    ... современные обучающие машины похожи на эту «Электровикторину». В нашем распоряжении компьютеры ... возраста, общество предъявляет требование не быть бесполезными ртами ... нее материнским, а ноги — отцовские (отец долго носил ее на руках). Я начала работать ...

Другие похожие документы..