2. 计算机
  3. 在窗体上画1个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Commandl C1ick() Dim mAs Integer，x As Integer Dim flag As Boolean

在窗体上画1个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Commandl C1ick() Dim mAs Integer，x As Integer Dim flag As Boolean

admin2011-04-29  39
问题 在窗体上画1个名称为Commandl的命令按钮，然后编写如下程序：
    Private Sub Commandl C1ick()
    Dim mAs Integer，x As Integer
    Dim flag As Boolean
    flag=False
    n=Val(InputBox(“请输入任意1个正整数”))   
    Do While Not flag
    a=2
    flag=   
    Do While flag And a<=Int(Sqr(n))
    If n／a=n＼a Then
    flag=False
    Else
       
    End If
    Loop
    If Not flag Then n=n+1
    Loop
    Print    
    End Sub
    上述程序的功能是，当在键盘输入任意的1个正整数时，将输出不小于该整数的最小素数。请填空完善程序。
选项
答案True a=a+1 n
解析
转载请注明原文地址:https://kaotiyun.com/show/unhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)