systemready = False DataTables("number").StopRedraw DataTables("number").DataRows.Clear For Each dr As Row In Tables("ployee").Rows Dim dra As Row = Tables("number").Rows.AddNew() For Each c As Col In Tables("number").Cols dra(c.name) = dr(c.name) Next Next DataTables("number").ResumeRedraw systemready = True
加好友 
发短信
Post By：2016/5/19 12:30:00 [显示全部帖子]
