[VB.NET] Dichiarazione Array Oggetto

[world war]

Salve, vorrei dichiare un array che posside al proprio interno una serie di database, però Visual Studio continua a darmi errore e non riesco a capire dove sbaglio. Il codice che uso è il seguente all'interno di una mia classe:

        Private DB(1) As Object
        DB(0) As New OleDb.OleDbConnection(DBSystemString)

L'errore me lo da nella seconda riga

[Vinsent]

Non devi dichiararne il tipo (as) ma assegnarli un valore (=).

[world war]

Ho copiato male, nel progetto ho messo "=" tuttavia l'errore continua ad esserci..., mi dice "dichiarazione prevista".

[Vinsent]

L' errore, suppongo, sia dato dal fatto che hai scritto le due righe subito dopo la dichiarazione della classe, se è così il valore della variabile devi assegnarlo nella stessa riga di dichiarazione o in una Sub.

[world war]

Si, ho fatto come hai detto, però, corregendo non funziona ancora, anche se la dichiarazione è corretta.

    Public Class MngDB

        Private DBSystemString As String = "Mia Stringa"

        Private DB = New Object(0) {New OleDb.OleDbConnection(DBSystemString)}

        Public Function Query(ByVal inter As String)
            Dim result As New OleDb.OleDbDataAdapter(inter, DB(0))
            Return result
        End Function

    End Class

In quello superiore mi da errore su "Dim result" dicendomi: "Risoluzione dell'overload non riuscita perché nessun 'New' accessibile può essere chiamato senza una conversione verso un tipo di dati più piccolo"

Mentre quello sotto senza array funziona perfettamente

    Public Class MngDB

        Private DBSystemString As String = "Mia Stringa"

        Private test As New OleDb.OleDbConnection(DBSystemString)

        Public Function Query(ByVal inter As String)
            Dim result As New OleDb.OleDbDataAdapter(inter, test)
            Return result
        End Function

    End Class

[oregon]

Non sono sicuro di aver capito bene ma vuoi qualcosa del genere

    Private DBSystemString As String = "Mia Stringa"

    Private DB() As OleDb.OleDbConnection

    Public Function Query(ByVal inter As String)
        DB(0) = New OleDb.OleDbConnection(DBSystemString)

        Return New OleDb.OleDbDataAdapter(inter, DB(0))
    End Function

[world war]

Si grazie, così funziona perfettamente anche se preferivo assegnare la variabile nella dichiarazione.


Facendo il test nell'applicazione mi da un errore per NullReferenceException quando vado ad assegnare a DB(0) la nuova connessione

[oregon]

Originariamente inviato da world war
Si grazie, così funziona perfettamente anche se preferivo assegnare la variabile nella dichiarazione.

Se usi un array, non puoi ...

Facendo il test nell'applicazione mi da un errore per NullReferenceException quando vado ad assegnare a DB(0) la nuova connessione

Cioè? Codice? Linea dell'errore?

[world war]

Pensavo si potesse fare...

comunque il codice è identico a quello che ha postato (tranne la stringa!!!) e l'errore me lo da nell'assegnazione cioè in

DB(0) = New OleDb.OleDbConnection(DBSystemString)

[oregon]

Lascia stare gli array ... usa un oggetto List molto più comodo

    Dim DB As New List(Of OleDb.OleDbConnection)

    Public Function Query(ByVal inter As String)
        DB.Add(New OleDb.OleDbConnection(DBSystemString))
        
        Return New OleDb.OleDbDataAdapter(inter, DB.Last)
    End Function