Office中国论坛/Access中国论坛

标题: 如何查询序号，序号问题怎么搞？哪位老大帮忙看看了。 [打印本页]

作者: zhafs 时间: 2024-1-9 18:51
标题: 如何查询序号，序号问题怎么搞？哪位老大帮忙看看了。
本帖最后由 zhafs 于 2024-1-9 18:57 编辑

老大，
序号1，2，3...好像不好查询得到，搞不定来找各位老大帮忙看看。

本来想通过更新查询，将工作号由订单编号&行号（或者说序号）更新一下。

想添加：S240102.1;
S240102.2;
S240102.3
...........

后来发现搞不定，根本搞不定，就来发个帖子了。  哪位老大帮帮忙。。。

传个附件吧！别说不清楚。

      [attach]64726[/attach]

[attach]64725[/attach]

作者: tmtony 时间: 2024-1-10 10:00
按钮里加上以下代码

Dim rs As DAO.Recordset
Dim i As Integer
Set rs = CurrentDb.OpenRecordset("Temp_Sales")
Do While Not rs.EOF
rs.Edit
i = i + 1
rs("工作号") = rs("订单编号") & "_" & i
rs.Update
rs.MoveNext
Loop
rs.Close
Me.Temp_Sales_子窗体.Form.Requery

作者: zhafs 时间: 2024-1-10 11:03
感谢老大！我试试！

作者: zhafs 时间: 2024-1-11 19:37

tmtony 发表于 2024-1-10 10:00
按钮里加上以下代码

Dim rs As DAO.Recordset

老大！验证完美，可是换到平台里
提示：
编译错误
用户定义类型未定义。求老大帮忙看看。

[attach]64727[/attach]

作者: zhafs 时间: 2024-1-12 09:01
老大，感谢，解决了！！！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)