以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  代码编辑框 精灵  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55143)

--  作者:admmx
--  发布时间:2014/8/11 17:20:00
--  代码编辑框 精灵
代码编辑框 精灵不出代码啊??
--  作者:admmx
--  发布时间:2014/8/11 17:20:00
--  
怎么回事?
--  作者:admmx
--  发布时间:2014/8/11 17:23:00
--  
精灵不出代码啊????怎么回事?
图片点击可在新窗口打开查看此主题相关图片如下:代码编辑器.jpg
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2014/8/11 17:27:00
--  
测试正常,你重新下载安装一下看看
--  作者:Bin
--  发布时间:2014/8/11 17:28:00
--  
测试没问题,关闭项目重新打开看看.
--  作者:admmx
--  发布时间:2014/8/11 23:21:00
--  
恩可以了
--  作者:admmx
--  发布时间:2014/8/11 23:22:00
--  
按日期查询代码怎么写?
--  作者:admmx
--  发布时间:2014/8/11 23:24:00
--  

Dim rq As WinForm.DateTimePicker = e.Form.Controls("日期")
Dim czrb As WinForm.ComboBox = e.Form.Controls("炒制类别")
Tables("晒青管理").Filter= "日期 = \'" & rq.Text & "\'and 炒制类别 = \'" & czrb.Text & "\'"

 

 

怎么查询不出来????????


图片点击可在新窗口打开查看此主题相关图片如下:按日期查询.jpg
图片点击可在新窗口打开查看

--  作者:admmx
--  发布时间:2014/8/11 23:30:00
--  

分析按钮的代码

 

Dim rq As WinForm.DateTimePicker = e.Form.Controls("日期")
Dim czrb As WinForm.ComboBox = e.Form.Controls("炒制类别")
Tables("晒青管理").Filter= "日期 = \'" & rq.Text & "\'and 炒制类别 = \'" & czrb.Text & "\'"

 

 

没有反应啊????


图片点击可在新窗口打开查看此主题相关图片如下:按日期查询.jpg
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2014/8/12 8:25:00
--  

日期用#,看看表达式语法:

http://www.foxtable.com/help/topics/0102.htm

http://www.foxtable.com/help/topics/1647.htm

http://www.foxtable.com/help/topics/1284.htm

 

 

Dim rq As WinForm.DateTimePicker = e.Form.Controls("日期")
Dim czrb As WinForm.ComboBox = e.Form.Controls("炒制类别")
Tables("晒青管理").Filter= "日期 = #" & rq.Text & "# and 炒制类别 = \'" & czrb.Text & "\'"