آموزش

[Singular]

از دوستانی که در این سوالات تخصص دارند لطفا به اشتراک بزارند..

توضیح و نمونه مثال در مورد....هدف یادگیری و آموزش میباشد... ممنون میشم از راهنمایی

جداسازی ارقام

1.فرض عدد 000123456 چطور 3 تا 3 تا جدا کنیم === 000,123,456

2. فرض عدد 0001.23456 چطور 3 تا 3 تا جدا کنیم === 000,1.23,456


حذف کارکتر ( , )

3. فرض عدد 000,123,456 چطور کارکتر ( , ) را حذف کنیم === 000123456

4. فرض عدد 000,1.23,456 چطور کارکتر ( , ) را حذف کنیم === 0001.23456


تغییر کارکتر ( , ) به ( - )

1. فرض عدد 000,123,456 چطور کارکتر ( , ) به ( - ) را تغییر دهیم === 456-123-000

2. فرض عدد 000,1.23,456 چطور کارکتر ( , ) به ( - ) را تغییر دهیم === 456-1.23-000


گرفتن عدد بعد از ( * )


1.فرض عدد 9059*1212324 چطور عدد بعداز * را بگیریم === 9059

2.فرض عدد 9059*1212324 چطور عدد قبل از * را بگیریم === 1212324

با تشکر...
​

 

[Oghianus]

1. جداسازی ارقام:

سورس مثال: http://pardisiha.ir/NumDevider.rar

2. حذف کاراکتر:

[PHPS]
string$='12345,6789'
a$=','
b$=''
string$=StrChange(string$,a$,b$)
Message("string$","")
[/PHPS]
​

3. تغییر کاراکتر:

[PHPS]
string$='12345,6789'
a$=','
b$='-'
string$=StrChange(string$,a$,b$)
Message("string$","")
[/PHPS]
​

4. گرفتن قبل و بعد علامت:

[PHPS]
string$='123456789*999'
SubStr$='*'
SLow$=LOW(string$)
SubStrLow$=LOW(SubStr$)
PosStr=POS(SubStrLow$,SLow$)
LenP=LEN(string$)-PosStr+1
PS=PosStr+1
DS=PosStr-1
after$=StrCopy(string$,PS,LenP)
before$=StrCopy(string$,1,DS)
Message("after$","")
Message("before$","")
[/PHPS]
​

 

[Singular]

میشه در مورد گرفتن قبل و بعد علامت , جداسازی ارقام خط به خط توضیح بدید




دوست دارم در مورد دستورش بدونم

ممنون

 

[Oghianus]

1. جداسازی ارقام به این صورته که اول می گرده و . رو پیدا می کنه، بعدش طرف قبل و بعد . رو جدا توی دو تا متغیر می ریزه. بعدش هم تک تک بررسی می کنه و ویرگول میذاره. بعدش هم دوتا متغیر رو به هم وصل می کنه.

2. گرفتن قبل و بعد : اول علامت * رو جستجو می کنه و مکان (POS) رو میگیره، بعدش هم از مکان 1 تا مکان * رو توی متغیر before می ریزه و از مکان * تا آخر رو توی متغیر after می ریزه.

 

[Oghianus]

توی Help اگه سرچ کنید Advanced String بهتر متوجه میشید.

 

[MahmoodM30]

چه کاریه این همه کد نوشتین

string$='123456789*999'+'*'
GetArrayItem$=GetArrayItem(string$,*,1)
MessageEx("","GetArrayItem$")

اگه مقدار 1 رو بنویسید قبل * رو برمیگردونه اگه 2 بنویسید بعدش رو

 

[Oghianus]

متشکرم ...

خیلی روش ساده تری بود. استفاده کردم.

 

[Singular]

سلام منظورم از خط ب خط این بود خط بخط کد هست یعنی هر خط چه عملی رو انجام میده مثلا من تا اینجا رو فهمیدم

[PHPS]********************************* مقدار داده شده
string$='123456789*999'
********************************* کارکتر مورد نظر
SubStr$='*'
********************************* تبديل مقدار به حروف کوچيک
SLow$=LOW(string$)
********************************* تبديل کارکتر به حروف کوچيک
SubStrLow$=LOW(SubStr$)
********************************* جست و جو کارکتر از مقدار
PosStr=POS(SubStrLow$,SLow$)

[/PHPS]