TArkoitus olis saada aikaan ohjelma joka tallentaa tulokset tekstitiedostoon mistä sitten voi lukea tuloksia.
Ohjelmaan tulisi pari text objektia, johon syötetään tulokset ja ketkä ovat vastakkain. Sitten ohjelma tallentaisi tulokset "hienosti" tekstitiedostoon, joka päivitetään nettiin. Ei varmaan kovin vaikea toteuttaa mutta voisiko joku antaa vinkkejä.
miten voi text1.text iin lisätä tekstiä silleen et vanha teksti ei lähde pois?
Lisäämällä tekstiin lisää tekstiä.
Vaikkapa text1.text = text1.text & " lisäys."
entäs silleen et ainaku lisää uutta tekstiä,nii teksti menee uudelle riville?
Pistä textboxin MultiLine arvoksi True.
Lisää rivinvaihto eli vbCrLf tai chr(13) + chr(10)
mitenkäs tietyn kohdan saa poistettua texti kentästä?
varmaan näin: text1=left(text1,irrotuskohta-1) & right(text1,len(text1)-irrotuskohta)
Noh, miten sitten saan tallennettua text1 .txt tiedostoon?
Entäs avattua tietyn .txt tiedoston text1?
Jota kuinkin näin:
open "texti.txt" for output as #1 print #1, text1.text close 'ja avaus open "texti.txt" for input as #1 input #1, text2.text text1.text = text2.text close
Onko tämä selitetty aikaisemminkin ;\
toi ei toimi? siis tarkotus olis tehä kaks nappia toisesta tallentaa ja toisesta avaa. siis ku painaa sitä tallenna nappia, se tallentaa sen samaan kansioon mis ohjelma on, ja sitku painaa avaa niin se avaa sen tiedoston. helppoa.
Jos se on niin helppoa niin tee itse.
Avauksen jälkeen luetan koko teksti Input$-funktiolla:
Text2 = Input$(LOF(1),1)
Aihe on jo aika vanha, joten et voi enää vastata siihen.