题目

如果两个质数的差为2，则这两个质数称为孪生质数对；编写VB程序，实现如下功能：单击“显示孪生质数对”按钮Command1，在列表框list1中显示100以内的所有孪生质数对(运行效果如图所示)。实现上述功能的VB代码如下, 但划线处代码有错，请改正。Dim a(1 To 50) As IntegerPrivate Sub Command1_Click()Dim i As Integerk = 0: i = 3Do While i <= 100   If  ① prime(i)   Then      ‘⑴      k = k + 1      a(k) = i   End If      i = i + 2LoopFor i = 2 To k   If   ②a(i) = a(i +1)+2   Th点（﹣2，3）关于y轴的对称点的坐标是___________．