[dba-VB] Multiple-step operation generated errors - check each status value

To all,
 
I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE.  One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null.  The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID.  When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity.  If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error 
 
Multiple-step operation generated errors - check each status value
 
Below is the code for updating:
With rsPersonnel
If (frmOrrPersonnel.PVEthnic <> "") Then
.Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText
Else
                        .Fields("EthnicOrigin") = 0
End If
.Update
End With
 
Can anyone tell me what I am doing wrong ?
 
Thanks in advance for any help as this is really starting to frustrate me.
 
Paul Hartland
Freeserve AnyTime - HALF PRICE for the first 3 months - Save £7.50 a month 
www.freeserve.com/anytime