Dim dr As DataRowDim xn As String="2006-2007学年" dr= DataTables("考试").Find("学年 = '2006-2007学年'") '检查相同学年If dr isnot Nothing Then output.Show(dr("学年"))End If
上面的我改成
find("学年=" & xn)
或find("学年= xn")
都不行