VB怎样取得两个*号之间的字符串?
本帖最后由 plumlee 于 2013-4-7 03:02 编辑大家好,我是初哥。请教以下的例样中,我怎样才能取得*号之间的字符串,谢谢!!
A64700748166976902100-06-24+06P9A0673300680000004C0300183839070530530539A7500053
0000^^*K8152xxxxxx00268**
Dim s, ss As String
ss = "A76700452127583901500-04-17+01P9A0673600680000004F0300199451170210210219A77000210000^^*K815260000268**"
s = Mid$(ss, InStr(ss, "*") + 1, Len(ss))
s = Mid$(s, 1, InStr(s, "*") - 1)
MsgBox s 谢谢楼上的“W” 哥
但我找到更方便的方法了!!
Split 这个函数才方便啊
Dim b() As String
b = Split(ss, "*")
msgboxb(1)
Split真的很少人用的。我之前也写一很长。
页:
[1]