请各位老师看看如何在查询中使用循环：

yanwei82123300

请各位老师看看如何在查询中使用循环：
例子是公司的四班系统（FOURTH SHIFT SYSTEM）中制作的BOM，其中在字段level中如何使用循环函数，依据字段level的值，来添加一个新字段EVEL_ID,它的值使在值的前面添加"."，例如值为1时 .1；值为2时..2；值为3时...3
由于字段leve的值不固定（1~n）
下面是我利用Iif函数做的例子，但是不完整。请大家看看


LEVEL_ID: IIf([LEVEL]=1,"." & [LEVEL],IIf([LEVEL]=2,".." & [LEVEL],IIf([LEVEL]=3,"..." & [LEVEL],IIf([LEVEL]=4,"...." & [LEVEL],IIf([LEVEL]=5,"....." & [LEVEL],IIf([LEVEL]=6,"......" & [LEVEL],IIf([LEVEL]=7,"......." & [LEVEL])))))))

见例子：
我将数据导出到EXCEL中，但是我想在ACCESS中实现这个循环，请看看，谢谢

roych

使用自定义函数：

1. function getNewId(byval LngID as Long)
   
2. dim str as string
   
3. dim i as long
   
4. for i=1 to lngID
   
5. str=str&"."
   
6. next
   
7. getNewId=str&lngID
   
8. end function

复制代码

详见附件：

zpy2

SELECT Switch(level=1,".1",level=2,"..2") AS level_ID

yanwei82123300

roych 发表于 2015-8-18 16:43
使用自定义函数：
详见附件：

roych 显示编译错误，请看看，谢谢

风中漫步

加点是何意呢?

zpy2

应是BOM，加点，可显示为缩进的树形结构吧？

风中漫步

zpy2 发表于 2015-8-19 05:16
应是BOM，加点，可显示为缩进的树形结构吧？

{:soso_e183:}

koutx

一个笨办法，但最简单：
level_ID : Left("....................................................................",[level]) & [level]
前提是引号中的.....多的足够你用即可

zpy2

koutx 发表于 2015-8-19 15:24
一个笨办法，但最简单：
level_ID : Left("........................................................... ...

强，赞一个，有创意

yanwei82123300

roych 发表于 2015-8-18 16:43
使用自定义函数：
详见附件：

老师您好！请您解释一下这个函数可以吗？谢谢