Ms access 在access中拆分删除的字段

我在access表字段中有此记录

93；25;114;734;4019

我需要把它分成5列

---

我用它来检索第一部分：Stars1:Left（[Stars]，InStr（[Stars]，“；”）-1）

请帮忙

---

谢谢使用拆分功能

Dim rst As DAO.Recordset
Dim strSQL As String
strSQL = "SELECT Stars FROM your_table where ..." ' your where clause
Set rst = CurrentDb.OpenRecordset(strSQL)
Dim TestArray() As String = Split(rst!Stars,";") 
'TestArray holds {"93","25","114","734","4019"}
'TestArray(0) holds "93"

---

公共函数GetFullTextItem（_ ByVal strFullText作为字符串_ ByVal初始项（作为整数）作为字符串

出错时继续下一步 GetFullTextItem=Split（strFullText，“；”）（intItem）

端函数

--Star1:GetFullTextItem（[Stars]，0）等要在查询中使用Split（）轻松处理表字段“Stars”，可以创建一个新函数，该函数使用附加索引参数并返回字符串而不是数组（）

要在查询中使用它，请执行以下操作：

SELECT SplitForQuery([Stars],";",0) AS Value1,
    SplitForQuery([Stars],";",1) AS Value2, 
    SplitForQuery([Stars],";",2) AS Value3
FROM Table1;

---

您可以根据需要添加任意多的值，当然，如果需要在另一个表中插入值，您也可以轻松地将此查询转换为insert语句。

我使用此语句检索第一部分：Stars1:Left（[Stars]，InStr（[Stars]，“；”）-1）在您的问题中也要说明“delimted”是什么意思？这些值位于名为StarsThanks的access表的字段中，您可以看到上面的答案

SELECT SplitForQuery([Stars],";",0) AS Value1,
    SplitForQuery([Stars],";",1) AS Value2, 
    SplitForQuery([Stars],";",2) AS Value3
FROM Table1;