re

dans ce cas la je crois que tu dois faire une fonction afficher() et tu l'appelles dans datagrid

Sub afficher()
        Dim cmd As New SqlCommand("select * from nom_table",conn) 

        Dim da As New SqlDataAdapter(cmd)
        Dim nom_table As New DataTable
        da.Fill(nom_table)
        DataGrid1.DataSource = nom_table
        DataGrid1.DataBind()
    End Sub

ensuite tu vas dans ta datagrid et tu applles la fonction

afficher()

bonne chance