VB截取指定的字符串

Question

张某-陕西西安-205房间
我需要截取第一个“-”号前和第二个“-”后的字符，即结果：张某205房间
请问用什么函数

Answer 1

可以用字符串替换函数：
s="张某-陕西西安-205房间"
s=strreplace(s, "-", "")

Answer 2

我胡乱写了一段代码，请你参照一下

Dim aa As String
Dim t As Integer
aa = "张某-陕西西安-205房间"
t = InStr(1, aa, "-")
MsgBox Left(aa, t - 1)
t = InStr(t + 1, aa, "-")
MsgBox Right(aa, Len(aa) - t)本回答被提问者采纳

Answer 3

用 Split() 函数差分，再用 Join() 函数合并（也可以直接用 & 连接）。
举例：
Dim S() as String
S = Split("张某-陕西西安-205房间", "-")
Debug.Print S(0) & S(2) '结果是 张某205房间