Dim cnt as integer = dataTables(表名").DataRows.Count
'导入
cnt = dataTables(表名").DataRows.Count - cnt
messagebox.show('导入行数:" & cnt)
加好友 
发短信
Post By：2012/4/23 7:30:00 [显示全部帖子]
