veritabanı tablo adı = "mytable5" Açılır istem ("Toplam kayıt sayısı:" > Kayıt sayısı (veritabanı tablosu adı) > "Öğeler") Edit kutusu 1. İçerik = veritabanı sorgusu ("SELECT wat,tt,lac,pro,fat,sn,id FROM" > veritabanı tablosu adı > LIMIT 0,'"& kayıt sayısını (veritabanı tablosu adı)>'","-","\n") '0'dan başlayan kayıtları sorgu 3 (ilk öğe). Sonuç = metin bölünmüş (edit box 1. içerik, "-") i=Dizi üyeleri sayısı (sonuç) -1 Yargı döngüsünün ilk i>0'ı Tablo 1. Hücreleri ekle (sonuç (i-1), 9, siyah ve HFFFFFBE8) i=i-1 Döngü kuyruğunu yargılayın |