Searching dataset hangs screen

Hi all,

i have a function which opens a new screen and tries to search through the dataset to find a specific record. The form opens but it hangs, what am i doing wrong?

VB Code:

Public Function Add_New()
 
        Dim frmNS As New frmNS
        frmNS.Show()
 
        Try
            Do While frmNS.objdsCDets_SDets.CDets(0).CHD_ID() <> sv
                frmNS.BindingContext(frmNS.objdsCDets_SDets, "ChD").Position = (frmNS.BindingContext(frmNS.objdsCDets_SDets, "ChD").Position + 1)
            Loop
 
        Catch ex As Exception
            MsgBox("Error", MsgBoxStyle.OKOnly)
        End Try
 
End Function
 
'where sv contains the pk from the previous form

Cheers

Have you stepped through the code?

How large is the dataset?

It only has a dozen or so records, i have checked that the correct key has been selected by outputting the value to a message box. The problem appears to be when it tries to step through to match up sv with CH_ID.

I have managed to get it to jump to the correct record by putting a combobox and setting the value when the form opens.

combobox.selectedvalue = sv

this works but it doesn't appear to be the best way to do it!