Probleme bei Function...!

[Wolfgang Peter]

Hallo zusammen!
Ich habe eine Funktion erstellt für die Serververbindung und eine zweite Funktion für Dataadapter, Command und dataset.

PublicFunction F_01(ByVal dataSet As DataSet, ByVal connectionString AsString, _
ByVal query AsString) As DataSet
Using con As SqlClient.SqlConnection = GetConnection()
Dim adapter AsNew SqlClient.SqlDataAdapter()
query = "Select tbl_01 from Logi_01"
adapter.SelectCommand = New SqlClient.SqlCommand(query, con)
adapter.Fill(dataSet)
Return dataSet
EndUsing
EndFunction

Beim Aufruf kommt folgende Fehlermeldung:
Fehler 1 Für den Parameter "connectionString" von "Public Function F_01(dataSet As System.Data.DataSet, connectionString As String, query As String) As System.Data.DataSet" wurde kein Argument angegeben. C:\Dokumente und Einstellungen\Hurek.HUREK-7B83C703B\Eigene Dateien\Visual Studio 2005\Projects\Test_01\Test_01\Form1.vb 73 9 Test_01

Fehler 2 Für den Parameter "dataSet" von "Public Function F_01(dataSet As System.Data.DataSet, connectionString As String, query As String) As System.Data.DataSet" wurde kein Argument angegeben. C:\Dokumente und Einstellungen\Hurek.HUREK-7B83C703B\Eigene Dateien\Visual Studio 2005\Projects\Test_01\Test_01\Form1.vb 73 9 Test_01

Fehler 3 Für den Parameter "query" von "Public Function F_01(dataSet As System.Data.DataSet, connectionString As String, query As String) As System.Data.DataSet" wurde kein Argument angegeben. C:\Dokumente und Einstellungen\Hurek.HUREK-7B83C703B\Eigene Dateien\Visual Studio 2005\Projects\Test_01\Test_01\Form1.vb 73 9 Test_01

Was habe ich Trottel wieder falsch gemacht. Für Hilfe mit einen Stück Code wäre ich dankbar.

Gruß Peter