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

نحوه تعریف و کار با متغیرهای رشته ای

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

VAR= INSTR (START,STRING,SUBSTR)
VAR=INSTR (STRING,SUBSTR)

VAR= INSTR (START,STRING,SUBSTR)

VAR=INSTR (STRING,SUBSTR)

START: عدد مشخص کننده شروع جستجو ینی کارکترهای قبل از آن جستجو نمی شود.

STRING: نام رشته ای که می خواهیم در آن جست و جو کنیم.

SUBSTR: نام متغییری که مقدار رشته یا کارکتری که در آن است را می خواهیم جستجو کنیم.

DIM A AS STRING *20,G AS STRING*3
DIM B AS BYTE
A= TISH IS A BASCOM
G=IS
B=INSTR (A,G)    ,B=3
B=INSTR(4,A,G)    ,B=6
END

DIM A AS STRING *20,G AS STRING*3

DIM B AS BYTE

A= TISH IS A BASCOM

G=IS

B=INSTR (A,G) ,B=3

B=INSTR(4,A,G) ,B=6

END

نکته: تنها عدد اولین رشته پیدا شده در B قرار می گیرد.

جمع کد اسکی کارکترها در زبان بیسیک BASIC

کار اسکی کارکترهای موجود در VAR با هم جمع شده و در متغیر B قرار می گیرد.

نکته: جمع این کدها تنها می تواند تا مقدار 225 افزایش یابد.

DIM A AS STRING*30
DIM B AS BYTE
A=TEST
B=CHECKSUM(A)       ,B=192
A= TESTNEXT
B=CHECKSUM(A)      ,B=383-256
END

DIM A AS STRING*30

DIM B AS BYTE

A=TEST

B=CHECKSUM(A) ,B=192

A= TESTNEXT

B=CHECKSUM(A) ,B=383-256

END

تبدیل حروف بزرگ متن به حروف کوچک در زبان بیسیک BASIC

VAR1= LCASE  (VAR2)

1	VAR1= LCASE (VAR2)

در زبان برنامه نویسی بیسیک حروف موجود در VAR2 را به حروف کوچک تبدیل کرده و در متغییر VAR1 قرار می دهد.

DIM A AS STRING*13
DIM B AS STRING*13
A=TEHRAN
B= LCASE (A)              , B= TEHRAN
END

DIM A AS STRING*13

DIM B AS STRING*13

A=TEHRAN

B= LCASE (A) , B= TEHRAN

END

تبدیل حروف کوچک یک رشته به حروف بزرگ در زبان بیسیک BASIC

VAR = UCASE ( VAR2)

1	VAR = UCASE ( VAR2)

در زبان برنامه نویسی BASIC حروف موجود در VAR2 را به حروف بزرگ تبدیل کرده و در متغییر VAR1 قرار می دهد.

DIM A AS STRING*13
DIM B AS STRING*13
A=TEHRAN
B= UCASE (A)             , B= TEHRAN
END

DIM A AS STRING*13

DIM B AS STRING*13

A=TEHRAN

B= UCASE (A) , B= TEHRAN

END

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

VAR1= RIGHT ( VAR2.N )

1	VAR1= RIGHT ( VAR2.N )

به تعداد N حرف از سمت راست رشته درون VAR2 را به درون VAR1 انتقال می دهد.

DIM A AS STRING*13
DIM B AS STRING*13
A=TEHRAN
B= RIGHT (A.2)        , B=AN
END

DIM A AS STRING*13

DIM B AS STRING*13

A=TEHRAN

B= RIGHT (A.2) , B=AN

END

جابجایی حروف از چپ در یک رشته به زبان بیسیک BASIC

VAR1=LEFT (VaR2,N)

1	VAR1=LEFT (VaR2,N)

به تعداد n حرف از سمت چپ رشته درون var2 را به درون var 1 انتقال می دهد.

DIM A AS STRING*31
DIM B AS STRING*31
A=TEHRAN
B=LEFT (A,2)        ,B=TE
END

DIM A AS STRING*31

DIM B AS STRING*31

A=TEHRAN

B=LEFT (A,2) ,B=TE

END

شمارش تعداد کارکترها (طول رشته) در زبان بیسیک BASIC

VAR1=LEN (VAR2)

1	VAR1=LEN (VAR2)

تعداد کارکترهای درون رشته VAR2 را در VAR1 قرار می دهد.

DIM A AS STRING*31
DIM B AS BYTE
A=TEHRAN
B=LEN (A)               ,B=6
END

DIM A AS STRING*31

DIM B AS BYTE

A=TEHRAN

B=LEN (A) ,B=6

END

حذف فضای خالی درون رشته در زبان بیسیک BASIC

VAR1=LTRIM (VAR2)

1	VAR1=LTRIM (VAR2)

فضای خالی را در میان کارکترهای VAR2 را حذف کرده و حاصل را در VAR1 قرار می دهد.

DIM A AS STRING*31
DIM B AS STRING*31
A= IS THE
B= LTRIM (A)             ,B= IS THE
END

DIM A AS STRING*31

DIM B AS STRING*31

A= IS THE

B= LTRIM (A) ,B= IS THE

END

جابجایی کارکتر دلخواه در یک رشته به زبان بیسیک BASIC

VAR1= MID (VAR2,S,N)

1	VAR1= MID (VAR2,S,N)

مقدار درون VAR2 را در نظر بگیرید. از کارکتر S ام به تعداد N کارکتر جدا کرده و در VAR1 قرار می دهد.

DIM A AS STRING*31
DIM B AS STRING*32
A= TEHRAN
B= MID (A,2,3)        , B= HER
END

DIM A AS STRING*31

DIM B AS STRING*32

A= TEHRAN

B= MID (A,2,3) , B= HER

END

ایجاد فضا خالی درون رشته در زبان بیسیک BASIC

VAR1= SPACE (N)

1	VAR1= SPACE (N)

برای ایجاد N فضای خالی در یک متغیر

DIM A AS BYTE
DIM B AS STRING*33
A=4
B= SPACE (A)                   , B= “  “
END

DIM A AS BYTE

DIM B AS STRING*33

A=4

B= SPACE (A) , B= “ “

END

فرم دهی به رشته عددی در زبان بیسیک BASIC

VAR1= FORMAT ( VAR2, “   “)

1	VAR1= FORMAT ( VAR2, “ “)

شاید بخواهید در یک رشته عددی, اعداد 1 تا 3 رقم اعشار نمایش داده شود. و یا قبل از اعداد متن یا علامتی قرار گیرد. این دستور به شما کمک خواهد کرد.

” “: فرم دلخواه را درونش قرار می دهید

DIM A AS STRING*23
DIM B AS STRING*23
A= “123”
B= FORMAT (A,”+000”)              , B=”+123”
B= FORMAT (A,”+0.00”)            , B=”+1.23”
B= FORMAT (A, “@000@”)       , B= “@123@”
END

DIM A AS STRING*23

DIM B AS STRING*23

A= “123”

B= FORMAT (A,”+000”) , B=”+123”

B= FORMAT (A,”+0.00”) , B=”+1.23”

B= FORMAT (A, “@000@”) , B= “@123@”

END

روند و برش دادن رشته های عددی در زبان بیسیک BASIC

VAR1= FUSING ( VAR2,”#.##”)
VAR1= FUSING ( VAR2, “#.&amp;&”)

VAR1= FUSING ( VAR2,”#.##”)

VAR1= FUSING ( VAR2, “#.&&”)

اگر بخواهید به تعداد دلخواه یک عدد اعشاری را روند کنید از علامت # استفاده کنید.

اگر بخواهید به تعداد دلخواه عدد اعشاری را برش دهید از علامت & استفاده کنید.

نکته: VAR1 از نوع STRING و VAR2 از نوع SINGLE

DIM B AS STRING*23
DIM A AS SINGLE
A=125.4586
B=FUSING (A,”#.##”)        , B= “125.46”
B= FUSING (A,”#.&&”)     , B=”125.45”
END

DIM B AS STRING*23

DIM A AS SINGLE

A=125.4586

B=FUSING (A,”#.##”) , B= “125.46”

B= FUSING (A,”#.&&”) , B=”125.45”

END

استخراج از جدول رشته در زبان بیسیک BASIC

VAR= LOOKUPSTR   ( Value , label )

1	VAR= LOOKUPSTR ( Value , label )

در صورتی که بخواهید از یک جدول که از رشته های مختلف تشکیل شده مقداری را فراخوانی کنید از این دستور استفاده کنید. ساخت جدول مانند ساخت جدول عددی می باشد.

Label : نام یا بر چسب جدول

Value : شماره اعداد جدول ( عدد 0 اولین مقدار جدول را فراخوانی می کند )

نکته : تعداد رشته های جدول تنها می تواند تا مقدار 255 داشته باشد.

DIM A AS STRING*10
A= LOOKUPSTR (1,ALL)      ,A= “MEHRDAD”
ALL:
DATA “ HAMED” , “MEHRDAD”, “YASER”,”RAHMAN”

DIM A AS STRING*10

A= LOOKUPSTR (1,ALL) ,A= “MEHRDAD”

ALL:

DATA “ HAMED” , “MEHRDAD”, “YASER”,”RAHMAN”

2 دیدگاه

Mehmet
ژوئن 3, 2016 در 7:28 ب.ظ

ایکاش متن بالا رو خودتون یکبار بازخونی میکردید ببینید چقدر غلط داره.برای یک مبتدی غیر قابل فهم هست و تا آخر دچار گیجی و اشتباه میشه لطفا تصحیح بفرمایید.با تشکر
electronics98
ژوئن 4, 2016 در 6:48 ق.ظ

سلام دوست عزیز
در مباحث آموزش برنامه نویسی سعی شده تا به ساده ترین و خلاصه ترین روش، کاربرد تک تک کدهای برنامه نویسی آموزش داده شود