[VB.NET] DataGrid

[naighes]

Private Sub connectAndSelect(ByVal stringaDaAprire)

        Dim strSql, cosaAprire As String
        cosaAprire = stringaDaAprire
        strSql = "select * from " & cosaAprire
        'Apriamo la connessione
        apriConnessione()
        Dim objCmd As New OleDbCommand(strSql, objCn)
        objCmd.ExecuteNonQuery()
        '...
        '...
        'Popolamento DataGrid
        '...
        '...
        'Abbiamo finito. Chiudiamo la connessione
        chiudiConnessione()

    End Sub

Molto bene. Questa è la mia Sub.
Mi chiedevo, se volessi visualizzare il tutto all'interno di un controllo DataGrid, come dovrei fare?
Non ho ancora capito bene come utilizzare questo controllo.

Un breve esempio mi aiuterebbe...
Vi ringrazio in anticipo

[silvia11/12/80]

        Dim DataAdapter As New SqlDataAdapter(sql, Connessione)
        Dim DataSet As New DataSet()
        DataAdapter.Fill(DataSet, "NomeTabella")
        Dtg_Lista.DataSource = DataSet2
    
        Dim griglia As New DataGridTableStyle()
        griglia.MappingName = "Anagrafica"
        griglia.HeaderBackColor = Color.MidnightBlue
        griglia.SelectionBackColor = Color.CadetBlue
        griglia.BackColor = Color.Azure
        griglia.AlternatingBackColor = Color.Lavender
        griglia.HeaderForeColor = Color.White
        griglia.GridLineColor = Color.Blue

        Dim ColId As New DataGridTextBoxColumn()
        ColId.MappingName = "ID"                 Cosi per ogni campo
        ColId.HeaderText = ""                    del Db che vuoi 
        ColId.Width = 0
        griglia.GridColumnStyles.Add(ColId)

[naighes]

Ti ringrazio infinitamente.
Domani in ufficio me lo guardo.

[naighes]

Non mi funge...

Già alla prima riga non mi riconosce l'oggetto di tipo SqlDataAdapter.

Dim DataAdapter As New SqlDataAdapter(sql, Connessione)

Ho provato anche ad importare la classe, così:

Imports System.Data.Common.DbDataAdapter

e così:

Imports System.Data.Common.DataAdapter

...ma niente da fare.

Mi chiedo, come mai?
Grazie.

[naighes]

Allora, forse comincio a capire.

Questo è ciò che ho scritto:

    Public Sub mostraDataGrid(ByVal tabellaDaVisualizzare)
        Dim ds As New DataSet
        Me.DataGrid1.DataSource = ds
        Dim strSql, cosaAprire As String
        cosaAprire = tabellaDaVisualizzare
        strSql = "select * from " & cosaAprire
        objCn.Open()
        Dim da As New OleDbDataAdapter("SELECT * FROM CAMPI", objCn)
        
        ' Adesso vorrei visualizzare il contenuto della tabella selezionata all'interno di DataGrid1!
        ...
        ...
        objCn.Close()
    End Sub

Qualcuno sa darmi qualche indicazione su come, a grandi linee, dovrei procedere?
Grazie ancora.

[silvia11/12/80]

x quanto riguarda il DataAdapter, hai provato a fare questo tipo d'import

Imports System.Data
Imports System.Data.SqlClient

per formattare la griglia

 Dim griglia As New DataGridTableStyle()
        griglia.MappingName = "Anagrafica"
        griglia.HeaderBackColor = Color.MidnightBlue
        griglia.SelectionBackColor = Color.CadetBlue
        griglia.BackColor = Color.Azure
        griglia.AlternatingBackColor = Color.Lavender
        griglia.HeaderForeColor = Color.White
        griglia.GridLineColor = Color.Blue

poi per visualizzare i campi

 Dim colonome As New DataGridTextBoxColumn()
        colonome.MappingName = "Nome"
        colonome.HeaderText = "Nome"
        colonome.Width = 100
        griglia.GridColumnStyles.Add(colonome)

alla fine

 Dtg_Lista.TableStyles.Add(griglia)

[naighes]

Ti ringrazio...
Mi chiedevo un'ultima cosa.
Visto che la mia applicazione dovrà visualizzare solo una tabella alla volta, non è possibile far sì che, in seguito ad un determinato evento, venga subito mostrata la tabella, sebza dover obbligatoriamente passare per la selezione tabelle all'interno del DataGrid?

E poi, ridimensionando il form, quale proprietà devo settare per fare in modo che anche il mio oggetto DataGrid si adatti alle nuove dimensioni del Form?

Ti ringrazio, i tuoi aiuti sono stati molto preziosi.

[silvia11/12/80]

Se ho capito bene potresti caricarti la tabella nell load

[naighes]

Allora, questo è il codice che ho associato ad un controllo CommandButton di istanza MostraTabellaButton:

Private Sub MostraTabellaButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MostraTabellaButton.Click
        Dim laStringaDaPassare As String
        laStringaDaPassare = "Articoli"
        mostraDataGrid(laStringaDaPassare)
    End Sub

E questa è la sub che richiamo:

Public Sub mostraDataGrid(ByVal tabellaDaVisualizzare)
        Dim strSql, cosaAprire As String
        cosaAprire = tabellaDaVisualizzare
        strSql = "select * from " & cosaAprire
        objCn.Open()
        Dim dataAdapter As New OleDbDataAdapter(strSql, objCn)
        Dim dataSet As New DataSet
        dataAdapter.Fill(dataSet, cosaAprire)
        Me.DataGrid1.DataSource = dataSet
    End Sub

Quando eseguo il programma e premo il pulsante, il mio DataGrid non mi visualizza immediatamente il contenuto della tabella del Database.
Mi mostra un icona, cliccando sulla quale, ottengo un'etichetta "Articoli" e cliccando su essa, finalmente, mi mostra la tabella...
Volevo saltare questi passaggi intermedi e mostrare direttamente la tabella.

[silvia11/12/80]

Purtroppo è una cosa che serve anche a me e non riesco a farla mi dispiace non poterti aiutare, però se ci riesci dimmelo Ok? Grazie