Колона

Колона имовина "ТектСтреам објекат враћа тренутни карактер позицију.

Напомена: Ово својство се сматра почетком карактера 1. линије.
Да бисте добили број актуелних карактера у линији је потребно, у пракси, врши одузимање -1 до природна последица које производи ова имовина.

Узмимо један пример.
Претпоставимо да имате текстуални фајл (Ц: \ тест.ткт) са следећим садржајем:

 



 Хелло како се зовеш?

 

 Дим фс, Т, к, и









 'Да направим инстанцу СЗС







 Поставите фс = Сервер.ЦреатеОбјецт ("Сцриптинг.ФилеСистемОбјецт")

 







 "Ја отворите датотеку у реад моду







 скуп Т = фс.ОпенТектФиле ("Ц: \ тест.ткт", 1, фалсе)









 'Да направим петљу која је заустављена на крају фајла







 не док т.АтЕндОфСтреам <> истина



  



 к = т.Реад (1)



  



 = И-1 т.Цолумн







 петља









 "Ја затворите све







 т.Цлосе







 Ништа скуп Т =







 Поставите фс = Ништа









 'Штампање видео

 





 Излаз:

 
 



 Последњи знак у текст фајл:?







 карактер позиција: 20