- •Знакомство с 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 ‘счетчик новых записей в массиве
Самостоятельно
Форма состоит из TextBox, куда будет вводиться строка, из командной кнопки и из метки Label, куда будет выводиться количество символов в строке. Под командной кнопкой написать программу, которая будет считывать значение текстового поля в строковую переменную и выводить длину строковой переменной в поле метки.
Программа выводит в элемент «список» введенную строку в виде:
(используется Left())
Введенная строка строка, введенная через TextBox
В
Вв
Вве
Введ
Введе и т.д.
Эту же строку вывести с конца таким же образом (Right())
Эту же строку вывести по одной букве в каждой строке.(Mid())
Написать программу, которая вводит в TextBox дату в формате ДД.ММ.ГГ и выводит в метку месяц полным текстом.
Пример:
Ввели 12.11.95
В метке Label выводится 12 ноября 1995 года.
Использовать оператор множественного выбора Select Case для замены числа месяца названием месяца.
Использование одной кнопки для включения / выключения
Задайте форму с командной кнопкой, меткой и таймером. На кнопке напишите ВКЛЮЧИТЬ/ВЫКЛЮЧИТЬ. В свойстве таймера Enabled поставьте false. Под кнопку и таймер напишите код:
Private Sub Command1_Click()
Timer1.Interval = 100
Timer1.Enabled = Not (Timer1.Enabled)
End Sub
Private Sub Timer1_Timer()
Static a
a = a + 1
Label1 = a
End Sub
Запустите программу.
Конкатенация разнотипных строк
Обычно при конкатенации строк можно использовать знак «+», но если складывается число и строка, то это приводит к ошибке несоответствия типов:
Text I .Text = 40 + "Строка"
Чтобы избежать появления ошибки, вместо «+» ставят &.
Text I .Text = 40 & "Строка"
Данное выражение изменяет типы переменных на Variant и складывает. Ошибки не возникает.
Chr(), Chr$()
Возвращает символ по его ASCII - коду.
MyChar = Chr(65) ' Returns A.
MyChar - Chr(97) ' Returns a.
MyChar = Chr(62) ' Returns >.
MyChar = Chr(37) ' Returns %.
Chr() возвращает строку типа Variant, Chr$() - строку типа String.
Коды символов в формате ascii
Каждый символ имеет свое числовое значение. Ниже приведена программа, показывающая код символа нажатой клавиши. (Помните, на каждой клавише может находиться несколько символов!)
Private Sub Text1_KeyPress(KeyAscii As Integer)
Label3.Caption = Asc(Chr(KeyAscii))
End Sub
Если Вам нужно вывести некоторое сообщение в кавычках, то это делается не так:
Text1.Text = " " Сообщение " " ‘ ОШИБКА
А вот так:
Textl.Text = chr(34) & "Сообщение" & chr(34)
или
Text1.Text = """Сообщение """
vbCrLf
Встроенная константа vbCrLf имеет под собой:
vbCrLf = chr(13) + chr(10) ' возврат каретки + перевод строки
Для примера создайте форму с текстовым полем и командной кнопкой. Свойство текстового поля MultiLine - True. Под кнопкой напишите код:
Private Sub Command l_Click()
Textl.Text = "Какой-то-текст" + Chr(13)
Textl.SetFocus
End Sub
Запустите программу. Нажмите командную кнопку. Попробуйте клавишей курсора сместить курсор вниз. Не получится, так как есть только возврат каретки, но нет перевода строки.
Добавьте + Chr(10). Повторите все. Теперь можно опустить курсор па строку вниз.
Этот оператор можно использовать при выводе сообщений в несколько строк:
MsgBox "Первая строка сообщения" + vbCrLf + "Вторая строка сообщения"