主题：列中持续增加值

已上传附件为列

在表"客户信息"的窗口”购买服务包“的控件Textbox1中输入值，该值会保存到表”客户信息“--中的列”已购服务包“的中，后期再购买时则把每次购买的值都保存到--”已购服务包“并且用逗号隔开

列如第一次操作，在Textbox1中输入A，点击“购买”按钮A值这保存到“已购服务包”显示A

第二次操作，在Textbox1中输入B，点击”购买“按钮B值也保持到“已购服务包”显示A，B

第三次------                                                                                            显示A,B，C

以下类似

这个按钮的CLICK代码怎么写

   

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新建文件夹.rar

Dim yg As String = Tables("客户信息").current("已购服务包")
Dim tx As String = Forms("购买服务包").Controls("TextBox1").text
Tables("客户信息").current("已购服务包") = yg & "," & tx