Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

查询截取问题(有点难)

花落,相依  发表于:2011-01-18 20:08:28  
复制

各位高手好,我有下个查询问题,请各位帮解决一下.在EXCEL可以用,RIGHT,SEARCH等函数联合进找出下道工序,在ACCESS中不能如,不知如何操作.

   问题是:我想利用查询将字段"合并"工序中工序以"完工工序"准,在"合并"字段中找到他对应的下一道工序.

如:我的A物料 合并字段工序为:车10-钳20-表245-中34-平120 完工序为"车",我想用查询来找到下一道工序即"钳"

同理,如果完工序为钳,找一下道工序就为"表",其它依次操作.说明"每一道工序均有"-"分开"

点击下载此附件

 

Top
liaohk 发表于:2011-01-19 07:26:53
?

煮江品茶 发表于:2011-01-19 07:47:28
Function 下道工序(合并字符串 As String, 本道工序 As String) As String
Dim A
Dim i As Long
A = Split(合并字符串)
For i = 0 To UBound(A, 1) - 1
    If A(i) = "本道工序" Then
        下道工序 = A(i + 1)
        Exit For
    End If
Next
End Function


liaohk 发表于:2011-01-19 14:01:52

感谢您,老师,我试一下。



liaohk 发表于:2011-01-19 15:05:43

 

煮江品茶 

    老师您好

 

在此文中得到您的帮助,但我在查询如如此函数调不来下道工序,请老师再帮我指点。在查询中如何操作。我有个附件,请老师帮处理一下。感谢



煮江品茶 发表于:2011-01-19 18:53:33
liaohk 发表于:2011-01-19 19:45:15

感谢煮江品茶老师的帮助,结果正确



总记录:6篇  页次:1/1 9 1 :