Михайличенко В.Н

Лабораторная работа №2 " Создание простых VB-приложений. Организация ввода/вывода и выбора из списков "

9/9

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

Тема: Создание простых VB-приложений. Организация ввода/вывода и выбора из списков

Цель работы: Изучить: свойства, методы и события управляющих элементов TextBox, ListBox.

Отчет: файлы проекта с выполненными заданиями.

Оглавление

Класс и элемент Forma 1

Задание №1 2

Элемент TextBox 2

Задание №2 4

Задание №3 4

Элемент ListBox 5

Задание №3 8

Класс и элемент Forma

К аждая форма является экземпляром созданного вами класса. Размещаемые на форме элементы становятся ее компонентами. Их описание автоматически записывается в специальную процедуру InitializeComponent

Эта процедура вызывается конструктором формы New (вызывается автоматически)

Форма имеет много свойств и может реагировать на большой набор событий

Задание №1

1. Создать новый проект с одной формой.

2. Разместить на форме текстовое поле и посмотреть процедуру InitializeComponent.

3. Разместить на форме комбинированное текстовое поле и посмотреть процедуру InitializeComponent.

4. Присвоить форме заголовок "Лабораторная работа №2" и посмотреть процедуру InitializeComponent

5. В кострукторе формы изменить цвет форм

Me.BackColor = Color.Aqua.

6. Протестировать приложение.

7. Если форма активна (событие Activated), в текстовое поле выводить "Форма активна", в противном случае (событие Deactivate) – "Форма не активна".

Для ввода новой информации могут использоваться управляющие элементы TextBox и ComboBox, а также функция InputBox.

Для выбора данных из предлагаемых альтернатив могут использоваться управляющие элементы ListBox, CheckedListBox и ComboBox.

Для вывода информации могут использоваться управляющие элементы TextBox, Label а также функция MsgBox и класс MessageBox.

Практически все управляющие элементы имеют свойство Enabled, определяющие его доступность (True) или недоступность (False).

Элемент TextBox

Основное средство ввода и отображения текста. Может рассматриваться как миниатюрный текстовый редактор с возможностью вставки, удаления, копирования через буфер, прокручивания информации (если она не помещается в поле). По умолчанию элемент выводит на экран одну строку. Для возможности вывода нескольких строк установите свойство MultiLine в True.

Свойство ScrollBars определяет наличие полос прокрутки.

Свойство Text определяет текст, содержащийся в элементе. Его можно как считывать, так и устанавливать ( TextBox1.Text = TextBox2.Text ).

Выделение текста

Свойство SelectedText возвращает выделенный текст. С его помощью можно заменить текущее выделение на другое слово.

TextBox1.SelectedText="замена"

Свойства SelectionStart и SelectionLenght возвращают или устанавливают положение первого символа выделенного текста и его длину. Следующий код если найдет в тексте слово "Visual", то выделит его

Dim seekString As String = "Visual"

Dim textStart As Integer = InStr(TextBox1.Text, seekString)

If textStart > 0 Then

TextBox1.SelectionStart = textStart-1

'SelectionStart отсчитывает позиции от 0, а InStr – от 1

TextBox1.SelectionLenght = Len( seekString)

TextBox1.Select() ' этот метод выделяет текст

Справка по функции InStr

InStr( ByVal String1 As String, ByVal String2 As String, _

Optional ByVal Compare As CompareMethod ) As Integer

InStr( ByVal Start As Integer, ByVal String1 As String, ByVal String2 As String, _

Optional ByVal Compare As CompareMethod ) As Integer

Функция возвращает позицию первого вхождения строки string2 в строку string1.

Первый вариант осуществляет поиск с начала строки string1, во втором варианте задается позиция начала поиска start. Позиции отсчитываются от 1.

Последний необязательный параметр определяет тип сравнении и может принимать два значения

1. CompareMethod.Text – нечувствительное к регистру букв сравнение;

2. CompareMethod.Binary – сравнение, учитывающее регистр букв; значение по умолчанию .

Если string 2 не является частью string1, возвращается значение 0.

End If