刚入门求怎么计算(用for i) - vb吧

level 5

ecfanqie 楼主

两个label 一个按钮
5*4*3*2*1= label2:(显示答案)
计算按钮

2020年12月01日 08点12分 1

level 10

qfcy

代码:
Private Sub Command1_Click()
Dim i, n As Integer
n = 1
For i = 1 To 5
n = n * i
Next i
Label2.Caption =
Str(n)
End Sub
还有源码下载地址: [无效] https://pan.baidu.com/s/160wGWX_3pYEYTs-aoNjnzw 提取码: rg3m

2020年12月01日 10点12分 2