MS Access 自动填写表格不填写货币

如何解决MS Access 自动填写表格不填写货币

我有一个表单，用户可以在其中从组合框中选择一个 InventoryID，然后它会自动填充其他信息（setID 和 RentalRate）。它将填充 setID，但不会填充 RentalRate。在它所基于的表中，RentalRate 被格式化为货币。

cboInvnetoryID 的内部选择查询具有以下列： 0.记录ID（自动编号）

1. 广告资源 ID（文本）
2. setID（文本）
3. RentalRte（货币）

这是我用于自动填充的 VBA：

Private Sub cboInventoryID_AfterUpdate()
Me.txtSetID.Value = Me.cboInventoryID.Column(2)
Me.txtRentalRate.Value = Me.cboInventoryID.Column(3)
End Sub

有没有想过为什么RentalRate 字段没有自动填充？

解决方法

组合框只返回文本，所以用字符串表达式填充汇率列，可以转换为货币：

modified

为此使用查询：

RentalRateText = Str([RentalRte])

现在，将这些转换为数字：

Select [Inventory ID],SetId,Str([RentalRte]) As RentalRateText
From YourTable
Order By [Inventory ID]

另外，我想 Me!txtRentalRate.Value = Val(Me!.cboInventoryID.Column(3)) 应该读为 .Column(3)，因为列索引是从零开始的。

,

发生了很多事情。首先，我错过了表单所基于的表格没有标准化，所以我解决了这个问题。我也混淆了列数，所以 VBA 是正确的，我只是翻转了列号。