How to Populate Listbox in Visual Basic with MySQL Database

1
1703

Today, I will teach you how to  Populate Listbox in Visual Basic with MySQL Database. This will show you how the data of a table in the database are displayed in a ListBox.

Let’s begin:
First create a Database named “info”.
[mysql] CREATE DATABASE dbinformations ;
[/mysql] Then, create a table named “persons”.
[mysql] CREATE TABLE dbinformations.person (
id INT NOT NULL AUTO_INCREMENT ,
FirstName TEXT NOT NULL ,
LastName TEXT NOT NULL ,
PRIMARY KEY ( ID )
) ENGINE = INNODB;
[/mysql] After creating a table in the database, create a query for inserting data in the MySQL Database.
[mysql] INSERT INTO person ( FirstName , LastName )
VALUES (‘Janno’, ‘Palcios’),
(‘Mark’, ‘Palcios’),
(‘Craig’, ‘Palcios’)
[/mysql] After inserting data in the database, open the Visual Basic and create a new Windows Form Application. In the Form add a ListBox.
filldatalistboxform
After dragging ListBox, double click the Form and set up the connection to MySQL Database and Visual Basic. After that, declare all the classes that are needed above the.Form1_Load
[vbnet] Public con As MySqlConnection = New MySqlConnection(“server=localhost;user id=root;database=dbinformations”)
Public cmd As New MySqlCommand
Public da As New MySqlDataAdapter
Public ds As New DataSet
[/vbnet] In the Form1_Load, you have to fill the data in the ListBox that came from the database in the first load Form.
[vbnet] Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
‘OPENING THE CONNECTION
con.Open()
‘SET YOUR COMMANDS TO PROVIDE A TEXT-BASE INTERFACE INTO THE MYSQL DATABASE SERVER.
‘AND ONCE IT’S CONNECTED, YOU CAN MAKE QUERY OR MANY OTHER OPERATION.
With cmd
.Connection = con
.CommandText = “SELECT * FROM person”
End With
‘SET THIS STORED PROCEDURE TO SELECT THE RECORD IN THE DATASOURCE
da.SelectCommand = cmd
‘REFRESHES THE ROWS IN THE DATASER TO MATCH IN THE DATASOURCE USING THE TABLE NAME
da.Fill(ds, “person”)
With ListBox1
‘SET THE DATA SOURCE FOR THE LISTBOX
.DataSource = ds.Tables(0)
‘SET A PROPERTY TO DISPLAY THE DATA THAT CAME FROM THE DATABASE IN THE LISTBOX
.DisplayMember = “FirstName”
End With
‘CLOSING THE CONNECTION
con.Close()
End Sub
[/vbnet]

If you have any questions or suggestions on how to populate listbox, just contact through our contact page.

Download the complete source code Here

Facebook Comments

1 COMMENT

LEAVE A REPLY

Please enter your comment!
Please enter your name here

This site uses Akismet to reduce spam. Learn how your comment data is processed.