dim i as long,k as long
me.cls
k=0
for i=1 to 200 step 2
k=k+1
print i;
if(k mod 10=0) then print
next
在手机上输的代码,没排版。
你粘贴后自己调整下。
P=0
FOR I=1 TO 200 STEP 2
IF I MOD 2<>0 THEN
PRINT I,
P=P+1
IF P=10 THEN
PRINT
P=0
ENIDIF
NEXT I
一瓢江湖我沉浮 我寻你千百度 又一岁荣枯