主题：[求助]IF语句的问题

If e.Form.Controls("TextBox49") > " " Then 

For Each dr1 As DataRow In DataTables("行政案件1").Select("[案件编号] > =" & Val(Forms("录入窗口").Controls("TextBox49").Text))
    Dim dr2 As DataRow = DataTables("行政案件").AddNew()
    For Each dc As DataCol In DataTables("行政案件1").DataCols
        dr2(dc.Name) = dr1(dc.name)
    Next
Next
 End If

  帮我检查一下上面代码问题出现在那？