Private Sub 乎亩拿Form_Click()Dim p As Long, n As Integer, i As Integerp = 1n = Val(InputBox("input 耐老n", , 5))For i = 1 To 岁搭n p = p * iNextPrint pEnd Sub
VB 计算阶乘
Simone
发布于 2023-03-14 15:54:04
631 阅读
