Помогите с VB 6

Discussion in 'Программирование' started by Bazilio, Oct 23, 2007.

  1. Bazilio

    Bazilio Новичок

    17
    0
    Как сделать чтобы тригонометрические функции в Visual Basic задавались не радианами а углами?
    Есть у кого нибудь полный перечень команд, констант и др используемых в VB?
     
  2. dj

    dj Активный участник

    1,088
    23
    Cos
    Синтаксис:

    Cos(Number)

    Описание:

    Функция вычисляет косинус угла.

    Параметры:
    Number - любое численное выражение типа Double задающее угол в радианах.

    Замечания:

    Для пересчета радианов в градусы необходимо умножить значение в радианах на 180/pi. Для пересчета из градусов в радианы - значение в градусах умножить на pi/180. Число pi = 3.141593.

    Возвращаемое значение:

    Возвращает значение типа Double в диапазоне от -1 до 1.

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

    по второму вопросу в яндексе за 5 сек находится, например, vbstreets.ru
     
    Last edited: Oct 24, 2007
  3. Bazilio

    Bazilio Новичок

    17
    0
    Благодарю за подробное объяснение!!