以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]Replace不起作用 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187178) |
-- 作者:tkxffb -- 发布时间:2023/6/28 22:39:00 -- [求助]Replace不起作用 请老师看一下,下面的代码,想用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 -- 发布时间:2023/6/28 23:05:00 -- 上面的可以用,不麻烦老师了,谢谢 |