Question

做了一个关于IQ测试题的vb小程序，一个窗体一道题，在结束测试时想在最后的窗体中显示做题人每道题的答案

这是我在最后窗体写的

If Form2.Command4.Click = True Then Picture1.Print "D √"
If Form2.Command1.Click = True Then Picture1.Print "A ×"
哪里错了呢，总是不对

Answer 1

你这个Form2.Command4.Click = True是什么意思啊？

我觉得你可以在主窗体中见一个static变量，用来保存每道题的答案，然后在最后窗体上引用这个变量来打印答案，不就可以了！
望采纳！

追问

具体怎么声明呢，初学vb，不要太复杂，谢谢

追答

在主窗体上直接定义一个数组吧static a() as interger，比如他做第一题对的话就把a(1)的值赋予1，否则就赋予0，依次下来，这样的话我们就会得到一个数组，里面就是0和1的组合，那我们在最后一个窗口就对这个数组进行判断，一个一个判断，如果是1就在picture1上打印对勾，否则就是叉。
for i=1 to 10 ‘根据你的题数定义范围
if a(i) =1 then ’判断存储的数值
picture1.print i & "√" ’题目答对了，给出题号然后打勾
else
picture1.print i & "×" ’题目答错了，给出题号然后打叉
end if
next
望采纳！