以下程序是在弹出的输入框中输入一个正整数,找出大等于该数的第一个素数。 本大题共 4 处错误。注意:不得增删语句,不得修改程序结构。) Private Sub Commandl_Click() Dim i As Integer,x As Integer,y As Integer,flag As Boolean (1) flag =True (2)x=Input (”请输入一个正整数”,”输入正整数”) (3)y=x (4)Do While Not flag (5) For i =2 To x-1 (6) If i Mod x =0 Then Exit For (7) Next i (8) Ifi>x -1 Then (9)x=x+l (10) Else ( 11) flag= True (12) End If (13) Loop (14) Print ”大等于” &Str(y)& ”的第一个素数是:” & Str(x) End Sub