Click here to Skip to main content
13,258,055 members (50,807 online)
Rate this:
Please Sign up or sign in to vote.
See more:
How to make a sample database that can search edit delete and add.

and can be View the data .mdb file in dataviewGrid..

Can anyone Convert this vb6 to 2010 code

If txtsearch.Text = "" Then
MsgBox "Input textbox!", vbInformation, "No Data"
txtsearch.Text = ""
msgError.Caption = ""
    Data1.RecordSource = "select * from Customer_data where Email_Suffix = '" + txtsearch.Text + "' "
If Data1.Recordset.RecordCount = 0 Then
MsgBox "No Match!", vbExclamation, "Not found"
msgError.Caption = ""


If txtsearch.Text <> "" Then
msgError.Caption = Data1.Recordset.Fields("Ship_to_Identifier")
MsgBox "Match Found!!!", vbInformation, "Data found"
dbkey.Enabled = True
'Text Box
'txtkey.Enabled = True
'cmdKeyIdentify.Enabled = True
ElseIf Data1.Recordset.RecordCount = 0 Then
MsgBox "Data is lack!", vbExclamation, "Error"
msgError.Caption = Data1.Recordset.Fields("Ship_to_Identifier")
End If
End If
End If
Posted 19-Feb-13 4:49am
Updated 27-Feb-13 1:16am
richcb 19-Feb-13 9:52am
Those are good terms to ask Google.
Sandeep Mewara 19-Feb-13 10:44am
Tried anything so far?
ryanb31 19-Feb-13 11:14am
There are a million ways. What do you have so far so we can help?

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

Best way to learn something from scratch is always to read a book about it or contact Mr. "". To be fair, I appreciate your effort you showed within your question. But we are here in the Q&A section to answer to specific codeing problems including screenshots and code snippets submitted by you.

Marco Bertschi

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month

Advertise | Privacy |
Web04 | 2.8.171114.1 | Last Updated 27 Feb 2013
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100