UC知道VB编程,请求援助
来源：百度知道 编辑：UC知道 时间：2024/05/15 10:55:25
两道计算机作业,是VB编程题,要交了,请知道的朋友帮个忙m(_ _)m
设S=1×2×3×…×n,求S不大于400000时最大的n
利用随机函数产生20个50到100范围内的随机整数,显示它们的最大值,最小值和平均值
2007年5月29日上午11:30前要交,急求!!!!!做好后请发送到我的邮箱xiumufeizhen@21cn.com,然后在提问后作答通知我
看到完成的作业后我会把分加给您,谢谢
也可以把程序代码贴上来
设S=1×2×3×…×n,求S不大于400000时最大的n
利用随机函数产生20个50到100范围内的随机整数,显示它们的最大值,最小值和平均值
2007年5月29日上午11:30前要交,急求!!!!!做好后请发送到我的邮箱xiumufeizhen@21cn.com,然后在提问后作答通知我
看到完成的作业后我会把分加给您,谢谢
也可以把程序代码贴上来
已发了
去查看就好了~
Private Sub Form_Load()
Dim s As Double
s = 1
For i = 1 To 1000
s = s * i
If s > 400000 Then
Text1.Text = (i - 1) & ""
Exit Sub
End If
Next
MsgBox "无结果"
End Sub