Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:页面集合问题

1楼
wqc360 发表于:2010/1/18 19:00:00
请问,我想在页面集合的不同页面放同一个表的不同视图,而且每个页面还有其他控件,请问应该怎么处理。
2楼
czy 发表于:2010/1/18 19:31:00
非副本和SQLTable、SQLQuery随你放多少个都可以。
3楼
wqc360 发表于:2010/1/18 21:35:00
窗口为独立窗口。
要求:一。Table1,加载表A视图1按窗口控件"图号"(随光标选择主表不同行而图号不同)筛选出"班组"列="车床组"的行。(第1页面,页面名=车床组)
        二。Table2,加载表A视图2按窗口控件"图号"(随光标选择主表不同行而图号不同)筛选出"班组"列="铣床组"的行。(第2页面,页面名=铣床组)
问题:1.加载窗口AfterLoad事件代码应怎么写。
         2.窗口控件"图号"的TextChanged事件代码应怎么写。
4楼
wqc360 发表于:2010/1/18 21:56:00
加载表和表视图已搞定:
Tables("窗口1_Table1").DataSource = DataTables("表A")
Tables("窗口1_Table2").DataSource = DataTables("表A")
Tables("窗口1_Table1").OpenView("1")
Tables("窗口1_Table2").OpenView("2")
就差筛选了
5楼
wqc360 发表于:2010/1/18 22:32:00
一个页面的筛选搞定:
Dim Filter As String
With e.Form.Controls("图号")
    If .Value IsNot Nothing Then
        Filter = Filter & "图号 = '" & .Value & "' and  班组 =  '车床组' "
    End If
End With
If Filter > "" Then
    Tables("窗口1_Table1").Filter = Filter
End If
第二个筛选应该怎么写代码,是否要用多个控件去绑定同一个列
共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01953 s, 2 queries.