-- 作者:yuyijun2
-- 发布时间:2013/8/26 11:04:00
-- [求助]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
帮我检查一下上面代码问题出现在那?
|