- •Знакомство с visual basic
- •Практическая работа
- •Свойства, методы и события
- •Практическая работа
- •Переменные
- •Объявление переменных
- •Область видимости переменной
- •Ф орма 1
- •Форма 2
- •Математические операторы
- •Операторы сравнения
- •Логические операторы
- •Практическая работа
- •Обработка ошибок
- •Практическая работа
- •Самостоятельно
- •Условия и циклы
- •Самостоятельно
- •Использование списков и полей со списками
- •Удаление строк из списка
- •Ф орма Код (самостоятельно)
- •Массивы
- •Объявления массивов Объявление массива как одной переменной:
- •Заполнение массива
- •Динамический массив
- •Самостоятельно
- •Работа со строками
- •Определение длины строки
- •Усечение строк
- •Самостоятельно
- •Использование одной кнопки для включения / выключения
- •Конкатенация разнотипных строк
- •Коды символов в формате ascii
- •Окно ввода данных
- •Функция Val() и Slr()
- •Вывод информации на форму
- •Функция Format
- •Работа с графическим окном
- •Элемент управления RichTextBox
- •Объект Printer
- •Дополнительные возможности работы со строками Оператор Like и неопределенный поиск
- •Прочие строковые функции
- •Работа с файлами Чтение текстового файла (1 способ)
- •Запись текста в текстовый файл: Форма
- •Чтение текстового файла (2 способ)
- •Самостоятельно
- •Код (самостоятельно)
- •Простой файловый менеджер
- •'FileCopy не допускает файловые шаблоны, поэтому копирование по полному пути
- •Изменение регистра символов строки
- •Код (проанализировать программу, при необходимости – набрать и проверить работу)
- •Создание меню
- •Клавиши доступа и быстрые клавиши
- •Создание всплывающих меню
- •Разделение строк меню
- •Вырезание, копирование и вставка с помощью объекта Clipboard (буфера обмена)
- •Выделение текста в поле текста
- •Самостоятельно
- •Код (сначала попытайтесь самостоятельно написать код)
- •Использование элемента управления
- •Управляющие элементы Image List и Tool Bar
- •Создание дистрибутивного пакета – подготовка приложения к распространению
- •Время и таймеры
- •Использование одной кнопки для включения /выключения
- •Вычисление разницы между датами
- •Вычисление возраста
- •Код (проанализировать, при необходимости набрать проверить работу)
- •Самостоятельно
- •Код (сначала самостоятельно)
- •Подпрограммы и функции Использование процедур в Visual Basic
- •Самостоятельно
- •Определение точки входа в программу (запуск проекта с нужной формы)
- •Выбор подпрограммы Main() точкой входа проекта
- •' Оповещаем пользователя
- •Тестирование и отладка программ
- •Точка остановки программы
- •Наблюдение за несколькими переменными
- •Полосы прокрутки
- •Самостоятельно
- •Дополнительные компоненты active X
- •Создание дистрибутивного пакета – подготовка приложения к распространению
- •Время и таймеры
- •Использование одной кнопки для включения /выключения
- •Вычисление разницы между датами
- •Вычисление возраста
- •Код (проанализировать, при необходимости набрать проверить работу)
- •Самостоятельно
- •Форма Код (сначала самостоятельно)
- •Подпрограммы и функции Использование процедур в Visual Basic
- •Самостоятельно
- •Определение точки входа в программу (запуск проекта с нужной формы)
- •Выбор подпрограммы Main() точкой входа проекта
- •' Оповещаем пользователя
- •Понятие о базах данных
- •Терминология баз данных
- •Элемент управления данными
- •Свойства элемента управления данными
- •Методы элемента управления данными
- •Свойства набора данных
- •Методы набора записей
- •Практическая работа
- •Связывание элемента управления данными с базой данных
- •Что такое Recordset?
- •Поиск записей
- •Поиск дальше
- •Запросы
- •Компоненты языка sql
- •Самостоятельно
- •Создание отчетов с помощью crystal reports
- •Создание отчета
- •Объекты
- •Практика
- •Движение объектов
- •О связанных элементах управления Последовательность событий при загрузке формы
- •Отношения родитель/потомок между элементами управления данными
- •Практикум –
- •Создание базы данных своими руками
- •Какую технологию выбрать?
- •Элемент управления данными ado
- •Сортировка и объединение данных с помощью элемента управления Hierarchical FlexGrid
- •Проект «Школьный журнал» (пример создания и работы с базой данных)
- •Практическое задание Создать базу данных «Записная книжка»
- •Простейший графический редактор
- •При отпускании кнопки мыши
- •Dim n As Integer ‘счетчик новых записей в массиве
Ф орма 1
Код:
Public a As Integer
Private Sub Command1_Click()
a = 123
Form2.Show
End Sub
Private Sub Command2_Click()
Text2.Text = a
End Sub
Форма 2
Код
Private Sub Form_Load()
Text1.Text = Form1.a
End Sub
При загрузке второй формы в текстовом поле появится 123, так как в коде есть ссылка на переменную из первой формы, и в первой форме переменная «а» объявлена как Public. Это два необходимых условия для передачи переменных между формами.
Математические операторы
Сложение +
Вычитание -
Умножение *
Деление /
Деление нацело \
Деление по модулю (вычисление остатка) mod
Возведение в степень ^
Операторы сравнения
Меньше <
Больше >
Равно =
Меньше или равно <=
Больше или равно >=
Не равно <>
Логические операторы
Отрицание Not
Логическое умножение (и) And
Логическое сложение (или) Or
КОНКАТЕНАЦИЯ СТРОК
Для соединения строк используется оператор конкатенации – «амперсанд» &
Пример:
String1$ = “Здравствуйте,”
String2$ = “ я ваша тетя !”
String3$ = String1$ & Srting2$
Text1.Text = String3$
ИСПОЛЬЗОВАНИЕ ПЕРЕКЛЮЧАТЕЛЕЙ
Практическая работа
Пример использования переключателя:
Form1
Код
Private Sub Command1_Click()
Dim strFam As String
Dim strName As String
Dim strTitle As String
Dim strFull As String
strFam = Text1.Text
strName = Text2.Text
If Option1.Value Then strTitle = "Ученик "
If Option2.Value Then strTitle = "Ученица "
strFull = strTitle & strFam & strName
Label1.Caption = strFull
End Sub
Обработка ошибок
Если в программе встречается ошибка, то компилятор выдает сообщение и номер ошибки. Этот номер нужно запомнить для создания обработчика ошибок.
Практическая работа
Откройте новый проект
Создайте форму:
К данной форме напишите код (обработчика здесь нет):
Private Sub Command1_Click()
Label1.Caption = CInt(Text1.Text) / CInt(Text2.Text)
End Sub
Запустите программу и щелкните по кнопке ДЕЛИТЬ.
Поскольку Вы попытались поделить не числа, а слова (Text1, Text2), то Вам выдало ошибку несоответствия типов (13)
Остановите программу и запустите ее заново.
Теперь в полях ввода текста задайте числа 5 и 0
Разделите эти числа – появится другая ошибка (11)
Остановите программу и допишите следующий код для обработки ошибок:
Private Sub Command1_Click()
On Error GoTo eh
Label1.Caption = cint(Text1.Text) /cint(Text2.Text)
eh:
If Err.Number = 13 Then MsgBox "Введите число"
If Err.Number = 11 Then MsgBox "Деление на ноль"
End Sub
10. Запустите программу и проделайте заново предыдущие операции.
Самостоятельно
Создать приложения для вычисления арифметических действий СЛОЖЕНИЕ и ВЫЧИТАНИЕ в одной форме, УМНОЖЕНИЕ и ДЕЛЕНИЕ в другой форме:
Кнопка «Другие» вызывает вторую форму, где с этими же числами производятся операции УМНОЖЕНИЕ и ДЕЛЕНИЕ.
В этом же приложении сделать так, чтобы при прохождении курсора мыши над надписью «1 число» оно загоралось красным, и угасало, если курсор за пределами надписи
*** (Использование свойства Label1.ForeColor = vbRed в процедуре обработки события Label1_MouseMove).
Сделать так, чтобы при открытии 2 формы первая форма пропадала и появлялась при закрытии 2 формы.
Сделать недоступной кнопку «Разность» (Вместо надписи черного цвета она станет бесцветной и вдавленной – свойство Enabled = False)
Добавить в первую форму кнопку «Очистить поля», по которой все числа из всех полей пропадают. В этой же процедуре написать код для установки курсора (передать фокус в Text1 - SetFocus) в текстовое поле под меткой «1 число».
Сделать так, чтобы при щелчке мышью на слове «Ответ» он становился невидимым. (не недоступным, а просто пропадал. Свойство Visible).