| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 表达式请教 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=55729) |
| -- 作者：hbhb -- 发布时间：2014/8/22 9:32:00 -- 表达式请教 大师：好！下面的代码错在哪里？为何显示缺少可操作数？ Dim filter1 As String filter1 = "(zzfl = \'" & ztzz & "\'and kjnd = \'" & ztnd & "\'and qymc = \'" & ztmc & "\'and yf = \'" & ztyf & "\')" For Each j As String In jh filter1 = filter1 & "\'or bbkm = \'" & j & "\'" Next |
| -- 作者：有点甜 -- 发布时间：2014/8/22 9:34:00 -- Dim filter1 As String filter1 = "(zzfl = \'" & ztzz & "\' and kjnd = \'" & ztnd & "\' and qymc = \'" & ztmc & "\' and yf = \'" & ztyf & "\')" For Each j As String In jh filter1 = filter1 & " or bbkm = \'" & j & "\'" Next [此贴子已经被作者于2014-8-22 9:34:13编辑过]
|
| -- 作者：hbhb -- 发布时间：2014/8/22 10:46:00 -- Dim filter1 As String filter1 = "(zzfl = \'" & ztzz & "\' and kjnd = \'" & ztnd & "\' and qymc = \'" & ztmc & "\' and yf = \'" & ztyf & "\')" For Each j As String In jh filter1 = filter1 & " or bbkm = \'" & j & "\'" Next 甜大师：前面还是用and,循环中用or,如何写？
|
| -- 作者：有点甜 -- 发布时间：2014/8/22 10:47:00 -- 你这样子写不行？有什么问题？ |
| -- 作者：hbhb -- 发布时间：2014/8/22 10:59:00 -- 用到以后筛选的行不对 我的筛选条件要达到如下的字符串，上面的代码达不到 "zzfl = \'" & ztzz & "\' and kjnd = \'" & ztnd & "\' and qymc = \'" & ztmc & "\' and yf = \'" & ztyf & "\'" and （bbkm = \'" & j1 & "\' or bbkm = \'" & j2 & "\')"
|
| -- 作者：有点甜 -- 发布时间：2014/8/22 11:01:00 -- Dim filter1 As String = "" filter1 = "(zzfl = \'" & ztzz & "\' and kjnd = \'" & ztnd & "\' and qymc = \'" & ztmc & "\' and yf = \'" & ztyf & "\')" Dim filter2 As String = "" For Each j As String In jh filter2 = filter2 & " or bbkm = \'" & j & "\'" Next filter1 = filter1 & " and " & filter2.SubString(3) |