Question

求教如何用VB编写 程序 计算1*2*3……100的值？

Answer 1

dim sum as single
dim i as integer

Private Sub Command1_Click()
sum=1
for i=1 to 100
sum=sum*i
next i
print sum
End Sub

Answer 2

n=1
for i=1 to 100
N=N*i
next