7,788
社区成员
发帖
与我相关
我的任务
分享偶又可耻的来问问题鸟！循环问题！
偶是初学者，对vb算法和程序布局还不了解，看书上说的也不明白，很多程序写不具体，所以想参考有经验高手写的来迅速提高一下子。
就是要做一个答题程序，一道题满分10分，有三次机会回答。第一次答对满分，第二次8分，第三次6分，如果三次全错给出答案，给0分。
还可以定个答题时间限制的。
受教了！
就是要做一个答题程序，一道题满分10分，有三次机会回答。第一次答对满分，第二次8分，第三次6分，如果三次全错给出答案，给0分。
还可以定个答题时间限制的。
受教了！
...全文
请发表友善的回复…
发表回复
熊孩子开学喽 2004-12-31
- 打赏
- 举报
确实不难，不过要特地写程序出来就不是那么一句两句能写完的。
楼主不妨自己先做做看，遇到具体的问题再来问吧。
楼主不妨自己先做做看，遇到具体的问题再来问吧。
51365133 2004-12-31
- 打赏
- 举报
哈哈，对不起，我好象也不会，不妨你会了留个答案给我们吧！！！
apple_001 2004-12-31
- 打赏
- 举报
假如在command的click中开始检验是否正确，则在click事件中
if not 真确 then
i =i+1
if i=3 then
i=0
进入下一题
exit sub
end if
else
if i=0 then
10分
i=0
elseif i=1 then
8分
i=0
elseif i=2 then
6分
i=0
end if
进入下一题
end if
i 为全局变量
if not 真确 then
i =i+1
if i=3 then
i=0
进入下一题
exit sub
end if
else
if i=0 then
10分
i=0
elseif i=1 then
8分
i=0
elseif i=2 then
6分
i=0
end if
进入下一题
end if
i 为全局变量
Yaka 2004-12-30
- 打赏
- 举报
dim i as Integer
i=0
答错i=i+1
if i = 0 then 10分
if i = 1 then 8分
if i = 2 then 6分
把i返回0
i=0
答错i=i+1
if i = 0 then 10分
if i = 1 then 8分
if i = 2 then 6分
把i返回0
creazyfish 2004-12-30
- 打赏
- 举报
???
aohan 2004-12-30
- 打赏
- 举报
？？
flyingscv 2004-12-30
- 打赏
- 举报
可耻的接分鸟！
ljhdi 2004-12-30
- 打赏
- 举报
本来还想答的
看了一下回复……晕！！！
看了一下回复……晕！！！
bboos 2004-12-30
- 打赏
- 举报
楼主快跑路吧,版主会发飚的!!
dongge2000 2004-12-30
- 打赏
- 举报
呵呵
Fashionxu 2004-12-30
- 打赏
- 举报
像是作业。小心……
dongle2001 2004-12-30
- 打赏
- 举报
timer+全局变量
砸死牛顿的苹果 2004-12-30
- 打赏
- 举报
不是你的作业吧
