如何才能做到取分号前面的,中间的和后面的值呢？谢谢";"

yaw　发表于：2014-07-10 15:52:13 　

请问各位老师我如何才能做到取分号前面的,中间的和后面的值呢？谢谢";"
字段：co_ln的值
WACO-140880;001;CI0002
CO-141552;002;CI0067

WACO-140880为订单号，

001行号，

CI0002客户代码，

请问如何提取这三个数据，谢谢

chinasa 发表于：2014-07-10 16:28:17

用instr判断分号第一个和第二个的位置，然后再用MID函数取。

煮江品茶发表于：2014-07-10 16:37:00

dim arr

arr=split("WACO-140880;001;CI0002",";")

则arr(0)="WACO-140880" arr(1)="001" arr(2)="CI0002"

yaw 发表于：2014-07-10 20:16:22

煮江老师在查询中如何使用呢因为例子是一个字段的值谢谢

煮江品茶发表于：2014-07-10 21:26:22

很多办法使用呀，比如你的这个字段叫做：字符串，那么你可以在查询中使用，先在标准模块中写一个函数：

public function GetArr(byval str as string)

dim arr

arr=split(str,";")

GetArr=arr

end function

然后在查询中使用这个函数：

select *,GetArr(字符串,";")(0) as 订单号,GetArr(字符串,";")(1) as 行号,GetArr(字符串,";")(2) as 客户代号 from 阁下的数据表名称

yaw 发表于：2014-07-10 21:47:15

煮江老师请问dim arr不用声明什么类型的格式？谢谢

yaw 发表于：2014-07-11 08:27:26

煮江老师查询提示报错，请帮助看看

煮江品茶发表于：2014-07-11 14:59:05

1、dim arr 就是Dim arr As Variant

2、可以这样搞：

Public Function GetVal(ByVal str As String, ByVal i As Integer) As String
Dim arr As Variant
arr = Split(str, ";")
GetVal = arr(i)
End Function

SELECT aa.coln, GetVal([coln],0) AS f1, GetVal([coln],1) AS f2, GetVal([coln],2) AS f3
FROM aa;

yaw 发表于：2014-07-11 15:09:02

谢谢老师的帮助！！！

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

Access交流中心