纠结了好一阵子啦，知识竞赛的小程序一直不成功，大神们帮帮我。

gzh00007

一直想做个小程序，能在按键的控制下，每次读取一行文本文件中的题目和答案。


可是一直不成功。


源码贴出来，大神们给我看看。

455720650

功能 按钮0_点击()
    线程句柄
     如果(线程句柄==null)
    线程句柄=线程.开启("知识竞赛.读取题目","")
    如果结束
    按钮.设置文本("按钮0","答案")     //改变按钮的文字为“答案”
    标签.设置文本("标签2","正确答案")
    i=1
功能结束



把点击这的改我这样试下  ,我刚刚试了可以,   不过超过你点击超过你设置的问题个数了之后  就会出现数组越界   ,有继续优化空间

pp5201210

1. 空间 知识竞赛
   
2. 返回串=数组[11],内容
   
3. 线程句柄=0
   
4. i=0
   
5. 功能 读取题目()
   
6.     题目=文件.打开("rc:\\题目.txt")
   
7.    
   
8. 循环(真)
   
9.     如果(i==0)
   
10.         内容=文件.读一行(题目)
    
11.         如果(内容!="")
    
12.             字符串.分割(内容,"|",返回串)
    
13.             标签.设置文本("标签0",返回串[0])  //显示题目
    
14.             标签.设置文本("标签1",返回串[1])   //显示选择项
    
15.            
    
16.         否则
    
17.             辅助.消息框("没有题目了")
    
18.             控件.有效("按钮1",假)
    
19.             返回 0
    
20.         如果结束
    
21.         i=1
    
22.       
    
23.     否则
    
24.         继续
    
25.         
    
26.         
    
27.     如果结束
    
28. 
    
29. 循环结束
    
30. 
    
31. 功能结束
    
32. 
    
33. 功能 按钮0_点击()
    
34.         //按钮.设置文本("按钮0","答案")     //改变按钮的文字为“答案”
    
35.         标签.设置文本("标签2","正确答案")
    
36.         如果(线程句柄==0)
    
37.         线程句柄=线程.开启("知识竞赛.读取题目","")
    
38.         如果结束
    
39.         
    
40. 功能结束
    
41. 功能 退出_点击()
    
42.     线程.关闭(线程句柄)
    
43.     辅助.退出()
    
44. 功能结束
    
45. 
    
46. 
    
47. 功能 按钮1_点击()
    
48. //这里添加你要执行的代码
    
49. 标签.设置文本("标签2","正确答案")
    
50. i=0
    
51. 功能结束
    
52. 
    
53. 
    
54. 功能 按钮2_点击()
    
55. //这里添加你要执行的代码
    
56. 标签.设置文本("标签2",返回串[2])
    
57. 
    
58. 功能结束
    
59. 
    
60. 空间结束
    

复制代码

pp5201210

添加了2个按钮 一个下一题 一个答案 附近上传了 需要的话看看

gzh00007

感谢！感谢两位的帮助，尤其是pp5201210的网友！我又学习了新的知识了！非常感谢！解决了一直萦绕我的困惑哦

gzh00007

回复 3楼pp5201210的帖子

太感谢你了！感谢你的乐于助人！谢谢！

gzh00007

回复 2楼455720650的帖子

谢谢你的回复！

gzh00007

大家的乐于助人，又让我燃起了继续用TC写更多功能的兴趣了！

zhkq

你应该采纳，这样就能燃气楼上的大侠们帮助别人解答的兴趣。