我要做一个单选题测试程序，实现的功能是：1.记录答题者的答案2、列出错误题3，得出总分，我应该怎么做呢，请各位大虾们帮助，本人刚学习这个还不太会？
现在已经从一个单选 题表中选出50道生成一个临时表cs，做了一个表单显示题和选项，单选题表的结构为 （ 题号 题目 选项A 选项B 选项C 选项D 正确答案）本人主要是不会如何记录答题者的答案，及重新选择某一题的答案的记录，希望大家给矛帮助，谢谢！

可以用一个表来记录，基本的字段可以有：
日期     记录考试的日期
考试者   记录考试者的姓名或者编号，记录姓名时要考虑同名的问题，记录编号时要另建一个编号姓名对照表
试题编号 记录题库中的编号，便于从题库中检索到相应的试题
标准答案 记录正确的答案
分值     记录该题的满分分值
实际答案 记录应试者的答题答案
得分     记录应试者的实际得分

其他字段就根据需要添加。

用SELECT语句就行了

(1)新建一个表单，添加标签1个、选项按钮组1个、命令按钮组1个，布局好
(2)Init事件的代码
CLOSE ALL
IF FILE('cs.dbf')
  USE cs.dbf
ENDIF
ThisForm.Refresh
(3)Refresh事件代码
ThisForm.Label1.Caption='第'+题号+'题：'+题目
ThisForm.OptionGroup1.Option1.Caption='A.'+选项A
ThisForm.OptionGroup1.Option2.Caption='B.'+选项B
ThisForm.OptionGroup1.Option3.Caption='C.'+选项C
ThisForm.OptionGroup1.Option4.Caption='D.'+选项D
ThisForm.OptionGroup1.Value=AT(答题,'ABCD')
()>1
()>1
()<RECCOUNT()
()<RECCOUNT()

(4)命令按钮组Click代码
DO CASE
CASE This.Value=1
  GO TOP
CASE This.Value=2
  SKIP -1
CASE This.Value=3
  SKIP
CASE This.Value=4
  GO BOTTOM
CASE This.Value=5
  *这个是显示答题结果的部分，用messagebox()显示即可，答题对的：标准答案=答题
CASE This.Value=6
  ThisForm.Release
ENDCASE
ThisForm.Refresh
(5)选项按钮组Click代码
replace 答题 WITH SUBSTR('ABCD',This.Value,1)

谢谢你，