[dubai.eig]

PHP كود :

          Dim btns As Button() = {Button1, Button2, Button3, Button4, Button5, Button6, Button7, Button8, Button9, Button10}

           Dim cntotel As New SQLiteConnection(String.Format("Data Source= {0}\BKHAMLOG\contest\" & strcallbk & "\DB" & contestnyearx & ".s3db", Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)))
           Dim okall As New SQLiteCommand(" SELECT COUNT(id) FROM DBQTC", cntotel)

           cntotel.Open()

           Dim c As Integer = okall.ExecuteScalar()
           For i = 0 To btns.Length - 1
               btns(i).Enabled = (i < c )
           Next 


السلام عليكم

عندي سؤال 
   

احاول اسحب بيانات من قاعدة البيانات لاعبي ال TextBox

هذا الكود

كود :

       Dim dr As SQLiteDataReader
       Dim cn As New SQLiteConnection(String.Format("Data Source= {0}\BKHAMLOG\contest\" & strcallbk & "\DB" & opencontest & ".s3db", Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)))
       Dim cmdi As New SQLiteCommand("SELECT * FROM DBQTC ORDER BY id desc limit 2", cn)
       cn.Open()

       dr = cmdi.ExecuteReader()

       While dr.Read()
           TextBox1.Text = dr.Item(9)
           TextBox2.Text = dr.Item(7)
           TextBox3.Text = dr.Item(15)

       End While

ال desc limit 2

ممكن يكون 2 اواكثر مثلا 9
او10 على حسب المربعات

حاولت بس ما ضبط

بحثت في النت كثير ما حصلت الحل
حاولت اغير في الكود 

كود :

      While dr.Read()
           TextBox1.Text = dr.Item(9)
           TextBox2.Text = dr.Item(7)
           TextBox3.Text = dr.Item(15)

           TextBox6.Text = dr.Item(9)
           TextBox5.Text = dr.Item(7)
           TextBox4.Text = dr.Item(15)

       End While

بعد ما ضبط


وشكرا