Foxtable(狐表)用户栏目专家坐堂 → [求助]Replace不起作用


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

主题:[求助]Replace不起作用

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


加好友 发短信
等级:幼狐 帖子:174 积分:1671 威望:0 精华:0 注册:2018/4/22 18:54:00
[求助]Replace不起作用  发帖心情 Post By:2023/6/28 22:39:00 [只看该作者]

请老师看一下,下面的代码,想用Replace进行替换,但不起作用,替换不成功

Dim t1 As String = e.Form.Controls("TextBox1").Text
Dim t2 As String = e.Form.Controls("comboBox2").Text
Dim jdb As String = CurrentTable.Current("街道办")
Dim zz As String = CurrentTable.Current("住址")
Dim drs As List(of DataRow) =  DataTables("人员信息表").Select("[住址] Like '%" & t1 & "%'and [街道办] = '" & jdb & "'")
For i As Integer = drs.count - 1 To 1 Step - 1
    drs(i)("住址") = drs(i)("住址").Replace( t1 ,t2 )    
Next
[此贴子已经被作者于2023/6/28 22:40:18编辑过]

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


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

上面的可以用,不麻烦老师了,谢谢

 回到顶部