0

私は VBscript を初めて使用します。特定の数値の階乗を調べたいと思っています。私はこのコードを使用しています。これによりボタンが表示されますが、ボタンをタップしても何も起こりません。私を助けてください。

<html>
<head>
    <script type="text/vbscript">
        sub fact

        n=cint(inputbox("Enter a number"))
        dim f
        f=1
        if n<0 then
        msgbox "Invalid number"
        elseif n=0 or n=1 then
        msgbox "The factorial of given number "&n&" is :"&f
        else
        for i=n to 2 step -1
        f=f*i
        next
        msgbox "The factorial of given number "&n&" is :"&f
        end if
        end sub

        </script>
</head>
<body>
    <input type="button" onclick= "fact()" value="Factorial">
</body>

4

1 に答える 1