楼主,帮你分析了下
cmd.CommandText = "Select * From {tb1}"Dim dt As DataTable = cmd.ExecuteReader(True)
'上述代码生成的dt并不是DataTables("tb1")
'所以下面一行代码是错误的:
Dim dr As DataRow = DataTables("tb1").DataRows(0)
提示:动态生成的dt是不能命名的。
如果是其他问题,我暂时还没升级到2013,所以没下载附件帮你测试