Declare ステートメントで関数またはサブルーチンを宣言しましたが、次のいずれかが起きました。
Declare Function MyFunction(X As Integer, Y As Double) As Integer
' ...
Function MyFunction(X As Integer) As Integer ' Illegal because Declare
' ... ' specified two parameters
End Function
宣言と定義でパラメータの数が一致するように変更してください。
Declare ステートメントを削除するか、それに対応する Sub New を定義してください。