尝试将由分隔符分隔的多个输入数据保存到数据库中的单个记录中答案

【问题标题】：Trying to save multiple input data separated by a delimiter into singular records in database尝试将由分隔符分隔的多个输入数据保存到数据库中的单个记录中
【发布时间】：2024-05-01 23:15:02
【问题描述】：

我目前正在尝试为我的公司创建库存数据库。问题是一次输入一项数据效率低下。因此，我们买了一台扫描仪。扫描仪可以在其内存中保存多个项目，并且当传输到一个位置（文本框、Excel 单元格）时，所有数据都输入到由制表符分隔符分隔的一个单元格中。

有没有一种方法（可能是split() 函数），我可以基本上将扫描仪中的所有内存“粘贴”到表单上的单个文本框中（以便文本框具有“data1 data2 data3 data4”，然后保存它这样我的表现在包含单独记录中的数据？

记录1 - 数据1
记录 2 - 数据 2
记录 3 - 数据 3

我只是在学习 Access，所以语法理解通常是我挣扎的地方。

【问题讨论】：

标签： ms-access input textbox delimiter inventory

【解决方案1】：

将所有数据读入文本框后，您需要一个按钮来单击，OnClick 事件代码如下所示：

Dim astrInput() As String
Dim i As Integer

astrInput = Split(txtData, " ")
For i = 0 To UBound(astrInput)
    CurrentDb.Execute "INSERT INTO myTable(DataColumn) VALUES ('" & astrInput(i) & "')"
Next i

【讨论】：

感谢您的回复！如果您不介意我有任何问题，我会努力实施并回来
OnClick 事件代码的这个按钮能否与简单的保存按钮相结合？我在想，添加保存记录的按钮，将宏更改为实际的VBA代码，然后实现您建议的上述代码？我的意思是将用于保存文本框记录的 VBA 代码与上述代码分开，或者这会替换该代码吗？如果这有意义
成功了！你是救生员！哈哈哈非常感谢@Skippy 的帮助，我自己会花很长时间才能弄清楚！