Практическая работа по VISUAL BASIC направлена на отработку навыков работы с элементами управления VISUAL BASIC(CommandButton, ListBox) ,установление свойств элементов управления, разработка проекта, его отладка и сохранение. Практическая работа содержит перечень умений и навыков, которые приобретут учащиеся в процессе выполнения практической работы,табличку - подсказку для учащихся и решение для учителя.
Проект.docx
Выполнив задания этой практической работы, вы научитесь:
Проект «Вправо – влево»
элементов управления (Caption,
создавать форму и размещать на ней элементы управления (CommandButton,
ListBox);
устанавливать свойства
RemoveItem, AddItem,) ;
вводить текст программы и её отладка (вспомните условный оператор, цикл со
счетчиком);
сохранять проект.
Для выполнения задания вам надо знать:
элементы управления и их свойства;
ListCount,
Selected,
Класс объектов
Свойства
CommandButton
(кнопка)
Caption
(надпись)
Значение
по умолчанию
Command1
Command2
ListBox
(список)
List(массив вариантов
выбора списка)
Новое значение
12345
678910
Более подробные сведения об объектах и их свойствах можно найти в конце брошюры.
Задание:
1) Создать форму, расположив на ней
соответствующие
управляющие
элементы, настроив их свойства.
2) Составить событийную процедуру,
которая бы при выборе информации из
левого списка и нажатии на кнопку
переносила в правую часть, и наоборот
().
3) Сохранить проект в папке «Проекты».
Примерный
образец
решения
:
Private Sub Command1_Click()
For i = List1.ListCount 1 To 0 Step 1
If List1.Selected(i) = True Then
List2.AddItem (List1.List(i))
List1.RemoveItem (i)
End If
Next i
End Sub
Private Sub Command2_Click()
For i = List2.ListCount 1 To 0 Step 1
If List2.Selected(i) = True Then
List1.AddItem (List2.List(i))
List2.RemoveItem (i)
End IfNext i
End Sub
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с
договором-офертой сайта. Вы можете
сообщить о нарушении.