编写程序,计算1到100之间所有质数的和（数学题）
问题描述：
编写程序,计算1到100之间所有质数的和（数学题）
答
Public Sub qqqqq()Dim i As IntegerDim j As IntegerDim s As IntegerDim C As Booleans = 0For i = 2 To 100C = FalseFor j = 2 To i - 1If i Mod j = 0 ThenC = TrueExit ForElseEnd IfNextIf C = False Thens = ...