格式自动编号的文本不会从一种形式复制到另一种形式

Question

我编写了一个宏，用于将数据从Form1中的一个文本框复制到Form2中的一个文本框。

form1中的文本框从数据库中的字段中获取值，该字段已自动编号并使用格式“ FHMY” 0000000

我的代码可以工作，但不是复制格式化的文本（数字），而是复制序列号：

让我们说与form1关联的表中的第13个条目是fhmy0000013，但是当我使用宏时，它将复制13而不是文本fhmy0000013。

Option Compare Database

Private Sub Command119_Click()

DoCmd.OpenForm "PrinterFhamylabel"

Forms![PrinterFhamyLabel].JOB = Me.JOBNum

Me.JOBNum.SetFocus

End Sub

form2 property

Answer 1

之所以会这样，是因为表JOB中存储在表中的值是13, 14, 15等数字，而不是FHMY0000013, FHMY0000014, FHMY0000015。
正如您在列的定义中所看到的， Format 属性设置为"FHMY"0000000，这仅对表示有效。
因此，在表格和表格中，当存储的实际值是FHMY0000013时，您会看到13。
如果要在form2的文本框中看到复制的值的格式，还必须将此文本框的 Format 更改为："FHMY"0000000
另一种情况是在form2的基础表中，由文本框表示的列定义为数据类型TEXT。
将其更改为Number。