رفتن به مطلب
  • 0

گرفتن تمام متن دیتابیس در یک لیبل


mobah

سوال

سلام

چطوری میشه تمام متن داخل دیتابیس را خط به خط در یک لیبل نمایش داد.

اگر اینشیالیز کنیم
و بعد
cur1 = sql1.ExecQuery("SELECT * FROM tabel1 ")
	cur1.Position= 0
	ToastMessageShow("تعداد : " & cur1.RowCount,False)
تعداد با cur1.RowCount نمایش داده میشه
حالا چطوری تمام محتوات را در یک لیبل نمایش بدهم
مثلا :  Label1.text

این اشتباس ولی درستش چیه
 Label1.text= cur.GetString("matn1")+cur.GetString("matn2")+cur.GetString("matn3")+ . . .

نمایش همه matn ها فقط در یک لیبل  خط به خط   تا انتها  ....

لینک ارسال
به اشتراک گذاری در سایت های دیگر

4 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

شما با ساخت حلقه این کار رو انجام بدین
 

 Label1.text= ""
ur1 = sql1.ExecQuery("SELECT * FROM tabel1 ")
	cur1.Position= 0
   for i=0 to cur1.RowCount-1
		 Label1.text =  Label1.text &  cur.GetString("matn1") & " - "  &  cur.GetString("matn2")
	next
   

اگر دیتا بیش شما دونا فیلد با نام matn1 و matn2 داشته باشه داخل لیبل قرار میده

لینک ارسال
به اشتراک گذاری در سایت های دیگر

یک سوال مهم :

اگر تعدا فیلد ها قابل شمارش نباشه چی ؟

مثلا : matn4  matn3  matn2   matn1      باشه و یک جای دیگه فقط matn1

راهی وجود داره که همه فیلدهای موجود در دیتا بیس رو نمایش بدیم بدون  داده 

cur.GetString("matn1")

 

یا دیگه نگران تعداد فیلد ها matn2   matn1 یا بیشتر و کمتر نباشیم یا یک همچین چیزایی .......

 

بازم تشکر بابت جوابتان

لینک ارسال
به اشتراک گذاری در سایت های دیگر

در در 1396/04/13, 00:29:48، mobah گفته است :

یک سوال مهم :

اگر تعدا فیلد ها قابل شمارش نباشه چی ؟

مثلا : matn4  matn3  matn2   matn1      باشه و یک جای دیگه فقط matn1

راهی وجود داره که همه فیلدهای موجود در دیتا بیس رو نمایش بدیم بدون  داده 


cur.GetString("matn1")

 

یا دیگه نگران تعداد فیلد ها matn2   matn1 یا بیشتر و کمتر نباشیم یا یک همچین چیزایی .......

 

بازم تشکر بابت جوابتان

بله ممکن هست
شما با اندیس میتونین این کار روانجام بدین

Label1.text= ""
	cur1 = sql1.ExecQuery("SELECT * FROM tabel1")
	cur1.Position= 0
	For i=0 To cur1.RowCount-1
		For j=0 To cur1.ColumnCount-1
			Label1.text =  Label1.text &  cur1.GetString2(j)
		Next
		cur1.Position= i
	Next

حلقه اولی ردیف شما را جلو مبره 

حلقه ذومی ستون شما رو 

و ما شرط حلقه ها رو تعداد سطر و ستون دیتا بیس قرار دادیم

و getstring2 اندیس هارو که با j قرار دادیم به ما داده اون ستون رو نشون داده 

position هم برای پیمایش در سطز هاست که حتما اطلاع دارین

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...