REM   دستورات مربوط به متغيرهاي رشته اي

'INSTR    **** a = INSTR(start,string,substr)
'dim a as Integer
'dim s1 as string*20,s2 as String*4
's1="FARADARS FARADARS"
's2="DARS"
'a = instr(8,s1,s2)
'print a
'end


'LCASE     **** s1 = LCASE(s2)
'dim s1 as String*10
'dim s2 as String*10
's2="FAraDARS"
's1=LCASE(s2)
'print s1
'end



'UCASE       **** s1=UCASE(s2)
'dim s1 as String*10
'dim s2 as String*10
's2="faradars"
's1=ucase(s2)
'print s1
'end


'LEN     **** a =LEN(s)
'dim a as Integer
'dim s as String*20
's="  faradars  "
'a=len(s)
'print a
'end


'LTRIM     **** s1=LTRIM(s2)
'dim s1 as String*15,s2 as String*15
's2="  fara   dars  "
's1=ltrim(s2)
'print s1
'end



'RTRIM    **** s1 = RTRIM(s2)
'dim s1 as String*15,s2 as String*15
's2="  fara   dars  "
's1=rtrim(s2)
'print s1
'end




'TRIM    **** s1=TRIM(s2)
'dim s1 as String*15,s2 as String*15
's2="  fara   dars  "
's1=trim(s2)
'print s1
'end





'LEFT     **** s1 = LEFT(s2,n)
'dim s1 as String*10
'dim s2 as String*10
's2="faradars"
's1=left(s2,4)
'print s1
'end


'RIGHT    **** s1 = RIGHT(s2,n)
'dim s1 as String*10
'dim s2 as string*10
's2="faradars"
's1=right(s2,4)
'print s1
'end



'MID    ****  s1 = MID(s2,start,[l])
dim s1 as String*20,s2 as String*10
s2="faradars"
s1=mid(s2,4,2)
print s1
end





























