当前位置: 高中信息技术 / 综合题
  • 1. (2019高二上·杭州期末) 用VB编写寻找自然数中第n个素数的程序,具体功能如下:在文本框Text1中输入正整数n,单击“寻找”Command1按钮后,在Label1中显示结果。程序运行界面如下图所示。

    1. (1) 程序启动后,窗体的标题栏显示“寻找第n个素数”,Form_Load事件处理过程中应添加语句            (单选,填字母)
      A . Form1="寻找第n个素数" B . Form1.Name="寻找第n个素数" C . Form1.Caption="寻找第n个素数" D . Form1.Text="寻找第n个素数"
    2. (2) 请在下划线处填入合适的代码

      Private Sub Command1_Click()

        Dim n As Integer, i As Integer

        Dim s As Integer, x As Integer, f As Boolean

        n= Val(Text1.Text)

        f= False: s=0

        i=2

        Do While    ①  

          For x=2 To i\2

            If i Mod x=0 Then Exit For     ‘Exit For用于退出For循环

          Next x

          If    ②    Then

            s=s+1

            If  Then      ‘③

              Label1.Caption= "第"& Str(n) & "个素数为:"& Str()

              f= True

            End If

          End If

          i=i+1

        Loop

      End Sub

       ② 

    3. (3) 加框处代码有错误,请改正。

微信扫码预览、分享更方便