VB.Net Create Menu Using MySQL

How To Make A Menu Using MenuStrip And  MySQL Database In VbNet

In This VB.Net Tutorial  We Will See How To Create A Menu Using MenuStrip And Add To This Menu Categories Using ToolStripMenuItem With Image And Text From MySQL Database Table And Add Also To This ToolStripMenuItem SubCategorys Elements From MySQL Database Using MySqlDataAdapter + DataTable + MemoryStream In Visual Basic.Net  Programming Language And Visual Studio Editor.

Project Source Code:

Imports MySql.Data.MySqlClient

Imports System.IO

Public Class Create_Menu8from_MySQL

    Dim connection As New MySqlConnection("datasource=localhost;port=3306;username=root;password=;database=s_t_d")

  ' add ToolStripMenuItem elements to menustrip using for loop 

    Private Sub Create_Menu8from_MySQL_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim adapter As New MySqlDataAdapter("SELECT * FROM `mypics`", connection)

        Dim table As New DataTable()

        adapter.Fill(table)

        For i As Integer = 0 To table.Rows.Count - 1 Step +1

            Dim img() As Byte

            img = table(i)(3)

            Dim ms As New MemoryStream(img)

            Dim pic As Image = Image.FromStream(ms)

            Dim tsm As New ToolStripMenuItem(table(i)(1), pic)

            addItems(tsm, table(i)(0))

            MenuStrip1.Items.Add(tsm)

        Next

    End Sub

   ' create a function to add subElements to ToolStripMenuItem 

    Sub addItems(ByVal tmenu As ToolStripMenuItem, ByVal id As String)

        Dim adapter As New MySqlDataAdapter("SELECT `idMyPics`, `name`, `pic` FROM `pics2` WHERE `idMyPics` = " + id, connection)

        Dim table As New DataTable()

        adapter.Fill(table)

        For i As Integer = 0 To table.Rows.Count - 1 Step +1

            Dim img() As Byte

            img = table(i)(2)

            Dim ms As New MemoryStream(img)

            Dim pic As Image = Image.FromStream(ms)

            tmenu.DropDown.Items.Add(table(i)(1), pic)

        Next

    End Sub

End Class

      

///////////////OUTPUT:

---

More VB.NET

➜ VB.Net Courses

➜ VB.Net Projects

VB.Net Add Item To Menu From MySQL

How To Add A New Item To MenuStrip From MySQL Database In VbNet

In This VB.Net Tutorial  We Will See How To Create A New ToolStripMenuItem With Image And Text From MySQL Database Table And Add This ToolStripMenuItem To A MenuStrip Element Using MySqlDataAdapter + DataTable + MemoryStream In Visual Basic.Net  Programming Language And Visual Studio Editor.

Project Source Code:

Imports MySql.Data.MySqlClient

Imports System.IO

Public Class Add_Item_To_MenuStrip_From_MySQL

    Dim connection As New MySqlConnection("datasource=localhost;port=3306;username=root;password=;database=s_t_d")

    Private Sub Add_Item_To_MenuStrip_From_MySQL_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim adapter As New MySqlDataAdapter("SELECT * FROM `mypics`", connection)

        Dim table As New DataTable()

        adapter.Fill(table)

        For i As Integer = 0 To table.Rows.Count - 1 Step +1

            Dim img() As Byte

            img = table(i)(3)

            Dim ms As New MemoryStream(img)

            Dim pic As Image = Image.FromStream(ms)

            MenuStrip1.Items.Add(table(i)(1), pic)

        Next

    End Sub

End Class

      

///////////////OUTPUT:

---

More VB.NET

➜ VB.Net Courses

➜ VB.Net Projects

VB.Net Insert All DataGridView Data In MySQL

How To Add All DataGridView Values Into MySQL Database Using VbNet

In This VB.Net Tutorial  We Will See How To Populate A Datagridview From Datatable And Add All Datagridview Row's Records In MySQL Database Using For Loop And Mysqlcommand with Parameters In Visual Basic.Net  Programming Language And Visual Studio Editor.

Project Source Code:

Imports MySql.Data.MySqlClient

Public Class Insert_All_DGV_Data_To_MySQL

    Dim connection As New MySqlConnection("datasource=localhost;port=3306;username=root;password=;database=s_t_d")

    Private Sub Insert_All_DGV_Data_To_MySQL_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        ' populate datagridview from datatable 

        Dim table As New DataTable("Table")

        ' Add columns to your datatable 

        table.Columns.Add("Id", Type.GetType("System.Int32"))

        table.Columns.Add("First Name", Type.GetType("System.String"))

        table.Columns.Add("Last Name", Type.GetType("System.String"))

        table.Columns.Add("Age", Type.GetType("System.Int32"))

        ' Add rows to the datatable 

        table.Rows.Add(1, "aaaa", "bbbb", 21)

        table.Rows.Add(2, "SSDD", "hGSQ", 33)

        table.Rows.Add(3, "fgfgd", "jgfdd", 53)

        table.Rows.Add(4, "cvfghyghj", "sdrgtyh", 19)

        table.Rows.Add(5, "hghfd", "ghjgdf", 36)

        table.Rows.Add(6, "cvvdfgh", "juyrfdvc", 63)

        DataGridView1.DataSource = table

    End Sub

    Private Sub ButtonInsert_Click(sender As Object, e As EventArgs) Handles ButtonInsert.Click

        Dim cmd As MySqlCommand

        connection.Open()

        For i As Integer = 0 To DataGridView1.Rows.Count - 2 Step +1

            cmd = New MySqlCommand("INSERT INTO `dgv_data`(`id`, `first_name`, `last_name`, `age`) VALUES (@ID, @FN, @LN, @AGE)", connection)

            cmd.Parameters.Add("@ID", MySqlDbType.Int64).Value = DataGridView1.Rows(i).Cells(0).Value.ToString()

            cmd.Parameters.Add("@FN", MySqlDbType.VarChar).Value = DataGridView1.Rows(i).Cells(1).Value.ToString()

            cmd.Parameters.Add("@LN", MySqlDbType.VarChar).Value = DataGridView1.Rows(i).Cells(2).Value.ToString()

            cmd.Parameters.Add("@AGE", MySqlDbType.Int64).Value = DataGridView1.Rows(i).Cells(3).Value.ToString()

            cmd.ExecuteNonQuery()

        Next

        connection.Close()

        MessageBox.Show("All Data Inserted")

    End Sub

End Class

      

///////////////OUTPUT:

---

Download Projects Source Code

▶ Get Java Projects

▶ Get C# Projects

▶ Get VB.Net Projects

▶ Get Java + C# + VB.Net + Python Projects

C# Populate Combobox From Datatable

How To Fill A Combobox Using A DataTable In C# 

In This C# Tutorial  We Will See How To Populate A ComboBox With DataTable Data In Form Load Using CSharp Programming Language And Visual Studio Editor.

Project Source Code:

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

using System.Windows.Forms;

namespace WindowsFormsApplication1

{

    public partial class PopulateComboboxFromDatatable : Form

    {

        public PopulateComboboxFromDatatable()

        {

            InitializeComponent();

        }

        private void PopulateComboboxFromDatatable_Load(object sender, EventArgs e)

        {

            // create a datatable

            DataTable table = new DataTable();

            // add columns to datatable

            table.Columns.Add("id");

            table.Columns.Add("username");

            // add rows to datatable

            table.Rows.Add("1","PHP");

            table.Rows.Add("2", "C#");

            table.Rows.Add("3", "Java");

            table.Rows.Add("4", "Javascript");

            table.Rows.Add("5", "C++");

            comboBox1.DataSource = table;

            comboBox1.DisplayMember = "username";

        }

    }

}

      

///////////////OUTPUT:

---

Download Projects Source Code

▶ Get Java Projects

▶ Get C# Projects

▶ Get VB.Net Projects

▶ Get Java + C# + VB.Net + Python Projects

VB.Net Populate Combobox From Datatable

How To Fill A Combobox Using A DataTable In Visual Basic.Net 

In This VB.Net Tutorial  We Will See How To Populate A ComboBox From DataTable In Form Load Using Visual Basic.Net Programming Language And Visual Studio Editor.

Project Source Code:

Public Class PopulateComboboxFromDatatable

    Private Sub PopulateComboboxFromDatatable_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim table As New DataTable()

        table.Columns.Add("id")

        table.Columns.Add("username")

        table.Rows.Add("1", "UN1")

        table.Rows.Add("2", "UN2")

        table.Rows.Add("3", "UN3")

        table.Rows.Add("4", "UN4")

        table.Rows.Add("5", "UN5")

        table.Rows.Add("6", "UN6")

        ComboBox1.DataSource = table

        ComboBox1.DisplayMember = "username"

    End Sub

End Class

      

///////////////OUTPUT:

---

More VB.NET

➜ VB.Net Courses

➜ VB.Net Projects

VB.NET - How To Add Delete And Update DataGridView Row Using TextBoxes In VBNET

VB.NET - How To Add Delete And Update Row From DataGridView Using TextBoxes In VB.NET 

                                                                                                                         

In This VB.NET Tutorial We Will See How To Add A Row To DataGridView From TextBox, Update A Selected Row Using TextBox, And Delete The Selected Row In VB.NET Programming Language.

Project Source Code:

Imports System.Data.DataTable

Public Class Add_Update_Delete_DataGridView_Row

 ' Create a new datatable

    Dim table As New DataTable("Table")

    Dim index As Integer

    Private Sub Add_Update_Delete_DataGridView_Row_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    ' Add columns to your datatable, 
    ' with the name of the columns and their type 

        table.Columns.Add("Id", Type.GetType("System.Int32"))

        table.Columns.Add("First Name", Type.GetType("System.String"))

        table.Columns.Add("Last Name", Type.GetType("System.String"))

        table.Columns.Add("Age", Type.GetType("System.Int32"))

         ' Add rows to the datatable with some data

        table.Rows.Add(1, "XXXX", "YYYYY", 21)

        table.Rows.Add(2, "SSDD", "hGSQ", 33)

        table.Rows.Add(3, "fgfgd", "jgfdd", 53)

        table.Rows.Add(4, "cvfghyghj", "sdrgtyh", 19)

        table.Rows.Add(5, "hghfd", "ghjgdf", 36)

        table.Rows.Add(6, "cvvdfgh", "juyrfdvc", 63)

        table.Rows.Add(7, "aefht", "cvfhytrff", 21)

        table.Rows.Add(8, "wghyuj", "mihgdwrh", 33)

        table.Rows.Add(9, "qsztii", "bvdhjh", 53)

        table.Rows.Add(10, "rytyufd", "esdfzr", 19)

   'set data from datatable to datagridview

        DataGridView1.DataSource = table

    End Sub

  ' Add A Row To DataGridView From TextBoxes

    Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.Click

        table.Rows.Add(TextBoxID.Text, TextBoxFN.Text, TextBoxLN.Text, TextBoxAGE.Text)

        DataGridView1.DataSource = table

    End Sub

    ' Get Selected Row Values From DataGridView Into TextBoxes

    Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick

        ' get the index of the selected datagridview row

        index = e.RowIndex

        Dim selectedRow As DataGridViewRow

   ' show data from the selected row to textboxes

        selectedRow = DataGridView1.Rows(index)

        TextBoxID.Text = selectedRow.Cells(0).Value.ToString()

        TextBoxFN.Text = selectedRow.Cells(1).Value.ToString()

        TextBoxLN.Text = selectedRow.Cells(2).Value.ToString()

        TextBoxAGE.Text = selectedRow.Cells(3).Value.ToString()

    End Sub

   ' update the datagridview selected row using textbox

    Private Sub btnUpdate_Click(sender As Object, e As EventArgs) Handles btnUpdate.Click

         ' the new row

        Dim newDataRow As DataGridViewRow

        newDataRow = DataGridView1.Rows(index)

   ' get data from textboxes to the row

        newDataRow.Cells(0).Value = TextBoxID.Text

        newDataRow.Cells(1).Value = TextBoxFN.Text

        newDataRow.Cells(2).Value = TextBoxLN.Text

        newDataRow.Cells(3).Value = TextBoxAGE.Text

    End Sub

    Private Sub btnDelete_Click(sender As Object, e As EventArgs) Handles btnDelete.Click

        DataGridView1.Rows.RemoveAt(index)

    End Sub

End Class

///////////////OUTPUT:

vb.net add a row to datagridview

vb.net update a datagridview row

vb.net delete a datagridview row

---

Download Projects Source Code

▶ Get Java Projects

▶ Get C# Projects

▶ Get VB.Net Projects

▶ Get Java + C# + VB.Net + Python Projects