（VBA）正方形の等価性 - サブ関数が定義されていません

私はuniで私の運動テストのいくつかの問題に直面していますが、いくつかのコードを編集した後、何か問題があるようです。（VBA）正方形の等価性 - サブ関数が定義されていません

Public Function Uzd(x) As String 
    If x = 1 Or x = 2 Then 
     Uzd = (2 * x + 3)/sqrt(x^2 + 3 * x + 2) 
    Else 
     Uzd = "Incorrect data" 
    End If 

End Function

私が手のコードを実行した後 - Mathモジュールでは、

出典

2016-10-05 Anete Brenčuka

'sqrt'は' Sqr'でなければなりません。 – Comintern

C++ [sqrt]（https://msdn.microsoft.com/en-us/library/f1xa99e6.aspx）関数をVBAの[sqr]（https://msdn.microsoft.com/en）と混同しているようですが、 -us/library/aa263367.aspx）関数を使用します。 – Jeeped

パブリックsub Uzd（xは整数）as Integer x = 1またはx = 2ならば Uzd =（2 * x + 3）/ sqrt（x^2 + 3 * x + 2） Else msgbox "正しくないデータ " 終了場合終了サブ – Ary

あなたはVBAタイプライブラリに配置されて使用しようとしている機能定義されていないSubまたは機能：

Object Browser

IntelliSenseを使用し、使用するグローバルスコープ機能を完全修飾することで、このような誤植を避けることができます。

Uzd = (2 * x + 3)/Math.Sqr(x^2 + 3 * x + 2)

IntelliSense

出典

2016-10-05 16:09:42

（VBA）正方形の等価性 - サブ関数が定義されていません

答えて

関連する問題