请教：在VB中，我想把字符串t="abc-def-ghi"，分成x="abc"，y="def"，c="ghi"等三个字符串，该怎样做啊？

dim x() as string
x=split("abc-fda-fsd-f-dsaf","-");
debug.print "x=""" & x(0) & """,y=""" & x(1) & """,z=""" & x(2) & """"

额，这个问题类似的前面好象我回答过，split是最好也是最简单的方法。此外，你也可以人工用一写字符串处理函数处理，也能达到预期效果。
Dim x, t$, i%, Temp$, a$(), k%
t = "abc-def-ghi"
i = 0
k = 0
Do While InStr(t, "-") <> 0
i = InStr(t, "-")
Temp = Mid(t, 1, i - 1)
t = Mid(t, i + 1)
k = k + 1
ReDim Preserve a(k)
a(k - 1) = Temp
Loop
a(k) = t
For Each x In a
Print x
Next x

t = "abc-def-ghi"
x = Left(t, 3)
y = Mid(t, 5, 3)
c = Right(t, 3)

Dim X As Variant

X = Split(t, "-")
a = X(0)
b = X(1)
c = X(2)

Dim x As String
x=Split(t,"-")
a=x(0)
b=x(1)
c=x(2)

用split函数最方便！
上