انتخاب دو عدد از یک عدد بزرگ

[See 0]

سلام 

من یک عدد بزرگ ۸  ۹ رقمی دارم می خوام دو رقم اولش رو بگیرم(اعداد در حال تغییر هستند) از ساب استرینگ استفاده کردم ولی چون عدد بزرگتر میشه عدد بعدی رو نمیگیره یا اصلا به این صورت بگم که یه حجمی در حال دانلود هست که مقدار حجم از ۱۰۰۰۰۰۰۰ شروع میشه و تا ۱۶۰۰۰۰۰۰ میره  حالا می خوام این اعداد راحت تر بگیرم (تعدادش رو کمتر کنم)

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

با تشکر

[Salar82 919]

بفرما

Sub getTowFirst(number As Int) As Int
		Dim numstr As String=number

	If numstr.Length = 7 Then
		Dim tofirst As String=numstr.SubString2(0,1)
		Dim intfirst As Int =tofirst
		Return intfirst
	Else If numstr.Length >= 9 Then
		Dim tofirst As String=numstr.SubString2(0,2)
		Dim intfirst As Int =tofirst
		Return intfirst
	End If
End Sub

 

[محمدرضا شاهپیری 5,583]

در 6 دقیقه قبل، See گفته است :

سلام 

من یک عدد بزرگ ۸  ۹ رقمی دارم می خوام دو رقم اولش رو بگیرم(اعداد در حال تغییر هستند) از ساب استرینگ استفاده کردم ولی چون عدد بزرگتر میشه عدد بعدی رو نمیگیره یا اصلا به این صورت بگم که یه حجمی در حال دانلود هست که مقدار حجم از ۱۰۰۰۰۰۰۰ شروع میشه و تا ۱۶۰۰۰۰۰۰ میره  حالا می خوام این اعداد راحت تر بگیرم (تعدادش رو کمتر کنم)

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

با تشکر

سوالتون واضح نیست عزیز. میخواین دو رقم اول از سمت چپ یک عد رو بگیرین یا چیز دیگه ای منظورتونه؟

[See 0]

همینی که گفتین رو می خوام بگیرم

[mahdi tahan 723]

در ۱ ساعت قبل، See گفته است :

سلام 

من یک عدد بزرگ ۸  ۹ رقمی دارم می خوام دو رقم اولش رو بگیرم(اعداد در حال تغییر هستند) از ساب استرینگ استفاده کردم ولی چون عدد بزرگتر میشه عدد بعدی رو نمیگیره یا اصلا به این صورت بگم که یه حجمی در حال دانلود هست که مقدار حجم از ۱۰۰۰۰۰۰۰ شروع میشه و تا ۱۶۰۰۰۰۰۰ میره  حالا می خوام این اعداد راحت تر بگیرم (تعدادش رو کمتر کنم)

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

با تشکر

میتونی تقسیم بر 1024 کنی .معمولا اینطوری تبدیل به مگابایت یا گیگابایت میکنن

[محمدرضا شاهپیری 5,583]

در ۱ ساعت قبل، See گفته است :

همینی که گفتین رو می خوام بگیرم

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

Sub getTowFirst(number As Int) As Int
	Dim numstr As String=number
	Dim tofirst As String=numstr.SubString2(0,2)
	Dim intfirst As Int =tofirst
	Return intfirst
End Sub

 

[See 0]

اینو بلدم 

ببینید این عدد من داره پیشرفت می کنه مثال  : ۱۰۰۰۰۰۰ ، ۳۰۰۰۰۰۰ ، ۹۰۰۰۰۰۰ خب این اعداد  وقتی دو رقمش می گیریم میشه ۹۰ مگ ولی در اصل ۹ مگ هستش این ساب شما برای اعداد ۱۰۰۰۰۰۰۰ به بالا  هستش که دو رقم رو میگیره و میشه ۱۰ مگ 

من می خوام اعداد ۱۰۰۰۰۰۰ تا ۹۹۹۹۹۹۹ رو ۱ عدد بگیره ولی بالای ۱۰۰۰۰۰۰۰۰ رو دو رقم میشه کاری کرد؟؟