Hallo,
nach dem Restore Value_table musst du erst einmal die Werte in das X-Array einlesen. Am einfachsten in einer Schleife:

Dim I As Byte
...
Restore Value_table
For I = 1 to 10
Read X(I)
Next I