VB截取指定的字符串
答案:3 悬赏:40 手机版
解决时间 2021-11-25 23:04
- 提问者网友：爱了却不能说
- 2021-11-25 20:11
VB截取指定的字符串
最佳答案
- 五星知识达人网友：逐風
- 2021-11-25 20:49
我胡乱写了一段代码，请你参照一下
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)
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)
全部回答
- 1楼网友：一叶十三刺
- 2021-11-25 21:56
可以用字符串替换函数：
s="张某-陕西西安-205房间"
s=strreplace(s, "-", "")
s="张某-陕西西安-205房间"
s=strreplace(s, "-", "")
- 2楼网友：拜訪者
- 2021-11-25 21:10
用 Split() 函数差分，再用 Join() 函数合并（也可以直接用 & 连接）。
举例：
Dim S() as String
S = Split("张某-陕西西安-205房间", "-")
Debug.Print S(0) & S(2) '结果是 张某205房间
举例：
Dim S() as String
S = Split("张某-陕西西安-205房间", "-")
Debug.Print S(0) & S(2) '结果是 张某205房间
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯