Функсияҳои матнӣ(сатри) дар Visual Basic 6.0 ва кор бо онҳо

Дар ин кисмати барнома мо ба дида баромадани функсияхои коркарди рамзхои сатри шуруъ менамоем. Дар накшаи овардашуда системаи функсияхои сатри нишондода шудааст, Ки микдори умумии функсияхои ба рамз Сару кор дошта ба шашто Барбар аст.

Функсияи Len

Вазифаи ин функсияи сатри барои хисоб намудани микдори рамзхо дар ягон объект бударо хисоб менамояд. Дар инчо басифати объект мо ягон элементро истифода мебарем. Фармати by функсия чуни наст: Len(n) дар инчо n – сатри навишташуда мебошад. Мисол: барномаи хисоби рамзхоро дар равзанаи Inputbox тартиб медихем.

(коди банома)

Private Sub Command1_Click()

a = InputBox(«Номи Элиментро дохел намоед», «Истифодаи функсияи Len»)

y = Len(a)

Print «Алюмений»; Вазифаи ин функсияи сатри барои хисоб намудани микдори рамзхо дар ягон объект бударо хисоб менамояд. Дар инчо басифати объект мо ягон элементро истифода мебарем. Фармати by функсия чуни наст: Len(n) дар инчо n – сатри навишташуда мебошад. Мисол: барномаи хисоби рамзхоро дар равзанаи Inputbox тартиб медихем. ; «

End Sub

(намуди зохирии барнома)

Функсияи MID

Намуди умумии функсияи MID чунин аст:

MID(F, N1, N2), ки дар инҷо F – ифодаи сатрӣ N1 ва N2 –ифодаҳои арифметики мебошанд. Ин функсия барои ҷудонамудани rисми сатри тағирёбанда истифда бурда мешавад. N1 ва N2 rимат rабул намуда мувофиrан N1 мавrеи интихоб намои ва N2 бошад, миrдори рамзро ифода мекунад. Ҳолатҳои имконпазири функсияи MID – ро дида мебароем:

(Барнома )

(Коди барнома)

Private Sub Command1_Click()

a = InputBox(«Дилхох калимаро дохил кунед», «Функсияи MID»)

y = Mid(a, 1, 5)

Print Tab; y;

End Sub

Читавре, ки дар рафти кори барнома дида мешавад, ҳангоми дохил намудани дилхоҳ калима дар равзанаи InputBox натиҷа дар майдони форма дида мешавад. Дар ин барнома ба ҷои тағирёбандаи сатрии а – калимаи «Донишгоҳ» дохилкарда (ва ё дилхоҳ калима) карда шудааст ва ба ҷои тағирёбандаҳои арифметикии N1 ва N2 мувофиrан раrамҳои 1 ва 5 истифода бурда шудаанд. Дар охир мо ба натиҷаи кори барномаи худ калимаи «дониш» — ро соҳиб гаштем.

Функсияи LEFT

Вазифаи ин функсия аз он иорат аст, ки вай ба миrдори додашуда рамзҳоро аз тарафи чапи сатр ҷудо мекунад. Ќоидаи синтаксисии ин функсия чунин аст:

LEFT(«сатр», «адади рамзҳои аз тарафи чапи сатр ҷудошаванда»).

Агар рамзҳои ҷудошаванда аз миrдори рамзҳои сатри додашуда зиёд бошад онгоҳ сатри додашуда ба пуррагӣ чоп карда мешавад:

Мисол:

(Барнома )

(Коди барнома)

Private Sub Command1_Click()

a = InputBox(«Дилхох калимаро дохил кунед», «Функсияи LEFT»)

y = Left(a, 5)

Print Tab; y;

End Sub

Бояд rайд намуд, ки функсияи LEFT ҳолати хусусии функсияи MID мебошад.

Функсияи RIGHT

Агар функсияи LEFT аз тарафи чап рамзҳои ба миrдори додашударо ба чоп барорад функсияи RIGHT аз охири сатри додашуда сар карда рамзҳои ба миrдори додашударо ба чоп мебарорад. Ќоидаи синтаксисии навишти by функсия чуни наст:

RIGHT («сатр», «адади рамзҳои баргарданда аз тарафи рост»). Дар ин ҷо низ адади рамзҳои баргарданда аз миrдори рамзҳои додашуда ба пурагӣ ба чоп дароварда мешаванд.

(Барнома )

(Коди барнома)

Private Sub Command1_Click()

a = InputBox(«Дилхох калимаро дохил кунед», «Функсияи RIGHT»)

y = Right (a, 5)

Print Tab; y; End Sub