ВНИМАНИЕ - всем у кого есть свои сайты или странички!
Я создаю раздел ::друзья::
Разместив у себя ссылку на мой сайт и прислав мне письмо след. содержания:
Имя владельца
Название проекта
Мой сайт посвящен этому
Ссылка на ваш сайт - здесь
У вас есть шанс попасть в начало списка, т.к. пока он пуст,
вы можете оказаться под номером 1.2.3.
Следовательно, шанс что на ваш сайт пройдут посетители будет больше.
Письма будут сортироваться по времени прихода письма ко мне
Конкурс открыт!
Объявление
Желаете разместить объявление в рассылке или у вас интересная новость, тогда пишите, рассмотрим.
Тематика, не обязательно программирование - новости, юмор, интересное, статьи на любую тему.
В гостевой было замечание многие ссылки не работают -
особенно на статьи так что ж вы молчите напишите на почту и
я буду проверять - с какой страницы на какую нет перейти.
А так ошибки и останутся ошибками
У кого все нормально работает - к вам большая просьба
напишите
мне нужно понять у какого процента посетителей сайт работатет не коректно
Итак, с переменными мы разобрались. Теперь займёмся выражениями.
Выражения
Для начала разберёмся с понятием "выражение". В любом языке
программирования выражения являются основными кирпичиками, из которых
строится программа. Согласно самому точному определению, которое мне попадалось,
"выражение" - это "что-то, что содержит значение".
За примером далеко ходить не нужно, возьмём пример из предыдущего урока:
b =
234
Здесь мы присваиваем переменной b значение 234. Другими словами "234"
- это выражение со значением 234. А теперь, к примеру рассмотрим строчку:
c =
b
Здесь переменной c присваивается выражение b. Значение этого выражения
-
b = 234. Т.е. другими словами b - выражение, со значением 234. Рассмотрим
более сложный пример выражения - функцию. Объявим функцию MyFunc, возвращающую
байт 234:
Public
Function
MyFunc() As Byte
    MyFunc = 234
End Function
А теперь запишем строку:
c =
MyFunc()
Как вы уже наверное догадались, выражение здесь - MyFunc(), со значением
234. Т.е. после присвоения переменной c выражения MyFunc(), она будет
содержать значение 234. А вот ещё пример:
c =
5 + 5 * 2
Здесь выражение это 5 + 5 * 2. Значение этого выражения не трудно посчитать,
оно равно 15 (не 20!). Можно было бы написать и так:
c =
MyFunc() - 219
Здесь значение выражение такое же, как и в предыдущем случае, но вот
сами выражения разные. Это важно понимать.
Также необходимо отметить значение скобок в выражениях. Помните скобки
в школе? Так вот в Visual Basic скобки выполняют ту же функцию, что и
в школе, а именно - задают приоритет операции. К примеру, модифицируем
выражение 5 + 5 * 2 на:
c =
(5 + 5) * 2
Теперь значение этого выражения не 15, а 20! Запомните это.
Идём дальше. Рассмотрим другие, очень распространённые выражения - выражения
сравнения. Такие выражения возвращают True или False, в зависимости от
получившегося значения выражения. К таким выражениям относятся:
Dim
bRes As Boolean ' переменная
для хранения результата
Dim a As Long
Dim b As Byte
Dim c As Long
a = 234 ' переменные для теста
b = 5
c = 1000
bRes = c > b ' 1
bRes = c < b ' 2
bRes = a >= c ' 3
bRes = b <= 4 ' 4
bRes = b <= 5 ' 5
bRes = a <> b ' 6
bRes = Not (a = b) '
7
bRes = c = MyFunc() ' 8
' и им подобные...
продолжение урока в следующем выпуске...
Арифметические операторы
Следующий оператор в следующем выпуске
оператор Eqv
Используется для совершения логической эквивалентности двух выражений.
Синтаксис:
результат = выражение1 Eqv
выражение2
результат обязателен; Любая числовая (включая Boolean) переменная выражение1 обязательно; Любое выражение выражение2 обязательно; Любое выражение
Замечания:
Следующая таблица показывает как работает оператор Eqv:
Если выражение1
=
, а
выражение2 =
То
результат =
True
True
True
True
False
False
False
True
False
False
False
True
Для битов оператор Eqv работает следующим образом (смотреть слева направо)
0 0 1
0 1 0
1 0 0
1 1 1
Примеры:
Dim
A, B, C, D, MyCheck
A = 10: B = 8: C = 6: D = Null
MyCheck = A > B Eqv B > C '
Возвратит
True.
MyCheck = B > A Eqv B > C '
Возвратит
False.
MyCheck = A > B Eqv B > D '
Возвратит
Null.
MyCheck = A Eqv B '
Возвратит
-3
Функции Visual Basic
Я попытаюсь рассмотреть все
Функция CLng
CLng(Expression)
Функция CLng(Conversion to Long) используется для приведения выражения в тип Long
Возвращаемое значение
Функция CLng возвращает значение Expression, преобразованное в числовой длинный тип данных Long. Дробная часть при этом округляется
Параметры
Expression
Любое числовое выражение или строка, представляющая число от -2147483648 до 2147483647
Если числовое значение Expression не попадает в диапазон допустимых значений, происходит ошибка стадии выполнения Overflow.
Если Expression имеет тип данных String,то он должен быть числом,иначе возникает ошибка стадии выполнения Type mismasth.
Если дробная часть Expression равна 0.5, CLng всегда округляет его до ближайшего четного числа, т.е. CLng(0.5)=0, a CLng(1.5)=2
Пример
Dim A,retval
A=1234.5678 ' A имеет тип Double
retval = CLng(A)' преобразуем в Long
Debug.Print retval ' получаем 1235
Категория
Функции преобразования типов данных