VB 6 naar .NET

[den_bonaparte]

Ik ben zopas overgestapt van VB6 naar Visual Web Dev 2005 Express
en ik krijg onderstaand progje maar niet omgezet.

Dit had ik in VB6.

'----------------------------------'
in een Module

Global MyWorkspace As Workspace
Global DbMgs As Database

Public Function fncTaal(ByVal lngTaalID As Long)
'deze functie word vanuit verschillende Forms aangeroepen'

Dim MySQL As String
Dim MyRs As Recordset

MySQL = "SELECT * FROM txtUwTaal WHERE TaalID = " & lngTaalID
Set MyRs = DBMGS.OpenRecordset(MySQL, dbOpenSnapshot)
    fncTaal = MyRs![Omschrijving]
MyRs.Close

End Function

'----------------------------------'
in het opstart form

Private Sub FormMain_Load

PadDbMgs = App.Path & "\Mgs.mdb"
Set MyWorkspace = Workspaces(0)
Set DbMgs = MyWorkspace.OpenDatabase(PadDbMgs)

lngTaalID = 30 ' is maar voorbeeld'

lblUwTaal.Caption = fncTaal(lngTaalID)

End Sub
'----------------------------------'

Ik heb al zoveel tips gehad, maar gooi nu alles door elkaar.
Raak er serieus gefrustreerd van !!

Mag in ADO, DAO of ADO.NET(liesft), maar maakt me niet echt uit, als het maar werkt

Wie kan/wil me hiermee helpen

Alvast bedankt