Click here to Skip to main content
11,494,943 members (36,195 online)
Rate this: bad
Please Sign up or sign in to vote.
See more: VB.NET
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
Edited 27-Feb-13 1:16am
richcb at 19-Feb-13 9:52am
Those are good terms to ask Google.
Sandeep Mewara at 19-Feb-13 10:44am
Tried anything so far?
ryanb31 at 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
0 Dnyaneshwar@Pune 692
1 CHill60 318
2 Sascha Lefèvre 280
3 Sergey Alexandrovich Kryukov 245
4 Nakul Chaudhari 236
0 Sergey Alexandrovich Kryukov 10,307
1 OriginalGriff 8,821
2 Sascha Lefèvre 3,889
3 Maciej Los 3,412
4 Richard Deeming 2,560

Advertise | Privacy | Mobile
Web03 | 2.8.150520.1 | Last Updated 27 Feb 2013
Copyright © CodeProject, 1999-2015
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