salut a tous, j`ai un module dans lequel j`ai une sub main qui fais la connexion a la base de donnees et puis elle me redirige vers le form principal de mon application, la connexion s`est bien passer mes apres elle m`affiche le form principal nommé index pendant une fraction de seconde puis l`application se ferme, je comprends pas pourquoi, voila mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Module Module1
    Public Sub main()
        Dim con As New OleDb.OleDbConnection
        Dim ds As New DataSet
        Dim da As OleDb.OleDbDataAdapter
        Dim sql As String
       'connexion a la base de donnees
        con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\atelier.accdb"
 
        con.Open()
        MsgBox("connexion reussite")
 
       'voici la ligne qui pose probleme
        index.Show()
 
    End Sub
 
End Module
merci de m`avoir aider