Compilr错误：预期结束语句

Question

我是编程新手。我正在练习一些VB代码但是我在这个主题上提到了错误。

以下是代码

Function hypotenuse(ByVal a As Single, ByVal b As Single) As Single
Return Math.Sqrt((a ^ 2 ) + (b ^ 2))
End function

错误在返回表达式＆＃34; Math＆＃34;。

中突出显示

Answer 1

在VB6 / VBA中，函数的返回值变量名是函数名本身。

Function hypotenuse(ByVal a As Single, ByVal b As Single) As Single
    hypotenuse = Math.Sqr((a ^ 2) + (b ^ 2))
End Function