• اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند
    • H@mid.RS

      راه اندازی وبلاگ برای انجمن   دوشنبه, 18 اردیبهشت 1396

      درود به همه دوستان عزیز از این پس کاربران ویژه  - همکاران - و مدیران میتوانند در انجمن برای خود وبلاگ بسازند
  • 0
koorosh

تعیین نوع فرمت Edit Text در بیسیک فور اندروید

سوال

سلام اساتید

 

 

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

 

لطفا کمکم کنید برنامم آنلاینه اگکه قراره سمت سرورم کاری انجام بدم بازم بگید که اطلاحش کنم مرسی

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


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

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

  • 0

 

نسخه تست شده

Sub EditText1_TextChanged (Old As String, New As String)
	Try
    If EditText1.Text.SubString2(0,1)=0 Then
        Else
			EditText1.Text=""
            Msgbox("ابتدای رقم باید 0 باشد","خطا")
    End If
    
    If EditText1.Text.SubString2(1,2)=9 Then
        Else
			EditText1.Text="0"
            Msgbox("دومین رقم باید 9 باشد","خطا")
    End If    
    Catch
		End Try
End Sub

 

 

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

پسند شده توسط salmana و H@mid.RS

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


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

 

 

 

داداش دمت گرم بدردم خود 

 

فقط یه سوال چطور میشه تعیین کرد که مثلا شماره از 09 شروع بشه ینی اگه طرف بجای 09 چیزی دیگه مثل 1 یا 3 یا هر چیزی دیگه اولش بذاره یک پیغام خطا بده و بگه که اشتباهه و تا فرمتشو درست ننویسه تایید نشه؟

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


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

سلام اساتید

 

 

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

 

لطفا کمکم کنید برنامم آنلاینه اگکه قراره سمت سرورم کاری انجام بدم بازم بگید که اطلاحش کنم مرسی

 

 

نوع فرمت رو از طریق شکل پایین مشخص کن. برای شماره بزار number و برای حروف بزار text

 

Cdrdpture.PNG

 

 

 

 

داداش دمت گرم بدردم خود 

 

فقط یه سوال چطور میشه تعیین کرد که مثلا شماره از 09 شروع بشه ینی اگه طرف بجای 09 چیزی دیگه مثل 1 یا 3 یا هر چیزی دیگه اولش بذاره یک پیغام خطا بده و بگه که اشتباهه و تا فرمتشو درست ننویسه تایید نشه؟

 

فکر کنم هدف شما این هست که بخای حتما شماره وارده درست هم باشه. برای این منظور من یکجا دیدم ولی یادم نمیاد کجا دیدم و اسمش چی بود. اون دیگه آماده بود برای این کار

 

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

Sub EditText1_TextChanged (Old As String, New As String)
	If EditText1.Text.SubString2(0,1)=0 Then
		Else
			Msgbox("ابتدای رقم باید 0 باشد","خطا")
	End If
	
	If EditText1.Text.SubString2(1,2)=9 Then
		Else
			Msgbox("دومین رقم باید 9 باشد","خطا")
	End If	
	
End Sub
پسند شده توسط Sina

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


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

 

 

فکر کنم هدف شما این هست که بخای حتما شماره وارده درست هم باشه. برای این منظور من یکجا دیدم ولی یادم نمیاد کجا دیدم و اسمش چی بود. اون دیگه آماده بود برای این کار

 

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

Sub EditText1_TextChanged (Old As String, New As String)
	If EditText1.Text.SubString2(0,1)=0 Then
		Else
			Msgbox("ابتدای رقم باید 0 باشد","خطا")
	End If
	
	If EditText1.Text.SubString2(1,2)=9 Then
		Else
			Msgbox("دومین رقم باید 9 باشد","خطا")
	End If	
	
End Sub

 داداش دمت گرم بابت راهنماییت قسمت اول رو انجام دادم و جواب داد فقط قسمت دوم رو که گفتید (منظورم اون سابی هست که باید برای ادیت تکس مینوشتیم ) رو درست متوجه نشدم میشه بیشتر توضیح بدی فدات

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


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

با سپاس 

 

با این کار هم دوباره عدد رو بعد از دادن خطا تایپ میکنه

 

داداش دمت گرم بدردم خود 

 

فقط یه سوال چطور میشه تعیین کرد که مثلا شماره از 09 شروع بشه ینی اگه طرف بجای 09 چیزی دیگه مثل 1 یا 3 یا هر چیزی دیگه اولش بذاره یک پیغام خطا بده و بگه که اشتباهه و تا فرمتشو درست ننویسه تایید نشه؟

 

 

 

 

 

نسخه تست شده

Sub EditText1_TextChanged (Old As String, New As String)
	Try
    If EditText1.Text.SubString2(0,1)=0 Then
        Else
			EditText1.Text=""
            Msgbox("ابتدای رقم باید 0 باشد","خطا")
    End If
    
    If EditText1.Text.SubString2(1,2)=9 Then
        Else
			EditText1.Text="0"
            Msgbox("دومین رقم باید 9 باشد","خطا")
    End If    
    Catch
		End Try
End Sub
پسند شده توسط koorosh، H@mid.RS و Sina

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


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

 داداش دمت گرم بابت راهنماییت قسمت اول رو انجام دادم و جواب داد فقط قسمت دوم رو که گفتید (منظورم اون سابی هست که باید برای ادیت تکس مینوشتیم ) رو درست متوجه نشدم میشه بیشتر توضیح بدی فدات

 

آره دیگه. توی ساب چنجش میاییم هر لحظه چک میکنیم

پسند شده توسط Sina و H@mid.RS

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


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0
Sub EditText1_TextChanged (Old As String, New As String)
	If EditText1.Text.SubString2(0,1)=0 Then
		Else
			Msgbox("ابتدای رقم باید 0 باشد","خطا")
	End If
	
	If EditText1.Text.SubString2(1,2)=9 Then
		Else
			Msgbox("دومین رقم باید 9 باشد","خطا")
	End If	
	
End Sub

 

 

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

 

Sub EditText1_TextChanged (Old As String, New As String)

   

 Try (این قسمت اضافه شده)

 

If EditText1.Text.SubString2(0,1)=0 Then

Else

            EditText1.Text=""

Msgbox("ابتدای رقم باید 0 باشد","خطا")

End If

If EditText1.Text.SubString2(1,2)=9 Then

Else

            EditText1.Text="0"

Msgbox("دومین رقم باید 9 باشد","خطا")

End If

 

 

Catch(این قسمت هم اضافه کن)

 

        End Try (اینم بذار تو کد)

 

 

End Sub

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


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

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

 

آغا کوروش گیچ هستیا . اون کد اصلاح شده رو ببین کی داده. اون من خودم بودم که . خخخخخخخ

 

یعنی کد بدون تست(که یخورده ایراد داشت) رو من دادم

 

کد اصلاح و تست شده رو بازم من دادم

 

 

الله یارت

پسند شده توسط H@mid.RS، Sina و koorosh

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


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

آغا کوروش گیچ هستیا . اون کد اصلاح شده رو ببین کی داده. اون من خودم بودم که . خخخخخخخ

 

یعنی کد بدون تست(که یخورده ایراد داشت) رو من دادم

 

کد اصلاح و تست شده رو بازم من دادم

 

 

الله یارت

 

 

داداش گلم شرمنده اصلا گیج شدم حس کردم یکی دیگه از کاربراس گفتم بدم بهش که اون بنده خدا هم کارش راه بیوفته مثل من اواره انجمن های برنامه نویسی نشه خخخخخخخخخ

 

بازم دمت گرم

پسند شده توسط salmana و H@mid.RS

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


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

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

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

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری

  • مطالب مشابه

    • توسط amir386
      سلام دوستان حدود چند ماهه سر درگمم تو یه موضوعی. چند بارم منصرف شم ازش ولی گفتم بپرسم کسی شاید تونست کمکم کنه...
      تو این پروژه میخوام . از این دیوایس برای اونیکی دیوایس از طریق سرور . هاست یا هر چی که بشه... از این دیوایس برای اونیکی دیوایس دستور ارسال کنم بعدش پاسخ تاییدم دریافت بشه یه چیزی شبیه به team viewer
      البته مشکل من دستوراتش نیست . مشکل اصلیم برقراری ارتباط بین این دو تا دیوایس هستش. دو روش هم پیش گرفتم ولی نتیجه خوبی نداده یکی از طریق ftp  یکی از طریق ارسال ایمیل و دریافتش... و.. 
      اگه کسی میتونه خواهشا کمکم کنه هزینه هم میکنم...
      یا یه نمونه سورسی ساخته بشع هم بقیشو خودم ادامه میدم.
      راه حل هاتونم پیشنهاد کنید مرسی 
    • توسط mreza
      سلام
      ممنون میشم این کتابخونه رو از github برام رپ کنید. خییییییییییلی برام حیاتیه
      https://github.com/LukeDeighton/WheelView?utm_source=android-arsenal.com&utm_medium=referral&utm_campaign=780
    • توسط H@mid.RS
      6.80 full