Объявление Желаете разместить объявление в рассылке или у вас интересная новость, тогда пишите, рассмотрим.
Тематика, не обязательно программирование - новости, юмор, интересное, статьи на любую тему.

В гостевой было замечание многие ссылки не работают - особенно на статьи так что ж вы молчите напишите на почту и я буду проверять - с какой страницы на какую нет перейти. А так ошибки и останутся ошибками

У кого все нормально работает - к вам большая просьба напишите мне нужно понять у какого процента посетителей сайт работатет не коректно

Вопросы:
1. Как из формы одной базы перейти на форму другой базы? Ответить
2. Как сделать так, чтобы при изменении размера формы, изменялись соответственно размеры объектов на форме, в частности размеры текстбокса? Ответить
Задайте ваш вопрос и отвечайте если знаете ответ на другие

Что такое выражения мы узнали. Настало время вспомнить, что же такое оператор?

Операторы

Здесь опять вспомним школу. Помните простые арифметические операторы? Такие как сложение, деление, вычитание, умножение. В Visual Basic они тоже есть. И их с лёгкостью можно использовать. Давайте рассмотрим пример из предыдущего урока:

c = 5 + 5 * 2

В выражении 5 + 5 * 2 используются 2 оператора: + и *. Их действия очевидны - сложение и умножение. Так же, как и в алгебре, здесь действует принцип приоритетов. Он заключается в том, что каждый оператор имеет свой приоритет. Например, умножение имеет больший приоритет, чем, скажем, сложение. Поэтому результат такого выражения не 20, а 15. Приоритет можно указать явно, поставив в нужной части выражения круглые скобки:

c = (5 + 5) * 2

Теперь результат выражения - 20, т.к. сначала выполнится оператор сложения и только потом умножение.

Помните на предыдущем уроке мы использовали Not, для отрицания . Так вот - Not - это тоже оператор, только не арифметический, а логический.

Операторы бывают разные:

В Visual Basic операторы бывают следующих типов:

• Арифметические:
  
  • ^ оператор возведения в степень.
  • * оператор умножения.
  • / оператор деления
  • \ оператор целочисленного деления
  • Mod оператор вычисления остатка от деления
  • + оператор сложения
  • - оператор вычитания
    
• Сравнения:
  
  • < меньше
  • > больше
  • <= меньше или равно
  • >= больше или равно
  • = равно
  • <> не равно
• Конкатенации:
  
  • + оператор конкатенации
  • & оператор конкатенации
• Логические:
  
  • And оператор логического умножения
  • Eqv оператор логической эквивалентности
  • Imp оператор логической импликации
  • Not оператор логического отрицания
  • Or оператор логического сложения
  • Xor оператор логического исключающего сложения
    

Функция Cos

Функция Cos вычисляет косинус угла. Аргумент задается в радианах, а не в градусах! Для того, чтобы перевести градусы в радианы используйте формулу
Угол(в радианах) = угол(в градусах) * pi/180, где pi=3.14159265358979. См. пример

Функция возвращает величину с типом данных Double, лежащую в диапазоне от -1 до 1

Number

Обязательный аргумент представляет собой значение типа Double, задающее угол в радианах. Если аргумент не может быть оценен как число, генерируется ошибка времени исполнения Type mismatch

Dim MyAngle, retval, GradToRad
Const pi = 3.14159265358979 ' определяем константу pi
MyAngle=90 ' задаем угол в градусах
GradToRad=MyAngle*pi/180 ' переводим градусы в радианы
retval=Cos(GradToRad) ' вычисляем косинус прямого угла
Debug.Print retval

Категория
Тригонометрические функции