VB编写程序 计算1~100内3的倍数的数的和
问题描述：
VB编写程序 计算1~100内3的倍数的数的和
答
dim x as integer,dim sum as integer
for x=1 to 100
if x mod 3 =0 then
sum=sum+x
end if
next x
print sum