VB把445005672-----888888 分离出来行吗

来源：百度知道 编辑：UC知道 时间：2024/06/07 04:19:15
a="445005672-----888888"
如果实现
b＝"445005672"
c="888888"

我是做一个QQ登录器。但不会把分离。。。

dim b
a="445005672-----888888"
b=split(a,"-----")
运行结果：
b(0)="445005672"
b(1)="888888"

Private Sub Command1_Click()
Dim a As String, b As String, c As String, i As String
a = "445005672-----888888" '已知字符串初值
i = "-----" '要查找的指定字符
b = Left(a, 9)
c = Right(a, 6)
Text1 = b
Text2 = c
End Sub