Foxtable(狐表)用户栏目专家坐堂 → 怎样实现帮助中添加添加货品功能


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

主题:怎样实现帮助中添加添加货品功能

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 15:53:00 [显示全部帖子]

1、2、 afterEdit事件加入代码

 

If e.Row.Index = e.Table.Rows.Count - 1 Then
    e.Table.AddNew
End If

 

3、也可以,和主表一样那样设计。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 16:25:00 [显示全部帖子]

以下是引用zqxzhs在2015/6/8 16:01:00的发言:

在关联表中加入一行,点下拉,双击后,添加不到这行中,代码应该怎样写呢?!

[此贴子已经被作者于2015/6/8 16:01:44编辑过]

 

Tables("表A.表B").Current("第一列") = e.Row("第一列")


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 16:26:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 19:25:00 [显示全部帖子]

 双击事件的代码你怎样写?别人怎么知道你哪里错啊。

 

 要不你上传你做的项目上来看

[此贴子已经被作者于2015/6/8 19:25:40编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 19:54:00 [显示全部帖子]

1、打开窗口之前,给全局变量赋值为点击的表

 

vars("表名") = "表A.表B"

 

2、双击代码

 

Dim tbl As Table = Tables("窗口2_Table1")
If tbl.Current IsNot Nothing Then
    Tables(vars("表名")).Current("产品编号") = tbl.Current("商品编号")
    Tables(vars("表名")).Current("产品名称") = tbl.Current("商品名称")
    Tables(vars("表名")).Current("单价") = tbl.Current("进价")
End If
Forms("窗口2").Close()


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/8 23:37:00 [显示全部帖子]

 你肯定要写代码弹出窗口的吧,比如你写了CellButtonClick的代码,在打开之前赋值

 

 vars("表名") = e.Table.Name


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/9 10:27:00 [显示全部帖子]

 上传具体出错例子。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/9 11:32:00 [显示全部帖子]

以下是引用zqxzhs在2015/6/9 11:26:00的发言:

我不会传,怎样传上去

 

[此贴子已经被作者于2015/6/9 11:26:35编辑过]

 

http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

 


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/9 17:54:00 [显示全部帖子]

     
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:消费窗体.foxdb


 回到顶部