22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.
NET
HOME TOOLS PROJECTS PRIVACY POLICY
NOOB CODER
Home CURD Operation into My_Sql Database Using VB.NET CURD Operation into My_Sql Database Using VB.NET
CURD Operation into My_Sql Database Using
VB.NET
techtime.blogspot.com April 09, 2022
Create, Update, Read, Delete and Search Operation into My_Sql
Database Using VB.NET
I am Creating Windows application using VB.Net. In this Article you will learn about Select, Insert,
Update, delete and Search Operation in VB.Net and MySQL. Here I am displaying Records in
Datagridview from MySQL Database.
I am Creating windows application in vb.net named CURD Operation into My_Sql Database Using
VB.NET. In this application I am using Four Textbox, one Datagridview, One PictureBox, Five Button,
One ComboBox, One CheckBox, One Datetimepicker controls and Six Labels.
Step 1 => Create My-SQl Database "curd.sql"
Download Database Here
Step 2 => Make a Form Design
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 1/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
HOME TOOLS PROJECTS PRIVACY POLICY
I am using Following Controls and it's name
txt_proCode.Text : It is used to get the Product Code.
txt_ProName.Text : It is used to get the ProductName.
Combo_proGroup.Text : It is used to get the Product Group.
txt_Price.Text : It is used to get the Price.
dtp_ExpDate.Value : It is used to get the Expaired.
Check_Status.Checked.ToString : It is used to get the Status Available or Not Available.
Pic_ProductPic : It is used to get the Product Images.
Step 3 => Import "MysqlData.dll"
"MysqlData.dll" Download Here
Following Coding
Imports MySql.Data.MySqlClient
Imports System.IO
Step 4 => Connect My_Sql Database into VB.NET
Following Coding
Dim conn As New
MySqlConnection("server=localhost;port=3306;username=root;password=;database=curd")
Dim i As Integer
Dim dr As MySqlDataReader
Step 5 => Browse Images Load to PictureBox
Following Coding
Dim pop As OpenFileDialog = New OpenFileDialog
If pop.ShowDialog Windows.Forms.DialogResult.Cancel Then
Pic_ProductPic.Image = Image.FromFile(pop.FileName)
End If
Step 6 => Insert Record to My_Sql Database Using VB.NET
SOCIAL PLUGIN
YouTube Facebook
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 2/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
YouTube Facebook
HOME TOOLS PROJECTS PRIVACY POLICY
SUBSCRIBE US
How to Make Register and Log…
Log…
Following Coding
Public Sub save()
Try
conn.Open()
Dim cmd As New MySqlCommand("INSERT INTO `tbl_curd`(`PROID`, `PRONAME`, MOST POPULAR
`PROGROUP`, `PRICE`, `EXPDATE`, `STATUS`,`IMG`) VALUES
(@PROID,@PRONAME,@PROGROUP,@PRICE,@EXPDATE,@STATUS,@IMG)", conn)
VB.NET - Restaurant Point of Sale POS
cmd.Parameters.Clear() Full Project VB.NET Using My_Sql
cmd.Parameters.AddWithValue("@PROID", txt_proCode.Text) Database | Free Source Code
cmd.Parameters.AddWithValue("@PRONAME", txt_ProName.Text) November 01, 2022
cmd.Parameters.AddWithValue("@PROGROUP", Combo_proGroup.Text)
cmd.Parameters.AddWithValue("@PRICE", CDec(txt_Price.Text)) Coffee Shop Management Systems
cmd.Parameters.AddWithValue("@EXPDATE", CDate(dtp_ExpDate.Value)) into MS-ACCESS Using VB.NET
cmd.Parameters.AddWithValue("@STATUS", CBool(Check_Status.Checked.ToString))
May 01, 2022
'image convert to binary format
Inventory Management System in
Dim FileSize As New UInt32 VB.NET and MySql database[Source
Dim mstream As New System.IO.MemoryStream code] | VB.NET Tutorial
Pic_ProductPic.Image.Save(mstream, System.Drawing.Imaging.ImageFormat.Jpeg) May 01, 2022
Dim picture() As Byte = mstream.GetBuffer
FileSize = mstream.Length
mstream.Close() LABELS
cmd.Parameters.AddWithValue("@IMG", picture)
CURD OPERATION INTO MS-ACCESS DATABASE
i = cmd.ExecuteNonQuery
USING VB.NET 1 POSTS
If i > 0 Then
MessageBox.Show("Record Save Success !", "CURD", MessageBoxButtons.OK,
MessageBoxIcon.Information)
CURD OPERATION INTO MY_SQL DATABASE
Else USING VB.NET 1 POSTS
MessageBox.Show("Record Save Failed !", "ERROR", MessageBoxButtons.OK,
MessageBoxIcon.Asterisk) DAIRY FARM MANAGEMENT SYSTEM IN VB.
End If NET AND MY_SQL DATABASE. 1 POSTS
Catch ex As Exception
MsgBox(ex.Message) GENERATE BARCODE IN VB.NET 1 POSTS
Finally
conn.Close() GENERATE QR CODE IN VB.NET 1 POSTS
End Try
clear() HOW TO MAKE REGISTER AND LOGIN FORM IN
End Sub VB.NET AND MS ACCESS DATABASE 1 POSTS
Step 7 => Update Record to My_Sql Database Using VB.NET MS-ACCESS & VB.NET 2 POSTS
MY_SQL & VB.NET 1 POSTS
VB.NET - RESTAURANT POINT OF SALE POS
FULL PROJECT VB.NET USING MY_SQL DATABASE
| FREE SOURCE CODE 1 POSTS
WATER BILLING MANAGEMENT SYSTEM IN
VB.NET USING MY_SQL DATABASE 1 POSTS
Following Coding
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 3/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
HOME TOOLS PROJECTS PRIVACY POLICY
Public Sub edit()
Try
conn.Open()
Dim cmd As New MySqlCommand("UPDATE `tbl_curd` SET
`PRONAME`=@PRONAME,`PROGROUP`=@PROGROUP,`PRICE`=@PRICE,`EXPDATE`=@EXPDATE,`STATUS`=@STATU
S,`IMG`=@IMG WHERE `PROID`=@PROID", conn)
cmd.Parameters.Clear()
cmd.Parameters.AddWithValue("@PRONAME", txt_ProName.Text)
cmd.Parameters.AddWithValue("@PROGROUP", Combo_proGroup.Text)
cmd.Parameters.AddWithValue("@PRICE", CDec(txt_Price.Text))
cmd.Parameters.AddWithValue("@EXPDATE", CDate(dtp_ExpDate.Value))
cmd.Parameters.AddWithValue("@STATUS", CBool(Check_Status.Checked.ToString))
'image convert to binary format
Dim FileSize As New UInt32
Dim mstream As New System.IO.MemoryStream
Pic_ProductPic.Image.Save(mstream, System.Drawing.Imaging.ImageFormat.Jpeg)
Dim picture() As Byte = mstream.GetBuffer
FileSize = mstream.Length
mstream.Close()
cmd.Parameters.AddWithValue("@IMG", picture)
cmd.Parameters.AddWithValue("@PROID", txt_proCode.Text)
i = cmd.ExecuteNonQuery
If i > 0 Then
MessageBox.Show("Record Update Success !", "CURD", MessageBoxButtons.OK,
MessageBoxIcon.Information)
Else
MessageBox.Show("Record Update Failed !", "ERROR", MessageBoxButtons.OK,
MessageBoxIcon.Asterisk)
End If
Catch ex As Exception
MsgBox(ex.Message)
Finally
conn.Close()
End Try
clear()
DGV_load()
End Sub
Step 8 => Delete Record to My_Sql Database Using VB.NET
Following Coding
Public Sub delete()
If MsgBox("Are You Sure Delete This Record", MsgBoxStyle.Question + vbYesNo) =
vbYes Then
Try
conn.Open()
Dim cmd As New MySqlCommand("DELETE FROM `tbl_curd` WHERE
`PROID`=@PROID", conn)
cmd.Parameters.Clear()
cmd.Parameters.AddWithValue("@PROID", txt_proCode.Text)
i = cmd.ExecuteNonQuery
If i > 0 Then
MessageBox.Show("Record Deleted Success !", "CURD",
MessageBoxButtons.OK, MessageBoxIcon.Information)
Else
MessageBox.Show("Record Deleted Failed !", "ERROR",
MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
End If
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 4/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
HOME TOOLS Catch
PROJECTS PRIVACY POLICY
ex As Exception
MsgBox(ex.Message)
Finally
conn.Close()
End Try
clear()
DGV_load()
Else
Return
End If
End Sub
Step 9 => Clear Record from Controls
Following Coding
Public Sub clear()
txt_proCode.Clear()
txt_Proname.Clear()
txt_price.Clear()
combo_proGroup.Text = ""
dtp_ExpDate.Value = Now
Check_Status.CheckState = False
Pic_ProductPic.Image = Nothing
txt_proCode.ReadOnly = False
btn_save.Enabled = True
End Sub
Step 10 => Search Record to My_Sql Database Using VB.NET
Following Coding
TextChanged Events Selected
DataGridView1.Rows.Clear()
Try
conn.Open()
Dim cmd As New MySqlCommand("SELECT * FROM tbl_curd WHERE PROID like '%" &
txt_search.Text & "%' or PRONAME like '%" & txt_search.Text & "%'", conn)
dr = cmd.ExecuteReader
While dr.Read
DataGridView1.Rows.Add(dr.Item("PROID"), dr.Item("PRONAME"),
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 5/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
dr.Item("PROGROUP"), dr.Item("PRICE"), dr.Item("EXPDATE"),
HOME TOOLS PROJECTS PRIVACY
Format(CBool(dr.Item("STATUS"))), POLICY
dr.Item("IMG"))
End While
dr.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
Finally
conn.Close()
End Try
End Sub
Step 11 => DataGridView Cell Click Then Send data to Controls
Following Coding
CellClick Events Selected
txt_proCode.Text = DataGridView1.CurrentRow.Cells(0).Value
txt_ProName.Text = DataGridView1.CurrentRow.Cells(1).Value
Combo_proGroup.Text = DataGridView1.CurrentRow.Cells(2).Value
txt_Price.Text = DataGridView1.CurrentRow.Cells(3).Value
dtp_ExpDate.Text = DataGridView1.CurrentRow.Cells(4).Value
Check_Status.Checked = DataGridView1.CurrentRow.Cells(5).Value
Dim bytes As [Byte]() = DataGridView1.CurrentRow.Cells(6).Value
Dim ms As New MemoryStream(bytes)
Pic_ProductPic.Image = Image.FromStream(ms)
txt_proCode.ReadOnly = True
Btn_save.Enabled = False
Step 12 => DataGridView Load Mysql Data
Following Coding
Public Sub DGV_load()
DataGridView1.Rows.Clear()
Try
conn.Open()
Dim cmd As New MySqlCommand("SELECT * FROM tbl_curd", conn)
dr = cmd.ExecuteReader
While dr.Read
DataGridView1.Rows.Add(dr.Item("PROID"), dr.Item("PRONAME"),
dr.Item("PROGROUP"), dr.Item("PRICE"), dr.Item("EXPDATE"),
Format(CBool(dr.Item("STATUS"))), dr.Item("IMG"))
End While
dr.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
Finally
conn.Close()
End Try
End Sub
Thanks
Happy Coding.....
Subscribe For More Projects...
Tags: CURD Operation into My_Sql Database Using VB.NET
Facebook Twitter
OLDER NEWER
CURD Operation into My_Sql Database Using VB.NET CURD Operation into MS-ACCESS Database Using
VB.NET
Posted by: techtime.blogspot.com
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 6/7
22/11/2023 21:19 CURD Operation into My_Sql Database Using VB.NET
HOME TOOLS PROJECTS PRIVACY POLICY
YOU MAY LIKE THESE POSTS
CURD OPERATION INTO MY_SQL
DATABASE USING VB.NET
CURD Operation into My_Sql
Database Using VB.NET
April 09, 2022
POST A COMMENT
0 Comments
To leave a comment, click the button below to sign in with Google.
SIGN IN WITH GOOGLE
CONTACT POPULAR POSTS TAGS
Name VB.NET - Restaurant Point of Sale POS CURD Operation into MS-ACCESS Database Using
Full Project VB.NET Using My_Sql
VB.NET
CURD Operation into My_Sql Database Using VB.NET
Database | Free Source Code
Email * November 01, 2022 Dairy Farm Management system in vb. Net and My_sql
Database.
Generate Barcode in VB.NET
Coffee Shop Management Systems
Message * into MS-ACCESS Using VB.NET
Generate QR Code in VB.NET
May 01, 2022
How to make Register and login form in VB.net and MS
Inventory Management System in Access database
MS-ACCESS & VB.NET My_Sql & VB.NET
VB.NET and MySql database[Source
code] | VB.NET Tutorial VB.NET - Restaurant Point of Sale POS Full Project
May 01, 2022 VB.NETBilling
Water UsingManagement
My_Sql Database | Free
system Source
in vb.net Code
using
Send
my_sql database
CATEGORIES LABELS
Created By Blogging | Distributed By NOOB CODER
https://noobcoderit.blogspot.com/2022/04/curd-operation-into-mysql-database.html 7/7