【正确答案】正确答案:步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码。 参考代码: Dim i As Integer Dim n As Inteqer n=Val(Text1.Text) If n Mod2<>0Then MsgBox"请输入偶数!" Exit Sub End If For i=2To n/2 If IsPrime(i)And IsPrime(n-i)Then Label1.Caption=i Label2.Caption=n-i Exit For End If Next 步骤2:按<F5>键运行程序,在文本框中输入23456,单击“分解为”按钮。 步骤3:按要求将文件保存至考生文件夹中。