Foxtable(狐表)用户栏目专家坐堂 → 日期转换成字符串后,能否截取字段?


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

主题:日期转换成字符串后,能否截取字段?

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/1/18 11:24:00 [显示全部帖子]

1、你的代码用在什么事件中,这个事件有e.row这个参数吗?

2、即使用e.row这个参数,也不是这样用的,正常的筛选,必须通过列名。

 

你的代码的错误有些离谱,你学了很多,但是不踏实,是跑步前进,才会写出这样的代码,建议你从头细看帮助两遍,从使用指南开始看。

 

正常的代码,大概是:

 

Dim Filter As String
With e.Form.Controls("Start")   '开始日期的控件
    If .Value IsNot Nothing Then
        Dim s As String = .value
        Filter =  "Substring(合同号1,4) >= '" & s.Substring(0,4) & "'"
    End If
End With
With e.Form.Controls("End")    '结束日期的控件'
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Dim s As String = .value
        Filter = Filter & "Substring(合同号1,4) <= '" & s.Substring(0,4) & "'"
    End If
End With

Tables("XXX").Filter = Filter

 

 

[此贴子已经被作者于2012-1-18 11:24:47编辑过]

 回到顶部