Ms访问通过表单

Question

我目前正在使用ms访问表单来查看我创建的表格中使用的数据，以使其更加用户友好。

表格如下：

• tblCourse
• tblEmployee
• tblReason
• tblTraining

使用其他表中的主键填充训练表。

下列字段：

• ID
• 雇员
• 日期
• CourseID
• 其他
• ReasonID

我希望能够使用ms访问表单上的文本框和组合框添加到tblTraining表。但是，我遇到的问题是只能在表格中添加数字格式。有没有一种方法可以插入文本，它会找到链接到它的主要文件并将其添加到表格中。

例如......

我在表单上的文本字段是：

• txtTrainingID
• cbbCourse（显示我们提供的所有课程列表）
• txtDate
• txtFirstName
• txtSurname
• cbbReason（显示员工参加培训的原因列表）
• txtOther

并且上面列出了Training表中的字段。

以下是我用于将员工添加到tblEmployee表的代码示例：

Private Sub btnAdd_Click()

If Me.txtEmployeeID.Tag & "" = "" Then

CurrentDb.Execute "INSERT INTO tblEmployee(EmployeeID, FirstName, Surname) " & _
"VALUES (" & Me.txtEmployeeID & " , '" & Me.txtFirstName & "', '" & Me.txtSurname & "')"

MsgBox ("Employee has been added.")

Else

CurrentDb.Execute "UPDATE tblEmployee " & _
" SET EmployeeID = " & Me.txtEmployeeID & _
", FirstName = '" & Me.txtFirstName & "'" & _
", Surname = '" & Me.txtSurname & "'" & _
" WHERE EmployeeID = " & Me.txtEmployeeID.Tag

MsgBox ("Employee has been updated.")

End If

btnClear_Click

Me.txtEmployeeID.SetFocus

Me.subformEmployee.Form.Requery

End Sub

感谢。

Answer 1

我假设您的表格结构如下

tblCourse： ID自动编号 - PRIMARY KEY

tblEmployee： ID autonumber- PRIMARY KEY

tblReason： ID自动编号 - PRIMARY KEY

tblTraining： ID autonumber - PRIMARY KEY EmployeeID长整数 - FOREIGN KEY REFERENCES tblEmployee（ID） CourseID长整数 - 外键参考资料tblCourse（ID） ReasonID长整数 - FOREIGN KEY REFERENCES tblReason（ID）

如果这是正确的，那么回答你的问题，不，你不能在桌面上的这些字段中添加文字。由于您拥有的关系结构，它必须是一个数字。