Sqr関数 - xxxikotobaxxx @ ウィキ

Sqr関数

---

構文
Sqr(num)
引数numには、任意の数式を指定します。

解説
引数numで指定された数値の平方根を返します。
引数numには、０以上の数値を指定します。

サンプル
次の例は、ユーザーが入力した数値の平方根を表示します。

Sub Sample()

   Dim num As Integer
   num = InputBox("数値を入力してください")
   MsgBox Sqr(num)

End Sub

---

Dim MySqr
MySqr = Sqr(4) '2 を返します。
MySqr = Sqr(23) '4.79583152331272 を返します。
MySqr = Sqr(0) '0 を返します。
MySqr = Sqr(-4) '実行時エラーが発生します。