Fixed, Final Code, Thanks for the Help
Thank You for the Help. The code works Great. Here is my Final Code
______________________
Private Sub cmdDelete_Click()
On Error GoTo Err_cmdDelete_Click
Dim strSQL As String
Dim var As Variant
strSQL = "Delete * FROM tbllinkPersonel_Training WHERE...