zjdzjd看~

Question

如果按你（您）所说，只需改动上面内容两处即可！
1,if处加入判断text32是否为空，如下：
If Text31.Text <> "" And Text32.Text <> "" Then
2,rs.open 处加入判断套号，如下：
rs.Open "select * from 试卷集 where 试卷号='" & Text31.Text & "' and 套号='" & Text32.Text & "'", cn, 3, 1
+++++++++++++
如有什么问题，就在这里讨论！
up!

Answer 1

我已经改过了，还是不能通过。
rs.Open "select * from 试卷集 where 试卷号='" & Text31.Text & "' and 套号='" & Text32.Text & "'", cn, 3, 1
总说“编译错误，缺少语句结束”，我以前也就是这里出问题。我弄了很长时间就是搞不明白，你能再看看吗？
麻烦你把新改过的调试好给我吧。再次感谢你的帮助

Answer 2

考生的答案都在表Ttestresult里的。