关闭广告
晋江论坛→网友交流区→电脑扫盲班
主题：看看这个程序（拜托） [2]
收藏该贴
已收藏
只看楼主
Private Sub Command1_Click()
For k = 1 To 2
GoSub 70:
s = s + k
Next k
Print s; k
Exit Sub
70: k = k * (k + 1)
s = 6
Return
End Sub
 
 
 
 
答案是  8  3
我做的是  12   3  （是不是循环执行一次？？）
 
谢了！！
№0 ☆☆☆救命 于2003-10-12 12:33:24留言☆☆☆　 加书签 不再看TA
Hi, I think the loop will go twice. First is k=1, and then k=2. If you want the loop goes only once, you have to revise this sentence in the program.
For k=1 To 1.
№1 ☆☆☆Laura于2003-10-14 00:15:29留言☆☆☆　
加书签 引用 不再看TA
 
k = 1
Forloop:
    If k
№2 ☆☆☆Frenzy Shi于2003-10-14 06:55:19留言☆☆☆　
加书签 引用 不再看TA

回复此贴子

名字：
选择图案：
内容：
（注意：一次最多可提交3000字，且一次最多可提交三张尺寸在1024*1024范围内的图片，超出部分请分次提交！）
图片链接：
(贴图规则)


返回上层 管理 返回本版块首页←返回交流区首页←返回主页

 

只看楼主