ACCESS如何实现替换功能

lgh00289

ACCESS如何实现替换功能
地名        路径                        结果
泰和        中国-江西-泰和        中国-江西-
鄱阳湖        中国-江西-鄱阳湖  中国-江西-
河源        中国-广东-河源        中国-广东-
深圳        中国-广东-深圳        中国-广东-

在表中中三字段“地名”，“路径”，“结果”，我想要通过地名和路径，达到结果这列？在ACCESS中如何实现？

todaynew

假设你的表名称为tbname，则：

select 地名,路径,left(路径,InstrRev(路径,"-")) as 结果 from tbname

为你需要的结果，也可写为：

select 地名,路径,Replace(路径,地名,"") as 结果 from tbname

aslxt

查询的方法，基于地名和要去掉的那部分完全相同：
SELECT 表1.地名, 表1.路径, Left([路径],Len([路径])-Len([地名])) AS 表达式1 FROM 表1

lgh00289

谢谢todaynew 和aslxt

aslxt

替换方法
Private Sub Command0_Click()
  Dim rec As ADODB.Recordset
  Dim i As Long
  Set rec = New ADODB.Recordset
  rec.Open "select * from 表1", CurrentProject.Connection, adOpenStatic, adLockOptimistic
  For i = 1 To rec.RecordCount
    rec.Fields("路径") = Replace(rec.Fields("路径"), rec.Fields("地名"), "")
    rec.Update
    rec.MoveNext
  Next i
End Sub

lgh00289

TKS aslxt