The following discussion is a continuation of the previous postings. To add data, we need to add the following program code:

ReDim Preserve strname(l - 1)
Write("Enter your name: ")
strname(l - 1) = ReadLine()

the results can be seen on the display below:

If we want to see data, it is necessary to add the following program code:

For Each name In strname
Write("Name: " & name)
Next

the results can be seen on the display below:
For advanced stage can be added to the source code of how to edit the wrong data and delete data that is not used anymore.