1、勾叉都是字符。√×
你从上行复制到程序里就可以。

2、输入答案后，应该是点“确定”按钮，把题目、答案写道上面的标签（也许是文本框？列表？图片框？）。
如果做对了，附加一个对号，并对一个全局变量（用来记录做对的题目数的）加1；做错了，附加一个错号。
总题数加1。

请将第1点的解答再讲详细点儿，谢谢！如果能提供几句代码就更好了，这用的是标签控件。[em12]

'假定label1写的是题目，text1输入的是答案，x保存的是正确答案。
Dim 题目数 As Integer, 正确数 As Integer

Private Sub Command1_Click()
    Label2 = Label2 & Label1 & Text1 & "          "
    If Val(Text1) = a Then
        Label2 = Label2 & "√"
        正确数 = 正确数 + 1
    Else
        Label2 = Label2 & "×"
    End If
    题目数 = 题目数 + 1
    Text2 = 题目数
    Text3 = 正确数
    Text4 = 题目数 - 正确数
    Text5 = Int(正确数 * 100 / 题目数 + 0.5) & "%"
End Sub

当然更好的时text2~text5应该也不使用textbox而是使用标签

[em2]多谢指点!