Foxtable(狐表)用户栏目专家坐堂 → 关于FILL


  共有12940人关注过本帖平板打印复制链接

主题:关于FILL

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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
关于FILL  发帖心情 Post By:2010/11/23 12:02:00 [只看该作者]

请各位老师帮我看一下如下公式:

 

此公式放在:

SelectedIndexChanged

选择不同列表项目后执行。

 

 

Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim s As String = "fa piao号 Is Null Or fa piao号 = ''"
Tables("fa piao登记_Table2").Fill("Select [_Identify],[公司简称],[工作号],[费用名称],[币制],[金额],[余额],[fa piao号] From {费用管理} where ([fa piao号] Is Null Or [fa piao号] = '') and 公司简称 = '" & cm.value & "' and 类别 = '应付'","myacc",True)
DataTables("fa piao登记_Table2").dataCols.Add("变更", Gettype(String))
DataTables("fa piao登记_Table2").dataCols.Add("合计", Gettype(Double))
Tables("fa piao登记_Table2").SetColVisibleWidth("公司简称|100|工作号|90|费用名称|100|币制|55|金额|60|余额|60|fa piao号|60|变更|50|合计|60")

 

 

今天出现怪现象,公式执行行,所有表的行号不见了,主菜单上 功能区按钮能用,功能组上的所有按钮均不能用.为何??


 回到顶部
总数 12 1 2 下一页