Ms access 转换表单中的测量值以更新表格

我正在使用Access 2010创建一个本地渔民捕获的鱼类数据库。我有一张表，上面有关于每条鱼捕获位置、日期、长度等的所有信息，还有一张表格，可以向该表添加新记录。我正在尝试尽可能多地自动化数据输入，因为我们有许多实习生将在整个夏天输入数据。我能让程序做的越多，我就越能限制数据输入中的错误

我想用公制毫米存储长度数据，但是大多数渔民报告他们捕获的鱼的长度是英寸。我不希望数据库中有两个长度，一个公制，一个英制

是否有一种方法可以在表单上设置一个框，有人可以输入以英寸为单位的长度，然后将该值转换为公制，并用于填写表格上的长度字段？诀窍是，有时鱼的长度是以公制报告的，所以我也需要能够直接将公制输入表单中

我猜这要么是不可能的，要么已经在某个地方了&我在搜索中没有使用正确的关键字。我感谢任何能为我指明正确方向的人

谢谢

在输入测量值的控件的更新后，将该控件称为长度

您可以使用此代码在vba中对其进行更改

Me.length=Me.length*25.4

这是在输入测量值的控件的更新后执行此操作的许多方法之一，例如该控件称为长度

您可以使用此代码在vba中对其进行更改

Me.length=Me.length*25.4

---

这是许多方法之一，这里有一种方法。它类似于苏格兰威士忌，但有一些改进

有两个文本框。毫米和英寸尺寸各1个。 “毫米”文本框通过控制源绑定到表，因此在其中输入的内容就是保存在数据库中的内容。 “英寸”文本框未绑定。但输入到该文本框中的内容将被转换，新值将被输入到毫米文本框中。代码如下所示：

Private Sub txtSizeIn_AfterUpdate()
   Me.txtSizeMM = Me.txtSizeIn * 25.4
End Sub

---

这样，渔民就可以选择使用何种测量方法。

这里有一种方法。它类似于苏格兰威士忌，但有一些改进

有两个文本框。毫米和英寸尺寸各1个。 “毫米”文本框通过控制源绑定到表，因此在其中输入的内容就是保存在数据库中的内容。 “英寸”文本框未绑定。但输入到该文本框中的内容将被转换，新值将被输入到毫米文本框中。代码如下所示：

Private Sub txtSizeIn_AfterUpdate()
   Me.txtSizeMM = Me.txtSizeIn * 25.4
End Sub

---

这样，渔夫就可以选择使用何种测量方法。

谢谢你的回答，汤姆。这工作做得很好！我知道必须有一个简单的方法来做这件事，但我不能把我的拇指放在上面，也找不到正确的关键字来搜索。非常感谢！谢谢你的回答，汤姆。这工作做得很好！我知道必须有一个简单的方法来做这件事，但我不能把我的拇指放在上面，也找不到正确的关键字来搜索。非常感谢！