Vb Do While循环怎么用？
从键盘输入n,要求n是小于30的自然数,若不符合条件重新输入直到符合条件为止.计算n!(n!=1*2*3*4…*n)，要求用窗体单击完成。（用DOwhile循环完成）...
从键盘输入n,要求n是小于30的自然数,若不符合条件重新输入直到符合条件为止.计算n!(n!=1*2*3*4…*n)，要求用窗体单击完成。（用DO while 循环完成）
展开
1个回答
展开全部
Private Sub Command1_Click()
Do
n = CInt(InputBox("请输入一个小于30的自然数："))
Loop While n < 0 Or n >= 30
MsgBox ("OK，输入的数是：" & n)
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
