主题：[求助]如何生成序列编号+单位名称？

Select Case e.DataCol.Name

    Case "信息库备案表" '如果在图片列插入文件

         dim dw as string 

         select case e.DataRow("单位名称") 

              case "政府办"

                   dw = "01政府办"

              Case "发改委"

                   dw = "02发改委"

         end select

        e.Subfolder = e.DataCol.name & "\" & dw '将此文件存放在目录名为部门名称的子目录中.

End Select