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

AnswerCenter

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

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

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

بایگانی شده

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

  • 0
susa

برنامه پیامکی آنلاین

سوال

susa    25

کاربر عادی

سلام دوستان خسته نباشید

بنده یه برنامه پیامکی آنلاین میخوام بنویسم اما توی کپی و اشتراک گذاری متن مشکل دارم

وقتی کپی رو میزنم یا اشتراک رو آخرین ردیف دریافتی رو کپی میکنه ، روی هرکدوم که میزنم اینجوره ، لطفا اگه راه حل ساده ای هست بگید ، مرسی

لیست دریافتی توی مولتی پنل لود میشن و توی ادامه مطلب نمایش داده نمیشن میخوام توی همون پنل کپی یا به اشترام گذاشته بشه

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


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

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

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

majid08    266

کاربر نیمه فعال

سلام

شما از لیستی که استفاده میکنید 

یک لیبل بزارید برای اشتراک مثلا

بعد متنی رو که میخای اشتراک بزاری بزار برای تگ لیبل توی حلقه یا توی ریسایکلر یا هرچی

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

for i = 0 to 10
dim lb as label
lb.Initialize("")
lb.text = "Test"&i
tb.tag = "Test"&i
next

sub lb_click
dim lb as label = sender
log(lb.tag)
end sub

 

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


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

کاربر عادی

در 6 ساعت قبل، majid08 گفته است :

سلام

شما از لیستی که استفاده میکنید 

یک لیبل بزارید برای اشتراک مثلا

بعد متنی رو که میخای اشتراک بزاری بزار برای تگ لیبل توی حلقه یا توی ریسایکلر یا هرچی

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


for i = 0 to 10
dim lb as label
lb.Initialize("")
lb.text = "Test"&i
tb.tag = "Test"&i
next

sub lb_click
dim lb as label = sender
log(lb.tag)
end sub

 

دمت گرم خدایی عالی بود

 

تاپیک قفل شه و اسمش رو به کپی و اشتراک گذاری از دیتابیس آنلاین تغییر بدید لطفا با تشکر

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


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

×
×
  • جدید...