
Member • Jan 7, 2009
VB programing problem
private Sub Command4_Click()
Dim N As Integer
N = Val(InputBox("enter the regno:"))
rs.MoveFirst
Do Until rs.EOF
If N = rs!Regno Then
Call disp
Else
MsgBox "no record found"
End If
Exit Do
Loop
rs.MoveNext
End Sub
this is the search command codes. the problem is its not working . so please help mates. if it is wrong please correct it and give me a solution soon.