Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Методичка по QBasic.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
535.04 Кб
Скачать

Символьные функции.

К этим функциям относятся функции, аргументом которых является текст.

ASC

Функция ASC. Даёт значение функции в кодах ASCII .

Пример:

PRINT ASC("A")

CHR$

Функция, обратная функции ASC. Аргументом является значение кода символа, а значением символ.

Пример:

PRINT CHR$(81)

INSTR

Функция, позволяющая найти подстроку из строки и указать место, где она находится.

Пример:

Программа ищет место, где находится знак @

'если знака @ нет, то значение функции0

INPUT "Введи свой электронный адрес"; email$

S = INSTR(email$, "@")

PRINT "Знак @ находится на месте"; S

LCASE$

Функция превращает символьную строку в строку, написанную маленькими буквами.

Пример:

PRINT LCASE$("JOOSEP@KUSKIL.EE")

LEFT$

Аргументом функции является символьная строка и число. Выбирает слева столько символов, сколько указано в числе.

Пример:

a$ = "Microsoft QBASIC"

PRINT LEFT$(a$, 5)'Получаем: Micro

LEN

Аргументом ввляется символьная строка. Функция показывает сколько символов содержит строка.

Пример:

INPUT "Введи своё имя"; N$

PRINT "В твоём имени "; LEN(N$); "букв"

LTRIM$

Аргументом является символьная строка. Функция убирает слева все пустые места (если они были). У положительного числа слева есть , в частности пустое место для знака.

Пример:

a$=" BLAH"

PRINT LTRIM$(a$)

MID$

Аргументами является символьная строка и два числа. Функция выбирает из символьной строки с заданного места указанное число символов.

Пример:

a$ = "Информатика"

PRINT MID$(a$, 3, 5) 'Результатом будет -форма

Замечание:

Функцию можно использовать и для замещения.

Пример:

A$ = "Mann Potik"

PRINT "Фамилия до брака "; A$

MID$(A$, 6, 5) = "Kuusk"

PRINT "Фамилия после брака: "; A$

RIGHT$

Аналогична функции LEFT$. Выбирает справа столько знаков, сколько указано в числе.

Пример:

a$ = "Microsoft QBASIC"

PRINT RIGHT$(a$, 5) 'Результатом будет: BASIC

RTRIM$

Функция убирает справа в символьной строке все пустые места.

Пример:

a$="BLAH "

PRINT RTRIM$(a$)

STR$

Функция превращает число с символьную строку.

Пример:

ARV=45*2+5

TEKST$="WINDOWS "+STR$(ARV)

PRINT TEKST$

UCASE$

Функция превращает символьную строку в строку, написанную большими буквами.

Пример:

PRINT UCASE$("as siil ruudus")

VAL

Превращает символьную строку в число, если это возможно. Иначе даёт значение 0.

Пример:

Tekst$ = "100" 'Это текст

Arv = VAL(Tekst$) 'превращаем текст в число

PRINT 2 * Arv 'число можно умножать