VB programing problem

zia.sepsis
zia.sepsis
@ziasepsis-0NGPzn • Oct 23, 2024

hi mates
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.

Like 0 Replies 5

Replies

Welcome, guest

Join CrazyEngineers to reply, ask questions, and participate in conversations.

Sign up Log in

CrazyEngineers powered by Jatra Community Platform

  • zia.sepsis
    zia.sepsis

    @ziasepsis-0NGPzn • Jan 7, 2009

    I have to forget to add this.... am using vb as a front end and oracle as a back end

    0
  • shalini_goel14
    shalini_goel14

    @shalini-goel14-ASmC2J • Jan 7, 2009

    Hi zia.sepsis,

    If you can show us your full code, I guess that will be more helpful. Anyways by that time try putting MsgBox at every step, the one will not print msgbox text will indicate the error at that line.

    Let us know after trying it. 😀

    0
  • zia.sepsis
    zia.sepsis

    @ziasepsis-0NGPzn • Jan 7, 2009

    shalini_goel14Hi zia.sepsis,

    If you can show us your full code, I guess that will be more helpful. Anyways by that time try putting MsgBox at every step, the one will not print msgbox text will indicate the error at that line.

    Let us know after trying it. 😀

    thanks shalini for your concern. i have got the solution for it 😁

    0
  • Kaustubh Katdare
    Kaustubh Katdare

    @thebigk • Jan 7, 2009

    How about sharing the solution with us? I am sure lot of members will find it useful.

    0
  • shalini_goel14
    shalini_goel14

    @shalini-goel14-ASmC2J • Jan 7, 2009

    zia.sepsisthanks shalini for your concern. i have got the solution for it 😁

    Hi zia.sepsis,

    Good 😀.Please share your actual problem with solution here so that no one does that mistake again in future.

    0