下列程序的功能是将text1中输入的自然数分解为3个互不相同的质数(三个质数的和等于输入的自然数)，并把分解产生的质数按升序顺序显示在左边的列表框中。例如，输入20，那么在列表框中会显示如图所示结果。其中，界面中“开始处理”按钮的名称是“Command1”，程序中函数f(x)的功能是判断x是否为质数，如果是质数则返回值为true，否则返回值为false。
请在下列程序代码的基础上按照要求设计该程序，完善程序中的划线部分。
Dim n As Integer, a1 As Integer, a2 As Integer, a3 As Integer
Function f(x as integer) As Boolean
f=True
For i=2 To Sqr(x)
If x Mod i=0 Then {#blank#}1{#/blank#}
Next i
End Function
Private Sub Command1_Click()
n={#blank#}2{#/blank#}
For a1=2 To n
For a2=a1 To n
For a3=a2 To n
If{#blank#}3{#/blank#}And f(a1) And f(a2) And f(a3) Then
List1.AddItem(Str(a1)+“ ”+Str(a2)+“ ”+Str(a3))
End If
Next a3
Next a2
Next a1
End Sub
