2011-10-12 45 views
0

通過命運的有些殘酷扭曲我已經找到了一份工作保持完全上的Microsoft Access 2007的Microsoft Access 2007 VBA - 解析文本框,vbCrLf分隔

構建的系統反正,我有一個表格上的一個文本框。我想解析這個TextBox的內容。我想聲明兩個字符串,其中一個字符串等於TextBox的第一行,兩個字符串等於第二行,依此類推。

我想我需要類似於下面的東西,但我不能完全理解它。

感謝

約翰

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 

回答

2

我想你的意思

contentsOfTextBox = Split(Me.txtMyTextBox, vbCrLf) 

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

然而,這看起來可能會導致一個尷尬的主意。用這個描述你想解決的現實世界問題可能是最好的。