以下能够正确计算n!的程序是
A．Privas SubCommand1_Click() n=5：x=1Do x=x*i i=i+1 Loop While i＜n Print xEnd Sub
B．Private SubCommand1_Click() n=5：x=1：i=1Do x=x*i i=i+1 Loop While i＜n Print xEnd Sub
C．Private SubCommand1_Click() n=5：x=1：i=1Do x=x*i i=i+1 Loop while i＜=n Print xEnd Sub
D．Private SubCommand1_Click() n=5：x=1：i=1Do x=x*i i=i+1 Loop While i＞n Print xEnd Sub