以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]为什么无法给表字段赋值呢？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=11485)
--  作者：新福星
--  发布时间：2011/7/30 5:28:00
--  [求助]为什么无法给表字段赋值呢？

"往来帐汇总"这个表是个内部数据；zd定义的是一个字典；MessageBox.Show语句显示是正常的；但是运行到dr("商家编码")=k语句就出错了，见下面错误。什么原因呢？请老师指点。

 

 

Dim i As Integer
For Each k As String In zd.Keys \'显示所有键及其对应的值
     Dim dr As DataRow = DataTables("往来帐汇总").AddNew()
       i=zd(k)
    MessageBox.Show(k & "|" & s0(i) & s1(i) & s2(i) & s3(i))
    dr("商家编码")=k
    dr("应付款")=s0(i)
    dr("应收款")=s1(i)
    dr("付款")=s2(i)
    dr("收款")=s3(i)
Next
--  作者：e-png
--  发布时间：2011/7/30 9:03:00
--  
dr("商家编码")= \'k\' 
--  作者：新福星
--  发布时间：2011/7/30 18:50:00
--  
问题找到了.我犯了个错误,新建表时,列名没有改,只改了标题名;纠正之后正常之!