Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]Combobox控件怎么使用？


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

主题：[求助]Combobox控件怎么使用？
帅哥哟，离线，有人找我吗？
小刚
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：584 积分：3816 威望：0 精华：0 注册：2012/10/15 20:39:00 		[求助]Combobox控件怎么使用？  发帖心情 Post By：2013/12/25 11:03:00 [显示全部帖子]

如图片，我设置了该控件，比如我选择其中之一时，就执行XX代码，但是我要怎么才能选择其中任何一个呢？

 

Dim cmb As WinForm.ComboBox
cmb = Forms("幸城电子财务管理系统").Controls("ComboBox1")
If cmb.Combolist = "未确认对账" Then
    Tables("应收货款").Filter="[确认金额] Is Null"
ElseIf cmb.Combolist = "未进账支piao" Then
    Tables("应收货款").Filter="[日期] >= date"
End If

 

不能执行啊  请帮助


图片点击可在新窗口打开查看此主题相关图片如下：qq图片20131225110117.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
小刚
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：584 积分：3816 威望：0 精华：0 注册：2012/10/15 20:39:00 		  发帖心情 Post By：2013/12/25 15:13:00 [显示全部帖子]

老师，还是上面的问题，第二个date的问题，我的意思就是查询表 Tables("应收货款").Filter 里面，日期 在今天后面的日期的，空白日期的不算，筛选出来。

比如日期有：

2013-11-20

2013-11-22

2013-12-05

还有一些[日期]列里面的行是空值的

2013-12-31

2014-01-28

2014-05-30

...

今天是2013-12-25

把今天之后的日期的行筛选出来，该怎么写代码？

Tables("应收货款").Filter="[日期] >= "#" & date & "#"

这个代码提示出错

 


图片点击可在新窗口打开查看此主题相关图片如下：qq图片20131225151335.jpg
图片点击可在新窗口打开查看

 

 

------------------------------------

另外问一下，把表里面的空行，就是那一列都没有内容的空行，怎么全部删除掉？只删除空行。求代码，谢谢！

[此贴子已经被作者于2013-12-25 15:17:57编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
小刚
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：584 积分：3816 威望：0 精华：0 注册：2012/10/15 20:39:00 		  发帖心情 Post By：2013/12/25 15:51:00 [显示全部帖子]

另外问一下，把表里面的空行，就是每一列都没有内容的空行，怎么全部删除掉？只删除空行。求代码，谢谢！
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

[此贴子已经被作者于2013-12-25 15:51:43编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
小刚
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：584 积分：3816 威望：0 精华：0 注册：2012/10/15 20:39:00 		  发帖心情 Post By：2013/12/28 10:13:00 [显示全部帖子]

老大，我在表里增加了一列逻辑列，取出空行就失效了。请再帮忙处理一下，谢谢！
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb
 回到顶部
帅哥哟，离线，有人找我吗？
小刚
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：584 积分：3816 威望：0 精华：0 注册：2012/10/15 20:39:00 		  发帖心情 Post By：2013/12/28 10:22:00 [显示全部帖子]

谢谢老师。刚刚开始学习，需要个过程。谢谢！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 7 次数据查询