字符截取问题

呆萌萌　发表于：2017-03-27 10:45:58 　

例如这样的原始字段

7100-DB-BZE-0001

7111-ZBS-ZQ-0012

分成如下四个字段

7100 DB BZE 0001

7111 ZBS ZQ 0012

请教~谢谢~

网行者发表于：2017-03-27 12:08:42

老生常谈了，自定义函数：

Function tq(txt, n, separator) As String
Dim allelements As Variant
allelements = Split(txt, separator)
tq = allelements(n - 1)
End Function

tq("7100-DB-BZE-0001", 1, "-") tq("7100-DB-BZE-0001", 2, "-") tq("7100-DB-BZE-0001", 3, "-") tq("7100-DB-BZE-0001", 4, "-")

仙来发表于：2017-03-27 12:13:36

http://www.accessoft.com/article-show.asp?id=8537

总记录：2篇页次：1/1 9 1 :

Access交流中心