【正确答案】【操作步骤】
步骤1：打开考生文件中的本题工程文件sjt5.vbp，在代码编辑窗口，编写对应的过程语句。
参考代码：
Private Sub Command2_Click()
Dim x1 As Integer, y As Integer
x1 = Text1.Text
y = x1 + 1
Do
If isprime(y) = True Then
Text3.Text = y
Exit Do
Else
y = y + 1
End If
Loop
y = x1 - 1
Do
If isprime(y) = True Then
Text2.Text = y
Exit Do
Else
y = y - 1
End If
Loop
End Sub
步骤2：运行程序，单击“读入数据”按钮，然后单击“找素数”按钮，则找出一对相邻素数a、b，最后单击“存盘”按钮。
步骤3：按要求将文件保存至考生文件夹中。