سلام میخواستم بدونم آیا میشه کاری کرد که در editbox بیشتر از ده عدد نشه نوشت.
و آیا میشه در Editbox کاری کرد که فقط عدد و a تا z امکان تایپش باشه و نشه داخل فارسی نوشت
ممنون میشم اگه امکانش هست پلاگین یا اسکریپتش برام بذرین
سلام
لطفا به دستورات خیلی زیاد دقت کنید.
جای سوال دیگه باقی نمی مونه.
برای تا 10 کاراکتر :
کد:
Len=LEN(Str1$)
If (Len>10) Then
Str1$=StrCopy(Str1$,1,10)
DisplayValue("Str1","Str1$")
** Message("Must less than 10 characters","")
End
برای از A تا Z :
کد:
Len=LEN(Str2$)
LastChar$=StrGet(Str2$,Len)
LastChar=ORD(LastChar$)
OrdA=ORD(A)
OrdZ=ORD(Z)
If (LastChar<OrdA | LastChar>OrdZ) Then
If (Len=1) Then
Str2$=''
DisplayValue("Str2","Str2$")
Else
Len=Len-1
Str2$=StrCopy(Str2$,1,Len)
DisplayValue("Str2","Str2$")
End
** Message("Must be between A-Z","")
End
شرمنده میتونید یه پروژه دیگه رو برام بذارین که امکان تایپ فقط عدد صفر تا 9 و a تا z رو باهم داشته باشه چون این پروژتون فقط امکان تایپ a تا z رو داشت چون اسکریپت نویسی بلد نیستم واقعا ممنون میشم
....
ببخشید یه سوال دیگه هم داشتم آیا میشه تو Editbox کاری کرد که بعد ازتایپ 3 عدد علامت - را به طورخودکار بذاره مثل نمونه زیر
432-132-121
که دیگه نیازی به واردکردن - نباشه
پس اگه امکانش هست اسکریپت این برام بذارین که توی editBox پس ازتایپ هر سه عدد خودش کارکتر - رو بذاره .. برای نمونه 321-122-122
چون اگه با مثالاشون کار بکنم باز نمیتونم همچین چیزی درست کنم ممنون میشم
دوست عزیز من اینکارو تست کردم. ظاهرا عملی نیست.
البته نه از لحاظ کد نویسی، از اون نظر مشکلی نیست.
از این نظر مشکل داره که مثلا وقتی شما 123 رو وارد کردید میشه 123- بعد کرسر نمیوفته بعد از حرفه - و روی 3 میمونه و وقتی شما 4 رو وارد میکنید به اینطورت به شما خروجی میده 1234- و هرچی هم که تایپ کنید قبل از - میره.
با اجازه جناب [SaMaN] فكر ميكنم اين راه حل هم بد نباشه :
اينكه شما اعداد رو پشت سر هم تايپ كنيد و بعد اسكريپتي بنويسيد كه در پايان دهمين كاراكتر از سمت چپ سه رقم سه رقم جدا كنه و بعد از هر سه رقم يك كاراكتر - قرار بده و رشته جديد رو مجددا تو EditBox فراخواني كنه. فكر ميكنم اينطوري منظور شما شبيه سازي ميشه. اگه منظورتون رو تامين ميكنه بگيد تا تو نوشتن دستوراتش كمكتون كنم.
يه پيشنهاد: اگه شرط شما رو تو يك حلقه ميزاشتيم و يك متغير كه به ازاي هربار چرخش حلقه 4 واحد بهش اضافه شه و در محل بدست اومده كاراكتر - رو درج كنه اولا خطوط برنامه كاهش پيدا ميكرد ثانيا كاربر هر تعداد كاراكتر كه مدنظرش بود ميتونست بنويسه.
ممنونم كه به مثال من توجه كرديد و راه حل جديد پيشنهاد داديد. من از روش شما ايده جديدي گرفتم
سلام
مرسی از دوستان بابت مثال ها.
این مثال تکمیل شده قبلی من هم ببینید، بد نیست.
با استفاده از VB یه برنامه SendKey نوشتم . هم میشه کلید راست رو به برنامه ارسال کرد که کرسر جابجا شه و هم اینکه خود کاراکتر - مستقیم باهاش فرستاد.
دو تا روشش هست تو مثال.
