第一问答网»论坛 › 中问网 › 问答 › 一道VB程序选择题，各位帮忙看看啦！

一道VB程序选择题，各位帮忙看看啦！

11 |

1 | 2009-7-16 08:47:59 | 显示全部楼层 |阅读模式

【程序说明】执行Command1_Click，输入n（若n12则重新输入）后计算下式的值。

Private Function fact( (1)
n As Integer) As (2)

fact = 1

Do While n > 1

fact = fact * n∶ n = n - 1

Loop

End Function

Private Sub Command1_Click()

Dim s As Single, i As Integer

Do

n = InputBox("112
(
)
(4) A. s=1/fact(i)B. s=s+1/fact(n)
C. s=s+1/fact(i)D. s=1/fact(n)
(
)

使用道具举报