以下能够正确计算n!的程序是:
A、Private Sub Commandl_ClicK() Dim n as integer, x as Integer n=5:x=1 Do x=x*i i=i十1 Loop While i<n Print x End Sub
B、Private Sub Commandl_Click() Dim n as integer, x as Integer n=5: x=1:i=1 Do x=x*i i=i十1 Loop While i<n Print x End Sub
C、Private Sub Commandl_Click() Dim n as integer, x as Integer n=5:x=1:i=1 Do x=x*i i=i十1 Loop while i<=n print x end sub> D、Private Sub Commandl_C1ick() Dim n as integer, x as Integer n=5:x=1:i=1 Do x=x*i i=i十1 loop While i>n Print x End Sub