VBS(VBScript)サポート&サンプルTOPへ

PR

関連書籍PR

カテゴリ

姉妹サイトリンク

VBS(VBScript)によるアークタンジェント(ラジアン)の値を返す関数を紹介

アークタンジェント(ラジアン)の値を返す関数 atn(A) :A は数値(直角三角形の高さを底辺で割った値)

サンプルソース


Dim x,a,b
x = atn(1)   '45度を想定
a = x * 180 / 3.1415926535897   'ラジアンから角度を出す
b = cint(a)   '整数値で約の値にした(無理やり)
MsgBox(b)



  

戻る




Copyright (C) VBS(VBScript)サポート&サンプル by wannko All Rights Reserved.
お問合せ先 ⇒ nachiko★wannko.net(★を@に変更して下さい。)