منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله

اعزائي من فترة قمت بكتابة موضوع
http://vb4arb.com/vb/showthread.php?tid=20557

وحاولت اجد الحل والطريقه لكيفية عمل نفس التصميم بس ما حصلت

هذا التصميم
[attachment=16118]

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

[attachment=16119]

كود :

          Dim dr As SQLiteDataReader

            Dim cnn As New SQLiteConnection(String.Format("Data Source= {0}\settings\info{1}.s3db", Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments), strcallbk))

            Dim cmdi As New SQLiteCommand(String.Format("SELECT * FROM info{0} ORDER BY id", strcallbk), cnn)

            cnn.Open()

            dr = cmdi.ExecuteReader()

            Do While dr.Read()

                DXde = dr("DXde").ToString

                Frequency = dr("Frequency").ToString

                DXStation = dr("DXStation").ToString

                Comments = dr("Comments").ToString

                Time = dr("Time").ToString

                Country = dr("Country").ToString

            Loop

اتمنى احصل الطريقه وانا اكمل الباقي

بارك الله فيكم

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

dubai.eig