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

مشکل کار با حلقه For Step


adib202

سوال

سلام

من این تابع رو قبلا تو vb6 استفاده کردم ولی الان توی B4a نتیجه نمیگیرم.کسی میدونه دلیلش چیه؟

	


      	Dim dl As String
        Dim i As Int
        Dim len As Int
	    Dim sx As string
          
		dl = EditText1.Text
      
        len=dl.Length
          
	For i = 1 To len Step (len / 26)
		sx = sx + i
	Next
	
      EditText2.Text = sx
          
          

 

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

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

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

	Dim dl As String
	Dim len As Int
	Dim sx As Int
          
	dl = "Hello Friends! Hello Friends! Hello Friends! "
      
	len=dl.Length
          
	For i = 1 To len Step (len / 26)
		sx = sx + i
	Next
	
	Log(sx)

اصولیش اینه ، برای چه کاری می خواید؟

 

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

بایگانی شده

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

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

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