我有一个表单,链接到一个表。表单有三个绑定文本框,每个文本框允许数据输入到表中。在文本框中输入日期,美元金额以及要为邮资计费的客户。我的问题是,如果我有多个客户,只需支付一笔费用。
我想更改客户端条目文本框,以便我可以键入多个客户端,用逗号分隔,访问权限将知道输入的金额并将其除以输入的客户端数量。
这可能吗?任何帮助,将不胜感激!我教会了自己大部分的访问权限并且不是很精明。
答案 0 :(得分:1)
首先让我说这不是一个好主意,但是,如果它是供您个人使用,您可以使用VBA拆分文本字符串并获取计数,您可能会遇到许多问题,取决于绑定字段的设置方式。
我建议使用列表框,两个文本框和子表单。使用多选列表框,您可以选择一个或多个客户端。一个小代码将允许您遍历列表并将记录插入到每个客户端的表中,日期和数量除以列表计数。子窗体将显示插入的记录以供检查。
例如:
For Each itm In Me.ListBox.ItemsSelected
sSQL = "INSERT INTO MyTable (ClientID, Amount, InvDate ) " _
& "VALUES ( " & Me.ListBox.Column(0, itm) & "," _
& Me.txtAmount / Me.ListBox.ItemsSelected.Count & ",#" _
& Me.txtDate & "#)"
CurrentDB.Execute sSQL, dbFailOnError
Next
Me.SubformControlName.Form.Requery