چگونگی تشخیص اسلش در editbox

hassanzare

Member
با سلام و خسته نباشید خدمت شما دوستان

می خواستم تاریخی که به وسیله یک پلاگین نوشته می شه رو یه تغییرات کوچکی بدم مثلا تاریخ 1392/1/7 رو به صورت 1392/01/07 بنویسه
میخوام بدونم چجوری میشه به برنامه فهموند که اگر یکی مونده به آخرین کاراکتر اسلش بود یک صفر جلوی اسلش بزاره

من توی آموزش پلاگین SQL یاد گرفتم که طول کاراکتر و به وسیله LEN پیدا کنم بعد یکی از طول کم میکنم اما وقتی به صورت زیر مینویسم قبول نمیکنه میگه i حتما باید عدد باشه من باید چیکار کنم ممنون میشم اگه جوابمو بدین

[PHPS]string$ = EditBox$
Re=LEN(string$)
i = Re-1
** Error If (i = /) Then
Message("","i")
End
[/PHPS]
 

aryana2500

Active Member
اگه از پلاگین دوست خوبمون آقای حسینی استفاده می کنید من از این روش استفاده کردم
کد:
PluginRun("date-PlugIn","GetDate")
PluginGet("date-PlugIn","Get$")
Del$ = '/'
curDate$ = Get$ + Del$
Year  = VAL(GetArrayItem(curDate$,Del$,1))
Month = VAL(GetArrayItem(curDate$,Del$,2))
Day   = VAL(GetArrayItem(curDate$,Del$,3))
If (Month<10) Then
  Month$='0'+CHAR(Month)
Else
  Month$=CHAR(Month)
End
If (Day<10) Then
  Day$='0'+CHAR(Day)
Else
  Day$=CHAR(Day)
End
year$=CHAR(Year)
Get$=year$+Del$+Month$+Del$+Day$

اگر هم از روش دیگه ای استفاده میکنید همین کد رو با کمی تغییر میتونید استفاده کنید
 

جدیدترین ارسال ها

بالا