主题：[求助]这句代码如何写

两个表，A和B,在A表中的datacolchanged 事件中，写如下代码：dim dr as datatables("B").datarows()

电脑信息给出错误显示，通不过。现在我要用dr来引用B表中的行，这句代码如何编写呢？

If e.DataCol.name="单价" Then
    Dim dr As Object = DataTables("订单").datarows
    If dr("合同模式") = "销售"  Then
     e.DataRow("单价") = dr("单价")  
     e.DataRow("附加费") = dr("附加费")
   End If
End If

运行时，出现如下提示

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.8.12.1
错误所在事件：表，订单主表，DataColChanged
详细错误信息：
调用的目标发生了异常。
从字符串“合同模式”到类型“Integer”的转换无效。
输入字符串的格式不正确。

这是什么原因？

我明白了，谢谢两位大大