MS Access VBA：如何显示前面0的数字？

Question

我在链接表中有以下邮政编码。 我的查询来自此链接表。

01234
00123
12345
12345-6789

问题：前面的零被截断。 我尝试添加撇号以转换为字符串：="'" & [PCode] 但这不是一个好的解决方案。

请帮忙。 感谢。

Answer 1

格式应该适合：

p="12345-6789"
?Format(p,"00000")
12345-6789

p="123"
?Format(p,"00000")
00123

但是，如果您的号码长于5位且需要前面的零，则需要一个IIF：

p="123-6789"
?Format(p,"00000")
123-6789

Answer 2

Postal Code: IIf([PCode] Like "####","0" & [PCode],IIf([PCode] Like "#####-",Left([PCode],Len([PCode])-1),IIf([PCode] Like "#########",Format([PCode],"@@@@@-@@@@"),[PCode])))