Visual Basic 2008 - Datenbank in Label

[DatenPunker (Gast)]

Hallo Leute!

Ich habe ein Problem mit der Access DB-Anbindung in Visual Basic 2008.

Es soll in ein Label die jeweilige Frage und die jeweilige Antwort in je 
ein Label (Label1 und Label2) geschrieben werden. Das Ganze soll ein 
kleines Tool werden, um das Erlernen von Vokabeln zu vereinfachen.

Hier mein bisheriger Code.

Imports System.Data.OleDb

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim con As New OleDbConnection
        Dim cmd As New OleDbCommand
        Dim reader As OleDbDataReader

        con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=F:\Projekte\vokabeln.mdb"

        cmd.Connection = con
        cmd.CommandText = "select * from Englisch1"

        Try
            con.Open()

            reader = cmd.ExecuteReader()
            'Label1.caption.Clear()
            'Do While reader.Read()
            Label1.Text = reader("Frage")
            Label2.Text = reader("Antwort")
            'Loop
            reader.Close()
            con.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub

End Class

Wenn ich das Programm ausführe, kommt die Meldung "Keine Daten für die 
Zeile/Spalten".


Vielen Dank!