' Save Open "fajl.dat" For Binary Access Write Lock Write As #1 Put #1, , velicinaMatrice Put #1, , matrica() Close #1 'Read Open "fajl.dat" For Binary Access Read Shared As #1 Get #1, , velicinaMatrice ReDim matrica(1 To velicinaMatrice) Get #1, , matrica() Close #1