窗体中编写命令按扭的Click事件代码??(vb)

在窗体上输出1到200之间所有的奇数,要求每行输出10个数
2025-01-31 13:01:17
推荐回答(3个)
回答1:

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
在手机上输的代码,没排版。
你粘贴后自己调整下。

回答2:

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

回答3:

一瓢江湖我沉浮 我寻你千百度 又一岁荣枯