Rss & SiteMap

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

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

标题:[求助]根据多值字段值动态加载数据不执行

1楼
洮沙 发表于:2024/1/10 13:28:00
老师,有以下表:

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240110132412.png
图片点击可在新窗口打开查看
代码如下:
Dim dt As DataTable = DataTables("凭证序时簿")
Dim pzdt As DataTable = DataTables("新增凭证记录")
Dim pzdr As DataRow = pzdt.Find("登录用户名='管理员'")
Dim filter As String
If pzdr IsNot Nothing Then
    If pzdr("新增凭证ID") > "" Then
        Dim nms() As String = pzdr("新增凭证ID").Split(",") '将新增凭证ID列内容拆分成数组
       Filter = "_Identify In ('" & String.Join("','", nms) & "')"
    End If 
End If 
If Filter > "" Then
    dt.loadFilter = Filter
    dt.load()
End If
测试不执行,问题应该出在Filter = "_Identify In ('" & String.Join("','", nms) & "')"这句了,_Identify是整数型,如何能从字符型中判断?麻烦帮忙指点一下,谢谢!

[此贴子已经被作者于2024/1/10 13:29:54编辑过]
2楼
有点蓝 发表于:2024/1/10 13:36:00
Filter = "[_Identify] In (" & String.Join(",", nms) & ")"
3楼
洮沙 发表于:2024/1/10 13:47:00
合适了,谢谢老师!
共3 条记录, 每页显示 10 条, 页签: [1]

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

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