Vous avez cherché: stext (Anglais - Russe)

print stext
print stext

dim stext as string
dim stext as string

msgbox len(stext) rem returns 9
msgbox len(stext) rem возвращает 9

sub f_callfun (stext as string)
sub f_callfun (stext as string)

dim stext as variant rem must be a variant
dim stext as variant rem переменная должна быть типа variant

dim stext as variant rem must be a variant type
dim stext as variant rem Должен быть типа variant

msgbox stext,0,"text encoded"
msgbox stext,0,"Текст закодирован"

stext ="this is a short text"
stext ="Это короткий текст"

msgbox stext,0,"spectral distribution"
msgbox stext,0,"Спектральное распределение"

if cbool(instr(stext, "and")) then
if cbool(instr(stext, "и")) then

msgbox ( stext , 64, "confirmation of phrase")
msgbox ( stext , 64, "Подтверждение фразы")

stext = inputbox("please enter a short sentence:")
stext = inputbox("Пожалуйста, введите короткое предложение:")

sout = sout +"'"+ stext +"'" + chr(13)
sout = sout + "'"+stext +"'" + chr(13)

stext = trim(stext2) rem stext = "<*las vegas*>"
stext = trim(stext2) rem stext = " <*Сочи*> "

stext = inputbox ("please enter a phrase:","dear user")
stext = inputbox ("Введите фразу:","Уважаемый пользователь")

stext = ltrim(stext2) rem stext = "<*las vegas*> "
stext = ltrim(stext2) rem stext = <*Сочи*> "