Как разделить строку на отдельные символы

Вы можете разделить строку на отдельные символы с помощью
Mid(myString, x, y)
Подстрока, которая начинается с x и заканчивается в y извлекается.

Это тоже может быть интересно вам: right(myString, x, y), left(myString, x, y)

Программа

Только введите строку и щелкните по клавише.
Этикетка внизу покажет первый и последний символы.

Код:

STATIC PUBLIC SUB Main()
hForm AS Fmain
hForm = NEW Fmain
hForm.show
END

PUBLIC SUB _new()
TextLabel2.Text = "See the first and last character of your INPUT!"
END

PUBLIC SUB Button1_Click()
inword AS String
outword AS String
inword = TextBox1.Text
outword = Mid(inword, 1, 1)
outword = outword & Mid(inword, Len(inword), 1)
'Len(myString) returns the length of a string
  TextLabel1.Text = outword
END

Исходник

Download