Réponse acceptée !
peut importe qu'il s'agisse de MySQL ou autre SGBDR
une fois la connexion établie...

Réponse acceptée !
c'est ce que je penser, pourtant les fait sont là. Il m'est impossible d'extraire les données et de les traités. J'ai pourtant regarder beaucoup de tutos et de codes, mais rien ni fait. A chaque fois cela ne fonctionne pas.
Je voulais donc savoir si entre vb 2008 et MySQL il y avait des lignes de code spéciale à connaître. Et si oui, si je pouvait en prendre connaissance.
Lycanges

Réponse acceptée !
voila ma base et mon code:
--
-- Serveur: localhost
-- Généré le : Jeu 05 Juin 2008 à 07:51
-- Version du serveur: 5.0.51
-- Version de PHP: 5.2.5

SET SQL_MODE="NO_AUTO_VALUE_ON_ZERO";

--
-- Base de données: `armee`
--
-- --------------------------------------------------------
--
-- Structure de la table `grade`
--

CREATE TABLE `grade` (
  `Code_grade` varchar(3) NOT NULL,
  `Libellé_grade` varchar(23) default NULL,
  `Catégorie_grade` varchar(3) default NULL,
  `OTAN` varchar(5) default NULL,
  PRIMARY KEY  (`Code_grade`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1;
--
-- Contenu de la table `grade`
--
INSERT INTO `grade` (`Code_grade`, `Libellé_grade`, `Catégorie_grade`) VALUES
('1CL', '1° CLASSE', 'MDR'),
('ADC', 'ADJUDANT CHEF', 'SSU'),
('ADJ', 'ADJUDANT', 'SSU'),
('BCH', 'BRIGADIER CHEF', 'MDR'),
('CAP', 'CAPORAL', 'MDR'),
('CCH', 'CAPORAL CHEF', 'MDR',),
('CDT', 'COMMANDANT', 'OSU'),
('CNE', 'CAPITAINE', 'OSB'),
('COL', 'COLONEL', 'OSU'),
('LTN', 'LIEUTENANT', 'OSB'),
('MAJ', 'MAJOR', 'SSU'),
('SCH', 'SERGENT CHEF', 'SSB'),
('SDT', 'SOLDAT', 'MDR'),
('SGT', 'SERGENT', 'SSB');


et mon code

Imports MySql.Data.MySqlClient
Imports System.Data
Imports System

'Formulaire qui permet de chercher et consulter un personnel dans la base de donnée
Public Class Personnels

    Dim requete As String 'Chaine ou sera stocker les requetes
    Dim dta As MySqlDataAdapter 'Data adapter
    Dim dts As New DataSet 'Dataset
    Dim dt As New DataTable
    Dim cmds As New MySqlCommand
    Dim HostConn As New MySqlConnection 'Pour une connexion a base de données MySQL
    Dim table As String
    Dim i As Integer
   
    Private Sub form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            HostConn.Close()
            HostConn.ConnectionString = "data source= localhost; server=mysql; database=armee; user id=root ;password=  ;" 'connection au serveur et a la base de donnée 
            requete = "SELECT distinct Code_grade FROM Grade"
            'on ouvre la connection
            HostConn.Open()
            'Instancer un objet Commande
            cmds = New MySqlCommand(requete)
            'on execute la requete
            dta = New MySqlDataAdapter(cmds)
            'initialiser l'objet Command
            cmds.Connection() = HostConn
            'Avec l'aide de la propriété Fill du DataAdapter charger le DataSet
            dta.Fill(dts)
            'Mettre dans un Objet DataTable une table du DataSet
            nom.DataSource = dts.Tables(0)
            'nom.ResetText()
            'nom.DataSource = dts.Tables(0)
        Catch myerror As MySqlException
            'afficher le msg d'erreur
            MessageBox.Show("Error Connecting to Database: " & myerror.Message)
        End Try
    End Sub
End Class

Voila si vous trouver la solus je vous en serait grès

Réponse acceptée !
je viens de trouver, graçe à un super ami. voila donc le code qui fonctionne pour ceux qui cherche comment lier une base MySQL avec une ComboBox dans une application

imports MySql.Data.MySqlClient
Imports System.Data
Imports System

'Formulaire qui permet de chercher et consulter un personnel dans la base de donnée
Public Class Personnels

    Dim requete As String 'Chaine ou sera stocker les requetes
    Private commande As New MySqlCommand
    Private HostConn As New MySqlConnection 'Pour une connexion a base de données MySQL
    Private reader As MySqlDataReader
    Private chemin As String = "data source= localhost; server=mysql; database=armee; user id=root ;password=  ;" 'connection au serveur et a la base de donnée 


    Private Sub Personnels_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            HostConn.Close()
            HostConn = New MySqlConnection(chemin)
            requete = "SELECT distinct Code_grade FROM Grade"
            'on ouvre la connection
            HostConn.Open()
            'commande pour exécuter la requete
            commande = New MySqlCommand(requete, HostConn)
            'On exécute la requète et on récupère le résultat
            reader = commande.ExecuteReader
            'On lit les résultat
            Do While (reader.Read())
                ' ajout des nom dans la ComboBox
                nom.Items.Add(reader.GetValue(0).ToString())'Ne pas oublier les parenthèse après "ToString" ou erreur index dépassé
            Loop
            HostConn.Close()
        Catch myerror As MySqlException
            'afficher le msg d'erreur
            MessageBox.Show("Error Connecting to Database: " & myerror.Message)
        End Try
    End Sub
End Class

good luck
Lycanges