تعریف کلیک bottun در دستورfor

[mohammad3250 206]

سلام من یک دستور for دارم خودش یه ساب جدا هستش میخوام دکمه از متغییر داخل اون for استفاده کنه میشه همچین چیزی ؟

[pedro 642]

سلام من یک دستور for دارم خودش یه ساب جدا هستش میخوام دکمه از متغییر داخل اون for استفاده کنه میشه همچین چیزی ؟

منظورتون همون i پیشفرض ک میزاریم و میگیم for i=felan منظورتون اینه؟؟؟؟ درست متوجه نشدم ولی فک کنم بدونم منظورتون چیه، باید ی int تو گلوبال تعریف کنید و اونو برابر i توی حلقتون قرار بدین بعدش میتونین از اون int در هر جای دیگه استفاده کنین ک معادل همون i هست ولی از خود i نمیشه مستقیم تو جاهای دیگه استفاده کرد

[mohammad3250 206]

یه فایل از اینترنت میگیرم داخل ساب jobdone در حلقه for میخوام یه مقداری ک گرفتم به دکمه نسبت بدم یک رشته هستش

[smart 43]

چرا ار تگ استفاده نمیکنی ؟!

[mohammad3250 206]

چرا ار تگ استفاده نمیکنی ؟!

راستش خواستم ولی نشد

[pedro 642]

پس از همینی ک گفتم استفاده کنید فقد بجا int از string استفاده کنید

[mohammad3250 206]

پس از همینی ک گفتم استفاده کنید فقد بجا int از string استفاده کنید

 

 اینم جواب نداد مخم نمیکشه دگه

[pedro 642]

 اینم جواب نداد مخم نمیکشه دگه

نمونه کد بزارین، تو تگ کد بزارین نیاز ب آپلود سورس نیس

[mohammad3250 206]

در گلبال 

 

dim price as string

Sub jobdone (job As HttpJob)
	
	If job.Success= True Then
	Dim list1() As String = Regex.Split ("<br>" , load.GetString)
	
		For i=0 To list1.Length-1
		
			Dim joda() As String = Regex.Split("#",list1(i))
			Dim p1 As Panel
			p1.Initialize("")
			sv.Panel.AddView(p1,0,size,100%X,100%Y)
			size=size+300dip
			p1.LoadLayout("temp")
			Lbltitle.Text = joda(1)
			Lbltitle.TextColor=Colors.Black
			lblfi.Text=joda(4)
			lblfi.TextColor=Colors.Red
			Lblgh.TextColor=Colors.Red
			price= joda(5)

		Next
		job.Release
	End If
	
	Return
End Sub

خب بعدش در باتن تعریف میکنی میاد فقط مقدار محصول اخر نشون میده

Sub btnbuy_Click
	ToastMessageShow(price,True)
End Sub