Member Avatar for S.N.Mazumder
S.N.Mazumder 0 Newbie Poster

Textbox (text1) is connected to MS Access where the lottery Number is shown. I want to find a number entering in textbox (text2). I wrote code against command1 (ENTER NUMBER FOR SEARCH). But it’s not woking. Please anyone help me.
Code are below:
Private Sub Command1_Click()
On Error Resume Next
Data1.Recordset.FindFirst " Number= " & Text2.Text
If Data1.Recordset.NoMatch Then
MsgBox "No Number found!"
Text2.Text = ""
Text2.SetFocus
Else
MsgBox "Number found!"
End If
End Sub


From
Amit

  • 1 Contributor
  • 0 Replies
  • 68 Views
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.