Hello,



i have a program that gets data from random row in access database.
Code:
Dim con As New OleDb.OleDbConnection            Dim dbProvider As String
            Dim dbSource As String
            Dim ds As New DataSet
            Dim da As New OleDb.OleDbDataAdapter
            Dim sql As String


            dbProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"
            dbSource = "Data Source = C:\Users\Timosoft\Documents\wwtbamDB.mdb"
            con.ConnectionString = dbProvider & dbSource


            con.Open()


            sql = "SELECT TOP 1 * FROM Question1to5table ORDER BY Rnd(-10000000*TimeValue(Now())*[id])"
            da = New OleDb.OleDbDataAdapter(sql, con)
            da.Fill(ds, "QuestionsandAnswers")


            con.Close()


            Main1.QuestnBTN1.Text = ds.Tables("QuestionsandAnswers").Rows(0).Item(1)
            Main1.Answerbtn1.Text = ds.Tables("QuestionsandAnswers").Rows(0).Item(2)
            Main1.Answerbtn2.Text = ds.Tables("QuestionsandAnswers").Rows(0).Item(4)
            Main1.Answerbtn3.Text = ds.Tables("QuestionsandAnswers").Rows(0).Item(3)
            Main1.Answerbtn4.Text = ds.Tables("QuestionsandAnswers").Rows(0).Item(5)
the above sql code gets row at random and displays on my button.

How do i bind Item(2),Item(3),Item(4),Item(5) from the dataset to Answerbtn1,Answerbtn2,Answerbtn3,Answerbtn4 at random

Thanks