Microsoft Access 2007 with VBA - Parse Textbox，vbCrLf分隔

Question

通过一些残酷的命运扭曲，我找到了一份维护完全基于Microsoft Access 2007构建的系统的工作。

无论如何，我在表单上有一个TextBox。我想解析这个TextBox的内容。我想声明两个字符串，字符串1等于TextBox的第一行，字符串2等于第二行，依此类推。

我想我需要一些类似于下面的东西，但我无法理解它。

由于

约翰

Dim stringOne As String
Dim stringTwo As String

Dim contentsOfTextBox As Array

contentsOfTextBox = Split("txtMyTextBox.Text", "vbCrLf")

stringOne = contentsOfTextBox[0].Text
stringTwo = contentsOfTextBox[1].Text

Answer 1

我认为你的意思是

contentsOfTextBox = Split(Me.txtMyTextBox, vbCrLf)

stringOne = contentsOfTextBox(0)
stringTwo = contentsOfTextBox(1)

然而，这似乎可能导致一个尴尬的想法。最好用这个来描述你想要解决的现实问题。