eli miten qbllä saa teksti muuttujiin numero muuttujia?
eli pitäis saada:
muuttuja$=numero%
tai
open numero% for...
Kokeileppa seuraavaa *QB*:
luku=100
teksti$=STR$(luku)
'ja toistepäin
numba=VAL(teksti$)
Kommentteja?
Lue VAL- ja STR$ -funktioista QB:n ohjeista - niillä onnistuu
Dj Wolf ehtikin vastaamaan 4 min ennen :)
Etkös aikaisemmin huomannut, vai eikö viestini vielä näkynyt? :)
Str$ -funktiossa on se huono puoli, että teksti muuttujaan tulee yksi välilyönti numeroiden eteen. Jos se jotenkin häiritsee niin asia on helppo korjata seuraavalla koodinpätkällä.
Teksti$ = Right$(Str$(Numero%), Len(Str$(Numero%)) - 1)
Tai on myös mahdollista tehdä oma funktio.
Function PStr$ (Number As Integer)
PStr$ = Right$(Str$(Number), Len(Str$(Number)) - 1)
End Function
STR$(numero)
Kannattaako tuohon nyt enää vastata kun vastaus on saatu aikoja sitten? No, annettakoon nyt kerran anteeksi :)
välilyönnin saa pois myös komennolla LTRIM$(teskti$) ja oikealta puolelta vastaavasti RTRIM$
siis teksti$=LTRIM$(teksti$)
Aihe on jo aika vanha, joten et voi enää vastata siihen.