I am using the not in the list event to add the new value to a table.I dont want to ask the user whether to add the new item to a list, i just want it to be added.This all works fine except when the value entered is a number less than 1.Access adds the value but then prompts with the usual "the text entered is not in the list" ,even though the value is visible in the list. any other number > =1 works fine, eg 1.2, 2, 5,55.36
Does anybody have any ideas as to why this would be so?
Private Sub ThicknessId_NotInList(NewData As String, Response As Integer)
Dim Thickness As Single
If IsNumeric(NewData) Then
Thickness = NewData
End If
AddThickness (Thickness)
Response = acDataErrAdded
End Sub
Regards
Bjackson
Does anybody have any ideas as to why this would be so?
Private Sub ThicknessId_NotInList(NewData As String, Response As Integer)
Dim Thickness As Single
If IsNumeric(NewData) Then
Thickness = NewData
End If
AddThickness (Thickness)
Response = acDataErrAdded
End Sub
Regards
Bjackson