如果我要查询,一年级、二年级、三年级代码是这样吗?加载不了。请指点谢谢!
For Each dr As DataRow In DataTables("学生缴费信息").DataRows
If DataTables(学生成绩").Find("学期='" & dr("学期") & "' and 年级='" & dr("年级") & "' and 班级 = '" & dr("班级") & "' and 学生编号 = '" & dr("学生编号") & "' and 学生姓名 ='" & dr("学生姓名") & "'") Is Nothing Then
If dr("年级")="‘一年级’,‘二年级’,‘三年级’" Then
Dim dr2 As DataRow = DataTables("学生成绩").AddNew
dr2("学期")=dr("学期")
dr2("年级")=dr("年级")
dr2("班级")=dr("班级")
dr2("学生编号")=dr("学生编号")
dr2("学生姓名")=dr("学生姓名")
End If
End If
Next
[此贴子已经被作者于2013-4-15 9:38:29编辑过]