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

استفاده ازمتغیر عددی بجای شمارنده ادیت تکست ها و...


mohsensa

سوال

باسلام لطفا درصورت امکان راهنمایی فرمائید.

دریک حلقه for كه شمارنده kبطور مثال از 1 الی 20 روشامل می شود.می خواهیم مقدارk را بجای شماره ادیت تکست قرارداده .مثلا" edittextk.text

 

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

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

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

در 15 ساعت قبل، danial1369 گفته است :

این یعنی چه منظورتون واضح نیست ؟

      

    For K=0 To 7
      If "EditText"&"K"&".text"="" Then
        ((SQL1.ExecNonQuery2("INSERT INTO table4 VALUES(?,?,?)",Array As Object(a,b,c   
      End If
  
   Next

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

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

 

for k = 0 to 10 
	EditText.Text = k &" "
next

 

 

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

در 10 دقیقه قبل، Mr Mansour گفته است :

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

 


for k = 0 to 10 
	EditText.Text = k &" "
next

 

سلام نه میخواهم مقدار k رو بجای شماره EDITTEXT3.TEXT قرار بدم.یعنی بجای عدد 3

 

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

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

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

سلام

منظور دوستمون این هستش که میخوان ادیت تکست های مختلفی رو مقدار بدن.

خب دوست عزیز به این شکل که شما میفرمایید امکان پذیر نیست.دلیل ؟

چون این قسمت مربوط میشه به سینتکس و کامپایلر که همچین اجازه ای رو به شما نمیده.چون دیتارو میتونید هر بلایی سرش بیارید اما این چیزی که میگید مربوط میشه به ادیتور و اجازه نمیده.

شما 2 راه دارید واس چیزی که میخواید [ البته اگر اشتباه تصور نکرده باشم ]:

1 - آرایه ای از ادیت تکست ها

Private editTexts(20) As EditText
For k = 0 to editTexts.Length - 1
 editText3(k).Text = k & " "
Next

2 - به وسیله ی گرفتن ویو های لایه شما بیایید تمامی ادیت تکست هارو مقدار بدید»

Private index As Int = 0
For Each v As View In Activity.GetAllViewsRecursive
	If v Is EditText Then
		Private edt As EditText = v
		edt.Text = index & ""
		index = index + 1
	End If
Next

 

در غیر اینصورت، هدف دیگه ای از مطرح کردن تاپیک داشتید، بگید.

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

بایگانی شده

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

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

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