Foxtable(狐表)用户栏目专家坐堂 → 请教窗口录入问题


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

主题:请教窗口录入问题

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/21 7:49:00 [显示全部帖子]

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


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/21 9:10:00 [显示全部帖子]

呵呵,先看帮助,慢慢来。

 

 


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/21 14:00:00 [显示全部帖子]

如果要求新的值加上原来的值,代码可以改为:

 

Dim rn As String = e.Form.Controls("ComboBox2").value
Dim cn As String = e.Form.Controls("ComboBox1").value
Dim r As DataRow = DataTables("表A").find("第一列 = '" & rn & "'")
r(cn) = e.Form.Controls("TextBox1").value + r(cn)
r.save()

 


 回到顶部