[求助]自动输入怎么不行？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]自动输入怎么不行？

共有4750人关注过本帖树形打印复制链接主题：[求助]自动输入怎么不行？

王楠

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：7 积分：127 威望：0 精华：0 注册：2013/7/10 15:05:00

[求助]自动输入怎么不行？ 发帖心情

Post By：2013/8/22 10:25:00 [只看该作者]

我按照狐表教程里面的自动输入展示稿做了一个自动输入表行不通后来直接复制代码文字还是不行请大神赐教是不是遗漏了什么

在项目事件AfterOpenProject中设置如下代码：

Tables("客户").Cols("省市").Combolist = DataTables("行政区域").GetComboListString("省市")

这样每次打开

在客户表属性中

If e.IsFocusCell Then '如果是焦点所在单元格
    If e.Col.Name = "县市" Then '如果正在编辑的是县市列
        '从行政区域表提取该省市的县市作为列表项目
        e.Col.Combolist = DataTables("行政区域").GetComboListString("县市", "[省市] = '" & e.Row("省市") & "'")
    End If
End If