Передача параметров по ссылке - VB

Формулировка задачи:

Помогите, пожалуйста.
Есть подпрограмма. Как я понимаю параметры передаются по ссылке.
В вызывающей программе дело обстоит так:
После вызова подпрограммы значения переменных не изменилось.
Как быть?

Решение задачи: «Передача параметров по ссылке»

textual
                            Листинг программы 
                        

                            <font color="darkblue"><b>10</b></font> DATA <font color="darkblue"><b>1</b></font>,<font color="darkblue"><b>2</b></font>,<font color="darkblue"><b>3</b></font>,<font color="darkblue"><b>4</b></font>,<font color="darkblue"><b>5</b></font>,<font color="darkblue"><b>6</b></font>,<font color="darkblue"><b>7</b></font>,<font color="darkblue"><b>8</b></font>,<font color="darkblue"><b>9</b></font>
<font color="darkblue"><b>20</b></font> <font color="blue">FOR</font> I=<font color="darkblue"><b>1</b></font> <font color="blue">TO</font> <font color="darkblue"><b>9</b></font>
<font color="darkblue"><b>30</b></font> READ A(I):<font color="blue">NEXT</font> I
                        