Question

用VB统计sql数据库中两列数据中相同数据的数目

我写的代码不执行
For fs = 1 To rs.RecordCount - 1
If rs.Fields("题目答案").Value = rs.Fields("学生答案").Value Then
fenshu = fenshu + 1
Else: fenshu = fenshu
End If
Next fs

Text3.Text = fenshu

End Sub

Answer 1

用vb我一般偷懒用data控件。
不过你这个明显有问题
看这句：
rs.Fields("题目答案").Value = rs.Fields("学生答案").Value

你的fs哪里去了？没有fs怎么判定是哪一行数据比较？

还有这句
Else: fenshu = fenshu

这句没必要，完全可以删掉。因为不执行本身就是fenshu=fenshu 啊

Answer 2

想法不错，可是方法错了，至少应该有sql语句啊，

追问

...说点重点 能没有sql语句吗