Referat.me
/ / Использование элементов управления: Label, TextBox, Image, OptionButton, ListBox, SpinButton, ComboBox, CommandButton

Название: Использование элементов управления: Label, TextBox, Image, OptionButton, ListBox, SpinButton, ComboBox, CommandButton

Вид работы: лабораторная работа

Рубрика: Информатика и программирование

Размер файла: 810.51 Kb

Скачать файл: referat.me-134021.docx

Краткое описание работы: Программа "Labs", выбор шрифта с помощью элемента ComboBox. Очистка содержимого и добавление значений в элемент ListBox. Загрузка картинки в элементе Image. Совместная работа SpinButton и TextBox. Изменение масштаба надписи и текста элемента Label.

Использование элементов управления: Label, TextBox, Image, OptionButton, ListBox, SpinButton, ComboBox, CommandButton

Министерство образования Республики Таджикистан

Таджикский Технический Университет им. ак. М. С. Осими

кафедра АСОИиУ

Лабораторная работа №1

«Использование элементов управления: Label, TextBox, Image,

OptionButton, ListBox, SpinButton, ComboBox, CommandButton»

Выполнил:

Приняла:

-Душанбе 2009-


Программа «Labs»

Private Sub cmb_Click()

Select Case cmb.ListIndex

Case 0

Label4.Font = "Times New Roman"

Case 1

Label4.Font = "Tahoma"

Case 2 Выбор шрифта с помощью элемента ComboBox

Label4.Font = "Arial"

Case 3

Label4.Font = "MS Sans Serif"

Case 4

Label4.Font = "Lucida Console"

End Select

End Sub


Private Sub Command2_Click()

rez.ClearОчистка содержимого ListBox

End Sub

Private Sub Command1_Click()

If op1.Value = True Then

rez.AddItem (op1.Caption)

ElseIf op2.Value = True Then

rez.AddItem (op2.Caption)

ElseIf op3.Value = True Then

rez.AddItem (op3.Caption)

ElseIfop4.Value = TrueThenДобавление значений в элемент ListBox

rez.AddItem (op4.Caption)

ElseIf op5.Value = True Then

rez.AddItem (op5.Caption)

Else

End If

End Sub

Private Sub load1_Click()

cd.ShowOpen

Image1.Picture = VB.LoadPicture(cd.FileName)

Image1.Width = Image1.Picture.Width / Val(ms.Text) Загрузкакартинкивэлемент Image

Image1.Height = Image1.Picture.Height / Val(ms.Text)

End Sub


Private Sub sp_Change()

If sp.Value < 1 Then

sp.Value = 1

ExitSub

ElseКонтроль за изменением значения Масштаба

End If

Text1.Text = sp.Value

End Sub

Private Sub ms_Change()

On Error Resume Next

mage1.Picture = VB.LoadPicture(cd.FileName) Изменениемасштабакартинки

Image1.Width = Image1.Picture.Width / ms.Text

Image1.Height = Image1.Picture.Height / ms.Text

End Sub

Private Sub Form_Load()

Label4.Font = "Times New Roman"

Frame1.Visible = True

Frame3.Visible = False

Frame2.Visible = False

cmb.AddItem ("Times New Roman")

cmb.AddItem ("Tahoma") Инициализацияформы

cmb.AddItem ("Arial")

cmb.AddItem ("MS Sans Serif")

cmb.AddItem ("Lucida Console")

sp.Value = 6

cmb.Text = cmb.List(0)

ms.Text = "1"

End Sub

Private Sub SpinButton1_Change()

ms.Text = SpinButton1.Value Совместнаяработа SpinButton и TextBox

End Sub

Private Sub Text1_Change()

On Error Resume Next

sp.Value = Text1.Text Изменениемасштабанадписи (Label)

Label4.FontSize = Text1.Text

End Sub

Private Sub Text2_Change()

Label4.Caption = Text2.Text Изменениетекстаэлемента Label

End Sub

Private Sub mp_Change()

Select Case mp.Value

Case 0

Frame1.Visible = True

Frame2.Visible = False

Frame3.Visible = False

Case 1

Frame1.Visible = FalseКонтроль переключения вкладок

Frame2.Visible = True

Frame3.Visible = False

Case 2

Frame2.Visible = False

Frame1.Visible = False

Frame3.Visible = True

End Select

End Sub

Похожие работы

  • Обработка одномерных массивов в среде программирования Lazarus

    Форма программы для ввода и вывода массива в программной среде Lazarus. Характеристика главных недостатков Lazarus. Цикл для пропуска пробелов между словами. Результат обработки текстового редактора memo.text. Листинг и экранные формы заданной программы.

  • Составление программы на алгоритмическом языке, выполняющей указанные преобразования с матрицами

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

  • Почта

    Разработка программы автоматизации учёта работы почты. Регистрация отправленной корреспонденции, печать квитанции об оплате. Регистрация полученной корреспонденции, ее выдача. Печать извещений для получателей. Формирование сопроводительной ведомости.

  • Разработка приложения средствами VBA

    Разработка графического интерфейса проекта (панель инструментов имеет 6 кнопок). Процедуры разделов программы: документа ThisDocument, программного модуля Module1 и пользовательских форм UserForm1, UserForm2 и Деление_амёбы. Тестирование программы.

  • Успеваемость студентов

    Разработка информационной системы анализа успеваемости студентов. Особенности режима просмотра объектов с помощью редактора Visual Basic for Application. Виды диалоговых окон и основных элементов управления. Формирование диаграммы успеваемости группы.

  • Расположение элементов в матрице

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

  • Работа с базами данных через интерфейс

    Описание визуальных компонентов. Использование чужеродных компонентов-CTIVEX, компонент Grid. Набор свойств, которые имеет каждый визуальный компонент, их установка программно или при проектировании приложения. Примеры приложения с компонентами.

  • Программа контроля учебного процесса образовательного учреждения

    Создание средств накопления больших объемов информации на машинных носителях. Системы управления базами данных. Создание компьютерной техники и программного обеспечения. Структурированные взаимосвязанные данные и их хранение. Приложения Visual FoxPro.

  • Игра &quot;Виселица&quot;

    Разработка программы "Виселица" с использованием программной среды Visual Basic и средств объектно-ориентированного программирования: программные требования, описание алгоритма, блок-схема программы и дополнительной процедуры. Листинг программы.

  • База данных видеокарт

    Отличительные особенности программы для создания каталога видеокарт на Visual Basic с ее занесением, изменением и удалением. Расчет максимальной и минимальной стоимости видеоносителя в порядке увеличения его стоимости и выбор параметров сортировки.