对这个问题的回答包含你的问题。朋友
莞而嫣笑
|浏览7次
来自：手机知道
编程语言编程
用VB语言实现哥德巴赫猜想功能.验证200以内的正偶数都能分解为两个素数之和
PrivateSubForm_Click()
Fori=4To200Step2
Forj=2Toi
IfNotprime(j)AndNotprime(i-j)Then
Printi;"=";j;"+";i-j
ExitFor
EndIf
Nextj
Nexti
EndSub
PrivateFunctionprime(ByValx%)AsBoolean
Fori=2ToSqr(x)
IfxModi=0Then
prime=True
ExitFor
EndIf
Next
EndFunction
