【正确答案】正确答案：【操作步骤】 步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，在代码编辑窗口的指定位置编写以下代码 参考代码： Dim i As Integer Dim n As Integer n＝Val(Text1．Text) If n Mod 2 ＜＞ 0 Then MsgBox"请输入偶数!" Exit Sub End If For i＝2 To n／2 If IsPrime(i)And IsPrime(n－i)Then Labe11．Caption＝i Labe12．Caption＝n－i Exit For End If Next 步骤2：按＜F5＞键运行程序，在文本框中输入 步骤3：按要求将文件保存至考生文件夹中。