Foxtable(狐表)用户栏目专家坐堂 → [求助]请教一个关于Replace的问题


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

主题:[求助]请教一个关于Replace的问题

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


加好友 发短信
等级:幼狐 帖子:174 积分:1671 威望:0 精华:0 注册:2018/4/22 18:54:00
[求助]请教一个关于Replace的问题  发帖心情 Post By:2020/3/9 23:59:00 [只看该作者]

各位老师好,下面这段代码执行时不起作用,请看看什么原因,谢谢

Dim ymc2 As String = Forms("窗口A").controls("TextBox1").value
Dim xmc2 As String = Forms("窗口A").controls("TextBox2").value
For Each r As DataRow In DataTables("表一").DataRows
    r("列a") = r("列a").Replace(" & ymc2 & ","& xmc2 & ")
Next

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110495 积分:562359 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/10 8:44:00 [只看该作者]

r("列a") = r("列a").Replace(ymc2,xmc2)

自己对比一下结果,理解一下
msgbox(ymc2)
msgbox(" & ymc2 & ")

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


加好友 发短信
等级:幼狐 帖子:174 积分:1671 威望:0 精华:0 注册:2018/4/22 18:54:00
  发帖心情 Post By:2020/3/10 11:49:00 [只看该作者]

受教了,感谢有点蓝老师。
以后还得好好学习基础知识。

 回到顶部