VB :split()函数

soz = Split(tbox.Text, " ")

Print soz(i)

i = i + 1

上面的只用空格做分割副 能不能在加 ? . ,: ;'"这些?

你的意思我非是要对”ndjk,dsh jdks?bhsj” 进行分离，而分隔符号是, 空格 ?

我用vb的replace和split来达到了相同的效果。

d = "ndjk,dsh jdks?bhsj"

after_douhao = Replace(d, ",", " ")

after_wenhao = Replace(after_douhao, "?", " ")

Dim byte_lxp() As String

byte_lxp = Split(after_wenhao, " ")

For i = LBound(byte_lxp) To UBound(byte_lxp)

MsgBox byte_lxp(i)

Next