Şunu aradınız:: stext (İngilizce - İspanyolca)

print stext
print stexto

stext = " blackpool "
stext = " las vegas "

get #inumber,,stext
get #inumero,,stexto

let stext = " blackpool "
let stexto = " las vegas "

dim stext as string
dim stexto as string

msgbox stext(i,ii)
msgbox stexto(i,ii)

stext = string(10,65)
stexto = string(10,65)

msgbox stext,0, " text encoded "
msgbox stexto,0, " texto codificado "

while irun < len(stext)
while irun < len(stexto)

msgbox stext,0, " spectral distribution "
msgbox stext,0, " distribución espectral "

msgbox len(stext) rem returns 9
msgbox len(stexto) rem devuelve 9

let stext = "las vegas"
let stexto = "las vegas"

dim stext as variant rem must be a variant
dim stexto as variant rem debe ser una variante

stext = string(10,"a")
stexto = string(10,"a")

sout = sout +"'"+ stext +"'"
sout = sout +"'"+ stexto +"'"

stext ="this is a short text"
stexto ="esto es un texto corto"

msgbox stext,0,"spectral distribution"
msgbox stext,0,"distribución espectral"

dim stext2 as string,stext as string,sout as string
dim stexto2 as string,stexto as string,sout as string

if cbool(instr(stext, "and")) then
if cbool(instr(stexto, "y")) then

msgbox ( stext , 64, "confirmation of phrase")
msgbox ( stexto , 64, "confirmación de frase")