چگونگی وارد کردن اعداد بیشتر از 10 رقم ؟؟؟

[h_b_h_91]

سلام
من یه برنامه درست کردم که با عددها سرو کار داره اما نمی تونم تو text box ام عدد های بیشتر از 10 رقمی تایپ کنم و اگر بیشتر از 10 رقم تایپ کنم در هنگام اجرای آن error می زنه و می گه over flow . چطور می تونم اعداد بیشتر از 10 رقم تایپ کنم و از کدوم متغییر باید استفاده کنم؟:ناراحت::افسرده::ناراحت: :افسرده:

[hrj1981]

توي بانك اطلاعاتي نوع فيلد خود را از لانگ به دابل تغيير دهيد

[h_b_h_91]

این کار رو انجام دادم اما بیشتر از 10 رقم نمی گیره!!!!!!

[ابوذر محمودی]

این کار رو انجام دادم اما بیشتر از 10 رقم نمی گیره!!!!!!

سلام .

بهتره نوع متغیرتون رو تعریف نکنید تا به صورت رشته ای در نظر گرفته بشه ، و هر موقع خواستید از اون استفاده کنید از با استفاده از تابع val مقدار عددی اون رو بدست بیارید ، البته اگه تعداد کاراکترها خیلی زیاد باشن به صورت نماد علمی نمایش می ده .

در غیر اینصورت اگه بخواین تو متغیر نوع صحیح داده رو ذخیره کنید خطای سرریزی رخ می ده
بازه نوع داده صحیح

byte = 0 to 255
= -32768 to 32767 integer
long = -2147483648 to 2147483647

[h_b_h_91]

لطفا می شه درباره تابع val بیشتر توضیح بدین؟

[اوبالیت به بو]

لطفا می شه درباره تابع val بیشتر توضیح بدین؟

تابع Val یک مقدار رشته رو میگیره و به عدد تبدیل می کنه:

Val ("234") = 234
Val ("2sd") = 2

[h_b_h_91]

یعنی اگر y چیزی باشه که تو text box ام می نویسم برای اینکه بتونم بیشتر از 10 رقمش بکنم باید یه متغییر دیگه مثل x معرفی کنم که
(
"x = Val("y
:متفکر:

[اوبالیت به بو]

یعنی اگر y چیزی باشه که تو text box ام می نویسم برای اینکه بتونم بیشتر از 10 رقمش بکنم باید یه متغییر دیگه مثل x معرفی کنم که
(
"x = Val("y

اگر متغیر x شما از نوع Double باشه آره میشه ولی وقتی بخواین به صورت رکورد ذخیره کنید اون موقع باید x رو توسط تابع Str به رشته تبدیل کنید بعد ذخیره کنید.

[ASKaffash]

سلام
توی وی بی Double نداریم بلکه از شبیه سازی Variant با استفاده از تابع CDbl ایجاد میشود .


Private Sub Command1_Click()
Dim x As Variant
x = CDbl(Me.Text1.Text)
Me.Caption = x
End Sub