以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样用变量表示字符串?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72187)

--  作者:zhchling
--  发布时间:2015/7/25 9:14:00
--  怎样用变量表示字符串?
 
With Tables("userb.zclxingcheng")
    Dim r As Integer
    r =  .Find(  “2015-07-25”  , .RowSel + 1, "日期", False, False, True)
    If r > - 1 Then \'如果找到符合条件的行
        .Position = r \'则选择该行
    End If
End With


怎么用 date.today 表示  2015-07-25  ?

--  作者:有点蓝
--  发布时间:2015/7/25 9:18:00
--  
date.today 就是 日期啊
--  作者:有点蓝
--  发布时间:2015/7/25 9:21:00
--  
查找日期要加#
--  作者:zhchling
--  发布时间:2015/8/2 7:11:00
--  
r =  .Find(  “2015-07-25”  , .RowSel + 1, "日期", False, False, True)

直接用  r =  .Find(  date.today  , .RowSel + 1, "日期", False, False, True)    这个语法是错的。



我的问题是怎么用date.today 代替 “2015-07-25“

--  作者:zhchling
--  发布时间:2015/8/2 7:28:00
--  
 发现错误的原因是,  date.today 的值是 “2015-7-25”     怎么设置日期格式 “2015-07-25 “?

--  作者:zhchling
--  发布时间:2015/8/2 8:08:00
--  
  r =  .Find( Format(Date.Today, "yyyy-MM-dd") , .RowSel + 1, "日期", False, False, True)
   

这样处理可以了。  请问各位,还有其他更好的方法吗?

--  作者:大红袍
--  发布时间:2015/8/2 9:10:00
--  

日期列不要用字符列,日期格式的话,肯定没有问题。

 

用findRow也行 http://www.foxtable.com/help/topics/0553.htm