'

Переменные задаются именами, которые определяют области памяти, в которых хранятся их значения. Значениями переменных могут быть данные различных типов. Типы переменных: byte single integer целые double вещественные long boolean логические string строковые variant любые

Понравилась презентация – покажи это...





Слайд 0

Переменные задаются именами, которые определяют области памяти, в которых хранятся их значения. Значениями переменных могут быть данные различных типов. Типы переменных: byte single integer целые double вещественные long boolean логические string строковые variant любые Имя переменной уникально. Оно должно начинаться с буквы и не должно включать точку, не превышать 255 символов.


Слайд 1

A + B сложение A - B вычитание A * B умножение A / B деление A \ B целочисленное деление A на B A ^ B возведение в степень


Слайд 2

Строками являются любые последовательности, заключенные в кавычки. Операция конкатенации А = “форма” В = “ин” + A + “тика” Для объявления переменной можно пользоваться Dim имя переменной [as тип переменной] Например: Dim Число as integer, Строка as string Const имя константы [as тип] = значение константы Оператор присваивания [Let] имя переменной = выражение Например: A = 3 B = 4 C = A^2 + B^2 A = “форма” В = “ин” + A + “тика” A = 5>3 B = 2>3 C = A and B


Слайд 3

Создать программу, которая выполняет деление двух целых чисел, а для хранения результата используются различные типы числовых переменных, то есть результаты будут вычисляться с различной точностью. Задача Sub Command1_click() Dim a, b as integer, c as byte, d as single, e as double a = 2 b = 3 c = a/b d = a/b e = a/b Form1.Print c, d, e End sub


Слайд 4

Стандартные функции VB


Слайд 5

Математические функции: SIN(a) COS(a) TAN(a) ATN(a) SQR(a) LOG(a) EXP(a) ABS(a) Sub Command1_click() Dim a, b, c as single a = 3 b = 4 c = SQR(a^2 + b^2) Form1.Print “Гипотенуза равна”; c End sub


Слайд 6

Строковые функции В строковых функциях строками являются либо аргументы, либо возвращаемые функциями значения. Функция определения длины строки Len (строка) A = len («информатика») А = 11 Функция вырезания подстроки Left (строка, длина) А = left («информатика», 2) А = «ин» Right (строка, длина) B = right («информатика», 2) B = «ка» Mid (строка, позиция, длина) С = mid («информатика», 3, 5) С = «форма»


Слайд 7

Дана строковая константа литературовед. Получить из неё и распечатать на форме слово радуга, разрешается добавить один недостающий символ. Задача Sub Command1_Сlick() Dim a, b as string a = «литературовед» b = mid (a, 5,2) + right (a, 1) + mid (a, 8, 1) + «г» + mid (a, 6, 1) Form1.Print b End Sub


Слайд 8

Функция InputBox (Окно ввода) Для ввода данных в программу через текстовое поле на диалоговой панели используется функция InputBox. Функции ввода и вывода В качестве аргументов этой функции выступают три строки и значением функции является также строка. ! InputBox (Приглашение, Заголовок, [ по умолчанию])


Слайд 9

Sub Command1_Сlick() Dim a as string a = inputbox («Введите текст», «Функция Окно ввода») Form1.Print а End Sub


Слайд 10

Функция MsgBox (Панель сообщений) В простейшем случае функция MsgBox может работать в режиме оператора и использоваться для вывода сообщений не на форме, а на специальной панели сообщений. MsgBox Сообщение [ , ЧисКод1 + ЧисКод2] [ , Заголовок] Cтрока Сообщение выводится на панели сообщений, аргумент ЧисКод1 + Чискод2 определяет внешний вид панели, а строка Заголовок печатается в строке заголовка панели.


Слайд 11

Внешний вид панели можно менять , используя различные значения ЧисКод1 и ЧисКод2. ЧисКод1 определяет внешний вид пиктограмм, ЧисКод2 набор кнопок, размещаемых на панели. ЧисКод1 ЧисКод2 Пиктограмма Набор кнопок 16 32 48 64 0 1 2 3 4 5 OK ОК, Отмена Стоп, Повтор, Пропустить Да, Нет, Отмена Да, Нет Повтор, Отмена MsgBox "Вы хотите зарегистрироваться?", , "Вопрос" !


Слайд 12

MsgBox (Сообщение [ , ЧисКод1 + ЧисКод2] [ , Заголовок]) В случае записи аргументов в скобках, функция MsgBox получает определенное значение, которое может быть присвоено какой-либо переменной. Переменная = Sub Command1_Click() Dim a аs вyte a = MsgBox("Вы хотите зарегистрироваться?", 36, "Вопрос") Form1.Print a End Sub Значение функции Нажатая кнопка 1 2 3 4 5 6 7 ОК Отмена Стоп Повтор Пропустить Да Нет


Слайд 13

Функции преобразования типов данных Функция Val преобразовывает строковое значение в число. Например: Val(«2000») 2000 Sub Command1_Click() Dim a, b As String, a1, b1, c As Single a = InputBox("Первый катет", "Катет А") b = InputBox("Второй катет", "Катет B") a1 = Val(a) b1 = Val(b) c = Sqr(a1 ^ 2 + b1 ^ 2) Form1.Print "Гипотенуза = "; c End Sub


Слайд 14

Функции преобразования типов данных Функция Str преобразовывает число в строку. Например: Str(2000) «2000» Sub Command1_Click() Dim a As String a = InputBox("Формула закона Ома?", "Контроль знаний") If a = "U/R" Then Form1.Print "Правильно!" Else Form1.Print "Неправильно!" End If End Sub


Слайд 15

Оператор условного перехода Однострочная форма Многострочная форма if условие _ then серия1 _ [ else серия2 ] if условие then серия1 [ else серия2 ] end if


Слайд 16

Цикл со счетчиком for счетчик = начзнач to конзнач [step шаг ] тело цикла next [счетчик] Циклы с условием do while условие тело цикла loop do until условие тело цикла loop


Слайд 17

Задача Ввести с клавиатуры координаты двух точек A и B. Определить какая из них ближе к началу координат результат вывести на панели сообщений. A(x1, y1) B(x2, y2) 0 Y X


×

HTML:





Ссылка: