[vb.net] return statement

[Verwijderd]

Hallo

Ik ben een laatstejaars student boekhouden-informatica en ik ben momenteel bezig een programma te ontwikkelen voor mijn gip. Ik zit echter vast. Ik heb op verschillende forums gezocht maar heb geen oplossing voor mijn probleem gevonden. Ik hoop dat hier iemand mij kan helpen..

De bedoeling is om vanuit een databank de voor de gebruiker mogelijke variabele input in een combobox weer te geven. Ik zou dit willen doen met een functie. Het uitlezen van mijn databank gebeurt via een 'Do.. While'. Ik wil mijn gegevens via een return statement weergeven maar hiervoor zou ik het hele 'Do While' statement moeten kunnen gebruiken anders wordt enkel het eerste gegeven weergegeven...

Dit is mijn code:

Visual Basic .NET:

Imports System.Data.OleDb
Public Class Details

    Public Function Insert(ByVal SelectStatement As String, ByVal ToeTeVoegenGegeven As String)
        Dim Datareader As OleDbDataReader
        command.Connection = connection
        connection.ConnectionString = My.Settings.csAED
        command.CommandText = SelectStatement
        connection.Open()
        Datareader = command.ExecuteReader
        Do While Datareader.Read()
            Datareader.Item(ToeTeVoegenGegeven).ToString()
        Loop


    End Function

    Dim connection As New OleDbConnection
    Dim command As New OleDbCommand
    Private Sub Details_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'voorbereiding om met databank te werken
        connection.ConnectionString = My.Settings.csAED
        command.Connection = connection

    End Sub

    Private Sub Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Add.Click

        'variabele aanmaken om te weten of alle opties al een keer ingelezen zijn
        Static Dim ingelezen As String
        If ingelezen <> "ok" Then



            Application.Items.Add(Insert("SELECT Name FROM tblApplication", "name"))

Ik hoop dat iemand me met mijn probleem kan helpen!
alvast bedankt!

[ Voor 1% gewijzigd door RobIII op 03-04-2014 21:02 . Reden: code-tags opgeschoond ]

[RobIII]

code:

mylist = new list()
do while
  mylist.add(item)
loop
return mylist

[MSalters]

In plaats van return,

code:

Yield item

[BasieP]

ow en je disposed momenteel niet je
- connection
- command
- datareader

je reader moet je disposen als je uitgelezen bent, en die andere twee defineer je in je class. Dit betekend dat je je class de IDisposable interface moet meegeven.

[Lethalis]

Doorgeven als generic list?

code:

Public Function GetApplications() As List(Of String)

Dim result As New List(Of String)

result.add( doe hier je datareader.tostring )

Return result

End Function

En in de code voor de combobox:

code:

For Each item As String In GetApplications()
  cbo.Items.Add(item)
Next

Ik zou het select statement en de naam van de kolom (name) gewoon in de GetApplications functie zetten. User interface code moet daar niks mee doen en gewoon een lijst met applicaties opvragen (of wat er dan ook in tblApplication staat).

Separation of concerns

Dus het liefste staat de GetApplications() functie ook in een aparte class (domein class).

Meestal heb je een scheiding tussen user interface, domein en data classes. In jouw code is dat helemaal zoek. Ik moest hem echt 3 keer lezen voordat ik doorhad wat het doet En ik werk al ruim 10 jaar als ontwikkelaar.

[ Voor 50% gewijzigd door Lethalis op 04-04-2014 16:29 ]

[Caelorum]

BasieP schreef op vrijdag 04 april 2014 @ 15:49:
[...] Dit betekend dat je je class de IDisposable interface moet meegeven.

Of je zorgt ervoor dat je de resources zelf disposed in de destructor.

[Snake]

MSalters schreef op vrijdag 04 april 2014 @ 15:26:
In plaats van return,

code:

Yield item

Nonsense. Yield return is niet hetzelfde als een list returnen.

[Woy]

Caelorum schreef op vrijdag 04 april 2014 @ 16:28:
[...]

Of je zorgt ervoor dat je de resources zelf disposed in de destructor.

De destructor is niet deterministisch, het is best-practise om elke class die IDisposable members heeft zelf ook IDisposable te laten implementeren.

[Acid_Burn]

BasieP schreef op vrijdag 04 april 2014 @ 15:49:
ow en je disposed momenteel niet je
- connection
- command
- datareader

je reader moet je disposen als je uitgelezen bent, en die andere twee defineer je in je class. Dit betekend dat je je class de IDisposable interface moet meegeven.

Die worden automatisch gedisposed zodra ze buiten de scope zijn. Alleen zijn datareader moet hij nog sluiten (.close)

[Styxxy]

MSalters schreef op vrijdag 04 april 2014 @ 15:26:
In plaats van return,

code:

Yield item

Werkt pas in VS2012+.

[.oisyn]

Acid_Burn schreef op vrijdag 04 april 2014 @ 16:34:
[...]

Die worden automatisch gedisposed zodra ze buiten de scope zijn.

En wanneer zijn class members dan buiten scope? En sowieso, sinds wanneer doet .Net iets met deterministic finalization op basis van scope (afgezien van using)?

[ Voor 21% gewijzigd door .oisyn op 04-04-2014 17:56 ]

[Acid_Burn]

Ik dacht te hebben gezien dat connection en command ook binnen een functie zaten. Daar zat ik mis.

Als de instance van deze class vervalt worden deze voor zover ik weet trouwens ook gewoon opgeruimd, dat hoef je zelf niet te doen. In alle voorbeelden van MS zelf wordt ook nooit de dispose aangeroepen.

[Woy]

Acid_Burn schreef op vrijdag 04 april 2014 @ 19:53:
Als de instance van deze class vervalt worden deze voor zover ik weet trouwens ook gewoon opgeruimd, dat hoef je zelf niet te doen. In alle voorbeelden van MS zelf wordt ook nooit de dispose aangeroepen.

Ooit een keer door de garbage collection ja, maar je weet niet wanneer dat is. Verder klopt het ook niet dat MS in zijn examples nooit Disposed.

MSDN: SqlConnection Class (System.Data.SqlClient)

To ensure that connections are always closed, open the connection inside of a using block, as shown in the following code fragment. Doing so ensures that the connection is automatically closed when the code exits the block.

Voor wat betreft het command & datareader zie ik in examples inderdaad vaak dat deze niet netjes in een using gebruikt worden, eigenlijk gek, maar waarschijnlijk worden de resources daarvan al vrijgegeven op het moment dat de connection vrij gegeven wordt, en dus is het minder belangrijk.

Maar zeker in het geval van een connection i.c.m. connection pooling kan het vervelende gevolgen hebben als je de connection niet goed Closed/Disposed.

Al met al is de vuistregel: Als je een IDisposable hebt gebruik je die in een using block, of als je members hebt die IDisposable implementeren, implementeer je zelf ook IDisposable.

[ Voor 6% gewijzigd door Woy op 04-04-2014 20:17 ]

[Acid_Burn]

Connections close ik altijd wel in ieder geval...

[Verwijderd]

Ik zet het even in C#, maar dit komt uiteindelijk op hetzelfde neer, alleen is de syntax een beetje anders.

Ik weet niet wat je uit je databank wil halen, maar in je codesnippet zie ik dat er in de Insert-method een string wordt meegegeven, dus ga ik er even van uit dat je strings wil ophalen.

Visual Basic:

Public Function Ophalen() As IEnumerable(Of String)
    Dim returnValue As ICollection(Of String) = New Collection(Of String)()
    ' logica om met databank te connecteren en data op te halen komt hier ongeveer
    While datareader.Read()
        returnValue.Add(reader(0)) ' het correct ophalen van de juiste kolom uit de datarecord moet je hier nog even bekijken
    End While
    Return returnValue
End Function