On 05/25/2017 05:24 AM, Unaise EK wrote: > this is my code for displaying data in listbox, but it did not working, pls > help > > Public Procedure AddList() > Dim ListQurey As String > Dim Lresult As Result > > ListQurey = "SELECT name FROM name_tbl" > Lresult = MODMain.MyConn.Exec(ListQurey) > If Lresult.Count > 0 Then > * Do While Not Eof(Lresult)* > ListBox1.Add(Lresult!"name") > Lresult.MoveNext > Loop > Endif > > End
I don't know why you are trying to use Eof() on a SQL Result. Eof is for a Stream. See: http://gambaswiki.org/wiki/comp/gb.db/result "This class is enumerable with the FOR EACH keyword." And, I believe 'ListBox1.Add(Lresult!"name")' should be 'ListBox1.Add(Lresult!name)' or 'ListBox1.Add(Lresult["name"])'. Also, please try to compose meaningful subject lines by creating a _new_ message instead of simply replying to a message that is not related to your issue. That helps those who view list messages in threaded mode. TIA. -- Lee ------------------------------------------------------------------------------ Check out the vibrant tech community on one of the world's most engaging tech sites, Slashdot.org! http://sdm.link/slashdot _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user