选中复选框时,数据表视图将值插入到字段中
Datasheet View insert value in to field when checkbox is checked
我有一个表单作为数据表视图,我在里面添加了一个复选框列。
假设带复选框的列是 A 列,右边的是 B 列。
当 A 列中的复选框标记为已选中时,如何在 B 列中插入一些文本。我需要以某种方式找出 复选框的当前行,并从带有复选框的行中获取记录的 ID,并且 运行 为该特定 ID 插入 SQL数据库 table,类似于:SQL = "UPDATE table SET columnB='string' WHERE ID= ROWid;"
如何从数据表视图中进行行选择部分?
Access 基本上不处理行,而是处理数据集。这意味着 Access 在这里的反应与 Excel 截然不同。
您是否只选中了一个复选框,或者是否允许用户在插入所需值之前选中不同的复选框?
在复选框上添加更新后事件并添加:
Private Sub Checkbox_AfterUpdate()
Dim strUser As String
strUser = CurrentUser()
If [Checkbox] = True Then
[UserName] = strUser
Else
[UserName] = ""
End If
End Sub
[用户名] 是您在右列中的(文本)字段。通过用户管理,您可以使用登录名。如果不是,您可以使用当前用户或 Windows 登录名。
CurrentUser() 主要返回 "Admin"。如果您要查找 windows 用户名,请查看此处:
我有一个表单作为数据表视图,我在里面添加了一个复选框列。
假设带复选框的列是 A 列,右边的是 B 列。
当 A 列中的复选框标记为已选中时,如何在 B 列中插入一些文本。我需要以某种方式找出 复选框的当前行,并从带有复选框的行中获取记录的 ID,并且 运行 为该特定 ID 插入 SQL数据库 table,类似于:SQL = "UPDATE table SET columnB='string' WHERE ID= ROWid;"
如何从数据表视图中进行行选择部分?
Access 基本上不处理行,而是处理数据集。这意味着 Access 在这里的反应与 Excel 截然不同。
您是否只选中了一个复选框,或者是否允许用户在插入所需值之前选中不同的复选框?
在复选框上添加更新后事件并添加:
Private Sub Checkbox_AfterUpdate()
Dim strUser As String
strUser = CurrentUser()
If [Checkbox] = True Then
[UserName] = strUser
Else
[UserName] = ""
End If
End Sub
[用户名] 是您在右列中的(文本)字段。通过用户管理,您可以使用登录名。如果不是,您可以使用当前用户或 Windows 登录名。
CurrentUser() 主要返回 "Admin"。如果您要查找 windows 用户名,请查看此处: