我执行了以下代码~

Dim t As Date = Date.Now
Dim i As Integer = DataTables("ProcessSchdule").DataRows.Count          \'大约50W行数据
Dim j As Integer = 0
Dim mf As Integer = 0
Dim tp As TimeSpan
For Each dr1 As DataRow In DataTables("processSpecLibrary").DataRows
    Dim TargetRowlist As List (of DataRow)
    TargetRowlist= dr1.GetChildRows("ProcessSchdule")
    For Each dr As DataRow In  TargetRowlist
        If dr("ProcessCode") = dr1("ProcessCode") Then
            dr("RFIDcode") = dr1("RFIDcode")
            dr("RFIDprice") = dr1("RFIDprice")
            dr("RFIDtime") = dr1("RFIDtime")
            mf = mf+1
        End If
        j=j+1
    Next
    Output.Clear()
 Output.Show("一共需要检索总数 " & i & " 项")
    Output.Show("已检索完成 " & j & " 项")
    Output.Show("已修改 " & mf & " 项")
    Dim s As Double = j/i
    Output.Show(s)
    Output.Show("完成度 " & Format(s,"Percent") )
    tp = Date.Now - t
    Output.Show("已花费时间 " & tp.TotalSeconds & " 秒")
 
Next

1、如果加载少量数据，比如100行、1000行，是否有问题？

2、加上systemReady后，是否有问题？ http://www.foxtable.com/webhelp/scr/2218.htm