关于vba:换行时字符串拆分

String Split on Line Break

我在MS Access表单上有一个文本框,用户将要从Excel电子表格复制一列数字。 我需要接受此输入并将其用作构建查询的参数。 我有看起来像这样的代码

1
2
3
Dim data as variant
Dim input as String
data = Split(input,vbLf)

我希望能够建立一个来自用户的输入列表,但是我不知道如何在换行符上进行拆分。 我已经尝试过" \ n \ r"," \ n"。" \ r",vbCrLf,vbLf。 输入看起来像" 12345 [] [] 23456",每个数字之间都有方框字符

谢谢


我使用vbCrLf让Split为我工作。 我也将Split的结果写入了String数组。

这是我的代码:

1
2
3
Dim data() As String
Dim yourInput As String
data = Split(yourInput, vbCrLf)


vbCRLF为我工作,请尝试:Strings.Chr(13) & Strings.Chr(10) (which is vbCRLF)

尝试看看这两个框的ASCII码是什么:

1
2
3
    //ex for input ="12345[][]23456"
    Strings.Asc(Strings.Mid(input, 6, 1))
    Strings.Asc(Strings.Mid(input, 7, 1))