几道计算机的题:1,以下程序计算2到50间所有偶数的和,请补充完该程序,
Submult()
DimSumAsInteger
Sum=0
DimIasinteger
For___to50
IfIMOD2=___Then___
NextI
Printsum
EndSub