- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 列中持续增加值 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=11811)
-- 发布时间：2011/8/12 16:39:00
-- 列中持续增加值
已上传附件为列
在表"客户信息"的窗口”购买服务包“的控件Textbox1中输入值，该值会保存到表”客户信息“--中的列”已购服务包“的中，后期再购买时则把每次购买的值都保存到--”已购服务包“并且用逗号隔开
列如第一次操作，在Textbox1中输入A，点击“购买”按钮A值这保存到“已购服务包”显示A
第二次操作，在Textbox1中输入B，点击”购买“按钮B值也保持到“已购服务包”显示A，B
第三次------ 显示A,B，C
以下类似
这个按钮的CLICK代码怎么写
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新建文件夹.rar |
-- 发布时间：2011/8/12 16:52:00
--
Dim yg As String = Tables("客户信息").current("已购服务包")
Dim tx As String = Forms("购买服务包").Controls("TextBox1").text
Tables("客户信息").current("已购服务包") = yg & "," & tx