以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]一个简单的关于字符串截取的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=16604)
--  作者：西瓜住持
--  发布时间：2012/2/18 19:57:00
--  [求助]一个简单的关于字符串截取的问题
Dim fz1 As String ="字段一|字段二"
字符串fz1使用“|”作为分隔符
如何写代码使得fz2等于字符串第一个"|"号之前的内容？即
fz2="字段一"
 
使用split分割还是什么？
--  作者：程兴刚
--  发布时间：2012/2/18 20:04:00
--  
 

Dim fz1,fz2 As String

fz1 = "字段一|字段二"
Dim Values() as String
Values = fz1.split("|")
fz2 = Values(0)

--  作者：西瓜住持
--  发布时间：2012/2/18 20:30:00
--  

程版 我把他做成内部函数 这样可以吗？

内部函数名：GetFenleiming
Dim Multi As String = Args(0)
Dim Values() As String
Values = Multi.split("|")
Return Values(0)

使用：
Functions.Execute("GetFenleiming",fz1)

不知道是不是这样用？
fz1 = "字段一|字段二"
--  作者：西瓜住持
--  发布时间：2012/2/18 22:36:00
--  
貌似OK了