رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

AnswerCenter

مرکز پاسخگویی به سوالات برنامه نویسی

  • مرجع پاسخگویی
  • تولید آموزش
  • سفارش پروژه

درخواست سفارش پروژه

بایگانی شده

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

  • 0
sadeghkiyani

نمایش متن تصادفی

سوال

sadeghkiyani    98

کاربر رو به رشد

سلام

توی برنامه های فال از یه سری متن استفاده میکنند که کاربر هر سری  با کلیک کردن روی باتن یک متن مختلفی رو میبینه

با چه کدی میشه همچین دستوری نوشت که کاربر با کلیک کردن روی یک باتن از بین یک دیتابیس 100 تا بصورت رندوم یک متن را نمایش بده که امکان اشتراک گذاری و علاقه مندی هم داشته باشه 

لطفا راهنمایی کنید

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


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

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

پست های پیشنهاد شده

مجید آرتا    5,762

مدیر کل سایت

	Dim NumberOfRows As Int
	NumberOfRows = db.ExecQuerySingleResult("SELECT count(*) FROM table1")
	Private id As Int = Rnd(1,NumberOfRows)
	Private cr As Cursor = db.ExecQuery("SELECT * FROM table1 WHERE id="&id)
	If Not(cr.RowCount > 0) Then Return
	cr.Position = 0
	lblText.Text = cr.GetString("text")

 

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


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
مجید آرتا    5,762

مدیر کل سایت

سلام

با تابع Rnd  اشنایی دارید دیگه ؟

وظیفش اینه بین دو بازه عددی یک عدد رو به صورت رندوم بر میگردونه.

شما میایید ردیف دیتابیس یا id  رو به این تابع میدید، یعنی بازه ی 1 تا اخرین  id که با RouwCount  میتونید بدست بیارید

حالا هر عددی که در اومد میایید به وسیله ی WHERE  اون ردیف رو متنشو توی لیبل نمایش میدید.

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


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

کاربر رو به رشد

تشکر بله متوجه شدم اما اگه  راهنمایی بیشتر کنید (کد) لطف میکنید

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


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

×
×
  • جدید...