VB.Net Create Menu Using MySQL - Hallo sahabat Dev-Create, Pada Artikel yang anda baca kali ini dengan judul VB.Net Create Menu Using MySQL, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan
Artikel add,
Artikel datatable,
Artikel insert,
Artikel Insert A New ToolStripMenuItem To MenuStrip From MySQL In Vb.Net,
Artikel Menu,
Artikel MenuStrip,
Artikel mysql,
Artikel mysql database,
Artikel ToolStripMenuItem,
Artikel vb.net,
Artikel VB.Net Create Menu From MySQL DataBase,
Artikel vb.net menu, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.
Judul : VB.Net Create Menu Using MySQL
link : VB.Net Create Menu Using MySQL
Anda sekarang membaca artikel VB.Net Create Menu Using MySQL dengan alamat link https://dev-create.blogspot.com/2017/12/vbnet-create-menu-using-mysql.html
Judul : VB.Net Create Menu Using MySQL
link : VB.Net Create Menu Using MySQL
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:
Demikianlah Artikel VB.Net Create Menu Using MySQL
Sekianlah artikel VB.Net Create Menu Using MySQL kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.
Anda sekarang membaca artikel VB.Net Create Menu Using MySQL dengan alamat link https://dev-create.blogspot.com/2017/12/vbnet-create-menu-using-mysql.html