[求助]Dim dr As DataRow =dt.DataRows(0) 报错，应怎么写正确？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]Dim dr As DataRow =dt.DataRows(0) 报错，应怎么写正确？

共有2960人关注过本帖树形打印复制链接主题：[求助]Dim dr As DataRow =dt.DataRows(0) 报错，应怎么写正确？

ytzn

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：441 积分：3872 威望：0 精华：0 注册：2012/10/12 5:20:00

[求助]Dim dr As DataRow =dt.DataRows(0) 报错，应怎么写正确？ 发帖心情

Post By：2015/9/4 15:39:00 [只看该作者]

Dim cmd As New SQLCommand

cmd.C

cmd.CommandText = "select top 1 * f rom {物资每日库存} where 物资编码 = 'aaa-0003' And 日期 < '2015-09-04' order by 日期 Desc"

Dim dt As DataTable

dt = cmd.ExecuteReader()

Dim dr As DataRow =dt.DataRows(0)

表{物资每日库存}未加载

多谢！！！

此主题相关图片如下：qq截图2015090415.png

ytzn

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：441 积分：3872 威望：0 精华：0 注册：2012/10/12 5:20:00

Post By：2015/9/4 15:41:00 [只看该作者]

cmd.Connection Name = "wbkq"

第二行未显示全，重发

[此贴子已经被作者于2015/9/4 15:41:23编辑过]

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/9/4 15:42:00 [只看该作者]

代码没问题的。

出错，说明返回的dt没有任何数据，判断一下

If dt.DataRows.Count > 0 Then

Dim dr As DataRow =dt.DataRows(0)

End If

ytzn

小大 4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：441 积分：3872 威望：0 精华：0 注册：2012/10/12 5:20:00

Post By：2015/9/4 15:44:00 [只看该作者]

多谢！

主题：[求助]Dim dr As DataRow =dt.DataRows(0) 报错，应怎么写正确？