Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:类“datatable”没有默认属性,因此无法被索引

1楼
g1j2h3 发表于:2024/9/24 16:51:00
麻烦大师看一下,下边代码错在哪里,
Dim Vals As List(Of String())
Vals = DataTables("库存表_Table1").GetValues("商品类别|商品编号|商品名称|规格型号|单位|期初库存数量|入库数量|出库数量|库存数量")
If DataTables("库存表").Find("商品编号 = '" & dt("商品编号") & "'") Is Nothing Then
    For i As Integer = 0 To Vals.Count - 1
        Dim dr As DataRow = DataTables("库存表").AddNew()
        dr("商品类别") = Vals(i)(0)
        dr("商品编号") = Vals(i)(1)
        dr("商品名称") = Vals(i)(2)
        dr("规格型号") = Vals(i)(3)
        dr("单位") = Vals(i)(4)
        dr("期初库存数量") = Vals(i)(5)
        dr("入库数量") = Vals(i)(6)
        dr("出库数量") = Vals(i)(7)
        dr("库存数量") = Vals(i)(8)
    End If
Next
2楼
有点蓝 发表于:2024/9/24 17:10:00
不像是这段代码的问题。调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm,看哪一句代码出错
3楼
g1j2h3 发表于:2024/9/24 17:11:00
提示是下边代码
If DataTables("库存表").Find("商品编号 = '" & dt("商品编号") & "'") Is Nothing Then
4楼
g1j2h3 发表于:2024/9/24 17:28:00

图片点击可在新窗口打开查看此主题相关图片如下:666.png
图片点击可在新窗口打开查看
5楼
有点蓝 发表于:2024/9/24 17:39:00
代码不完整。【dt("商品编号") 】这里的dt是什么东西?
共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01563 s, 2 queries.