Warning: file_get_contents(/data/phpspider/zhask/data//catemap/7/vb6/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb6 如何获取两个已知单词之间的字符串_Vb6 - Fatal编程技术网

Vb6 如何获取两个已知单词之间的字符串

Vb6 如何获取两个已知单词之间的字符串,vb6,Vb6,我的问题是获取如上所述的字符串!就我而言 1234;0020001212;6565656AEBCD698798832 字符串,我想要的是“0020001212”,我已知的单词是“;”。 我尝试了Mid(),但我的值不稳定,可变! 所以,请帮我找到这个答案。感谢您使用拆分功能,使用“;”作为分隔符将其分解: theLine = "1234;0020001212;6565656AEBCD698798832" Dim arr() As String arr = Split(theLine, ";"

我的问题是获取如上所述的字符串!就我而言

1234;0020001212;6565656AEBCD698798832
字符串,我想要的是“0020001212”,我已知的单词是“;”。 我尝试了Mid(),但我的值不稳定,可变! 所以,请帮我找到这个答案。感谢您使用拆分功能,使用“;”作为分隔符

将其分解:

theLine = "1234;0020001212;6565656AEBCD698798832"

Dim arr() As String
arr = Split(theLine, ";")

Debug.Print arr(0)
Debug.Print arr(1)
Debug.Print arr(2)
为了


使用Split函数并使用“;”作为分隔符将字符串转换为字符串数组

Dim arr() As String
arr = Split("a;b;c", ";")

然后你可以访问数组的第二个元素来获取你的值。

哇,看看那些速度更快的人。我得到了运行时错误52,错误的文件名或编号!帮助我!对不起,不要用
作为变量名,重命名它。我知道了,特别感谢你。如上所述,我是一个绝对的初学者,谢谢你的耐心:D
Dim arr() As String
arr = Split("a;b;c", ";")