Public Sub Main() Dim byCount As Byte Dim sToSave As String For byCount = 0 To 50 sToSave &= Format(Str(byCount), "00") & " - Charlie was here!" & gb.NewLine Next File.Save(User.Home &/ "TestFile", sToSave) Print File.Load(User.Home &/ "TestFile") End