Foxtable(狐表)用户栏目专家坐堂 → <=”运算符前缺少操作数


  共有2346人关注过本帖树形打印复制链接

主题:<=”运算符前缺少操作数

帅哥哟,离线,有人找我吗?
蓝蚂蚁
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
<=”运算符前缺少操作数  发帖心情 Post By:2018/9/16 22:44:00 [只看该作者]

Dim psgs As String =e.Form.Controls("CheckedListBox1").value '公司
Dim nforyf1 As String =e.Form.Controls("TextBox2").text '时间是月份或年开
Dim nforyf2 As String =e.Form.Controls("TextBox3").text '时间是月份或年始
Dim bl As String
If  nforyf1<>Nothing And nforyf2<>Nothing  Then    '如果时间不为空
    If  nforyf1.Length=4 And nforyf2.Length=4  Then
        bl="年份"
    ElseIf nforyf1.Length=6 And nforyf2.Length=6 Then
        bl="手术月份"
    End If
    If psgs >"" Then    '列表框不为空,即指定某个配送公司
        fTSJE001.Filter =  bl &">='"& nforyf1 &"'and  bl & <='"& nforyf2 &"' and 配送公司='"& psgs &"'"
    Else      '列表框为空
        fTSJE001.Filter =  bl &">='"& nforyf1 &"'and  bl & <='"& nforyf2 &"'"
    End If
.....
end if


代码提示错误:语法错误:“<=”运算符前缺少操作数。

请问老师 红色字体应该怎样修改?
[此贴子已经被作者于2018/9/16 22:44:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/16 23:00:00 [只看该作者]

    If psgs >"" Then    '列表框不为空,即指定某个配送公司
        fTSJE001.Filter =  bl &">='"& nforyf1 &"' and " & bl & " <='"& nforyf2 &"' and 配送公司='"& psgs &"'"
    Else      '列表框为空
        fTSJE001.Filter =  bl &">='"& nforyf1 &"' and " & bl & " <='"& nforyf2 &"'"
    End If

 回到顶部
帅哥哟,离线,有人找我吗?
蓝蚂蚁
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/9/16 23:05:00 [只看该作者]

完美解决

 回到顶部