当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim m As Integer,x As Integer Dim flag As Boolean flag=False n=Val(InputBox("请输入任意1个正整数")) Do While Not flag a=2 flag= (7) Do While flag And a<=Int(Sqr(n)) If n/a=na

  

参考答案:

a=a+1

  参考解析

微信端