Visual Basic.ppt
- Количество слайдов: 44
Знакомство со средой программирования Visual Basic
Окно проекта Project Меню Вид/Project Explorer Кнопка View Code (работа с текстом программы) Кнопка View Object (работа с объектами)
Панель компонентов Tool. Bars Меню Вид/Tool. Bars Инструмент Выделение Объект Label (Надпись) Объект Text. Box (Текстовое окно) Объект Button (Кнопка)
Окно свойств Properties Меню Вид/Properties Window Свойство Name (Имя) Свойство Caption (Заголовок)
СОХРАНЕНИЕ ПРОЕКТА Каждый проект состоит из 3 файлов с расширениями: . frm. vbp. vbw По умолчанию: Form 1. frm Project 1. vbp Project 1. vbw
СПОСОБЫ ВВОДА ДАННЫХ 1. Через текстовое окно Text. Box с формы 2. Через окно ввода Input. Box
СПОСОБЫ ВЫВОДА ДАННЫХ 1. В текстовое окно Text. Box на форму 2. Через окно вывода Message. Box 3. Распечатыванием результата на форму
ТИПЫ ДАННЫХ В VISUAL BASIC 1. Целый тип – Integer 2. Вещественный тип с одинарной точностью - Single 3. Вещественный тип с двойной точностью - Double 4. Строковый тип - String ФУНКЦИИ ПРЕОБРАЗОВАНИЯ ТИПОВ 1. В целый тип – CInt() 2. В вещественный тип с одинарной точностью – CSng() 3. В вещественный тип с двойной точностью – CDbl() 4. В строковый тип – CStr() ОБЪЯВЛЕНИЕ ПЕРЕМЕННЫХ Dim A, B, C as Single, X, Y as Integer, S as String
Пример 1 Составить алгоритм и программу вычисления арифметического выражения.
начало 1 Ввод X, Y 2 B 3 Вывод В 4 конец
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
УСЛОВНЫЙ ОПЕРАТОР IF Полная форма разветвления Условие Нет Действие 1 Да Действие 1 IF Условие THEN ELSE Действие 2 END IF
Сокращенная форма разветвления (обход) Условие Да Действие 1 Нет 1 способ IF Условие THEN Действие 1 Действие 2 END IF 2 способ IF Условие THEN Действие 1: Действие 2
Пример 2 Разделить сумму трех заданных чисел (отличных от нуля) на наименьшее из них.
начало 7 1 5, 6 A, B, C 2 8 Min=A R 3 B<Mi n конец 4 Нет Min=B 5 C<Mi n Нет 9 Да Да 6 Min=C 7
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
Пример 3 По итогам соревнований спортсмены Иванов, Петров и Сидоров набрали неравные количества баллов. Определить победителя по наибольшему количеству баллов.
начало 1 A, B, C 2 Да Нет A>B ^ A>C Да 4 «Петров » 7 конец Нет B>C 6 5 «Иванов » 3 «Сидоров»
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
ОПЕРАТОР ЦИКЛА FOR Произвольный шаг цикла Шаг цикла равен 1 FOR X=XN TO XK STEP DX FOR I=1 Действие 2 …………… NEXT X NEXT I TO N
начало Пример 4 Вычислить таблицу значений функции 1 xn, xk, dx 2 x=xn 3 для аргумента х, изменяющегося от xn до xk с шагом dx. x<= xk Да 4 y=sin(x) 5 X, Y 6 x=x+dx 7 конец Нет
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
Пример 5 Вычислить таблицу значений функции для ряда заданных значений аргумента х. начало 1 Вво дn 2 3 i=1, n, 1 Вво дxi 4 y=sin(xi) 5 Вывод y 6 конец
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
Пример 6 Для одномерного массива, состоящего из N элементов, вычислить сумму четных по номерам элементов начало 1 Ввод N, X 2 S=0 3 i=2, N, 2 4 S=S+X(i) 5 Вывод S 6 конец Х- массив из N элементов
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
X – матрица из Mx. N элементов начало Пример 7 Вычислить сумму элементов матрицы, величина которых не превышает 2, 5. 1 n, x 2 S=0 3 i=1, m 4 j=1, n 5 Нет x(i, j)< =2. 5 Да 6 s=s+x(i, j) 7 s 8 конец
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
X – матрица из Mx. N элементов Y – вектор из N элементов начало Пример 8 Для матрицы размером Mx. N получить вектор из сумм отрицательных элементов каждого столбца матрицы. 1 Ввод M, N, X 2 j=1, N 3 Y(j)=0 4 i=1, M 5 Нет X(i, j)< 0 6 Да Y(j)=Y(j)+ X(i, j) 7 Вывод Y 8 конец
ФОРМА ПРОЕКТА
КОД ПРОГРАММЫ ПРОЕКТА
Visual Basic.ppt