Foxtable(狐表)用户栏目专家坐堂 → 求助:如何根据下列菜单选项,生成一新字段?


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

主题:求助:如何根据下列菜单选项,生成一新字段?

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
求助:如何根据下列菜单选项,生成一新字段?  发帖心情 Post By:2014/9/9 10:28:00 [显示全部帖子]

请教老师:
我想设计一个窗口,通过从表中,选择其中的三个字段的内容,生成一个新的“编号”字段,我已经做成了下图所示的窗口,请问:如何调用上面三个选择输入的内容,通过"生成“的click 功能,使 以上 三个字段的内容相加,成为一个新字段,并在编号字段中显示出来?

图片点击可在新窗口打开查看此主题相关图片如下:生成编号.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2014-9-9 10:28:22编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 10:51:00 [显示全部帖子]

谢谢。 我做如下的代码,不能运行,错中何处?



Dim ndb As String = e.Form.Controls("年度表").text
Dim pib As String = e.Form.Controls("PI表") .text
Dim jfly As  String = e.Form.Controls("经费来源表").text
Dim bh As String = e.Form.Controls("购置申请编号").text
bh = pib & ndb  & jfly





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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 12:21:00 [显示全部帖子]

图片点击可在新窗口打开查看 图片点击可在新窗口打开查看再请教:
Dim bh As String = e.Form.Controls("购置申请编号").text
Dim ndb As String = e.Form.Controls("年度表").text
Dim pib As String = e.Form.Controls("PI表") .text
Dim jfly As  String = e.Form.Controls("经费来源表").text

e.form.controls("购置申请编号").text = pib & ndb  & jfly
Tables("购置申请管理").Current("购置申请编号")= pib & ndb  & jfly

增加一条,将生成的字段内容写回表中时,出现如下错误:

图片点击可在新窗口打开查看此主题相关图片如下:编号错误.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2014-9-9 12:21:00编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 14:28:00 [显示全部帖子]

没错。购置申请编号列是 字符列:如下图:

图片点击可在新窗口打开查看此主题相关图片如下:编号错误2.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2014-9-9 14:30:43编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 14:44:00 [显示全部帖子]

表事件中,并未使用代码

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 15:56:00 [显示全部帖子]

例子如下:

见20 楼
[此贴子已经被作者于2014-9-9 17:56:35编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 16:08:00 [显示全部帖子]

888
数据源是  SQL的。如何发呀?

[此贴子已经被作者于2014-9-9 16:08:37编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 16:33:00 [显示全部帖子]

重新做的例子:
删除,见下面
[此贴子已经被作者于2014-9-9 17:55:27编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 17:35:00 [显示全部帖子]

上表已经转成内部表了。请重新下载  20楼
[此贴子已经被作者于2014-9-9 17:56:13编辑过]

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


加好友 发短信
等级:幼狐 帖子:195 积分:1523 威望:0 精华:0 注册:2014/7/9 16:27:00
  发帖心情 Post By:2014/9/9 17:39:00 [显示全部帖子]


去掉了外部数据源,不需密码了

这次应可以测试了:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目111.zip


[此贴子已经被作者于2014-9-9 17:54:58编辑过]

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